Dreamweaver UltraDev打造生成静态页的新闻系统2

　　１、模板的修改。我们先从简单的模板修改入手，这个原理很简单：把模板的数据记录取出来，使用Updata Record，就行了。我们在example_updata.asp页上放一个表单及一个text域（多行），建立一个记录集，如下图： 

　　把记录<%=(rsUpdata.Fields.Item("E_Meno").Value)%>插入到你的text域中去，然后执行（Server Bahaviors ---> Updata Record），将成功页指向ok.htm就行了。

　　２、新闻记录及页面的删除。普通的记录删除相信大家都会了，但是我们如果光删除了数据库中的记录，硬盘上还留有静态页的文件，这是我们不想见到的，所以我们还要用到FSO的DeleteFile方法。

　　打开我们刚才做好的browse.asp页面，在表格的第２列，添一个表单域，１个按钮和２个隐藏域（name为N_FilePath和ID_News），设置表单的action="del.asp"。效果如图：

　　分别将记录<%=(rsBrowse.Fields.Item("N_FilePath").Value)%>和<%=(rsBrowse.Fields.Item("ID_News").Value)%>插入到隐藏域N_FilePath和ID_News的Value里去，这个页ok了。

　　３、删除新闻页del.asp。在这个页我们分别用command和FSO来删除记录和*.htm页，打开空白的del.asp页，打开Date Bindings --> Command(Stored Procedure) ，新建一个command命令，如图： 

　　ok，删除数据库记录就做好了哦！是不是超简单！下面我们来添加删除新闻*.htm页的FSO代码。

　　找到如下代码：

<%

set comDelNews = Server.CreateObject("ADODB.Command")
comDelNews.ActiveConnection = MM_asp2htm_STRING
comDelNews.CommandText = "DELETE FROM T_News WHERE ID_News =" + Replace(comDelNews__varID, "'", "''") + ""
comDelNews.CommandType = 1
comDelNews.CommandTimeout = 0
comDelNews.Prepared = true
comDelNews.Execute()

%>
　　这是我们刚才添加的command命令，在这段代码下加上如下代码：

<% '删除新闻静态页面
Dim filepath
filepath=Request("N_FilePath")
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile(Server.mappath(filepath))
Set fso = nothing

response.redirect "ok.htm" '操作成功转向的页面
%>

　　这样静态页的删除工作也做好了，保存！

　
　　（PS：为什么要把FSO的代码放在command命令下面呢？这是为了以防万一运行del.asp页的时候，出现突发性事件，比如：停电、死机，可能上面的command命令已经执行完了，那么在浏览的时候，还是达到删除新闻的效果了，至少没有显示了。但是如果反过来，先执行了FSO把*.htm页删除了，但是数据库的记录还在，用户在点击浏览的时候就会找不到页面。这是个小问题，大家可以多思考一下）

　　４、新闻修改更新。关于这个功能，更新数据库内容的方法我们都很熟了，用Updata Record行为就好了，这里主要是如何更新*.htm里的内容？其实一个比较简单的方法就是：重新创建一个*.htm的页，当然页面的名称和路径都是要更新的新闻页的名称和路径，这样，创建好了后，就覆盖了原来的文件，更新的操作也完成了。好！明白了道理，也有了前面添加新闻的基础，应该难不倒你喽！
我们首先在browse.asp页上添加个按钮，在前面“删除”按钮的后面，插入一个表格列，在里面插入一个表单，及1个按钮和１个隐藏域name=ID_News_updata（你也可以用文字，如：更新，连接到updata.asp页，参数为ID_News=<%=(rsBrowse.Fields.Item("ID_News").Value)%>），效果如图： 

　　设置表单（这里是form2）的action="updata.asp"，好了，这个页就ok了，保存！

[1] [2] 下一页

复制本页网址和标题，发送给你QQ/Msn的好友一起分享

上一篇:Dreamweaver UltraDev打造生成静态页的新闻系统

下一篇:Dreamweaver UltraDev打造生成静态页的新闻系统3