循序渐进学做留言簿 -- 给留言簿添加在线删除留言功能

您现在的位置： ASP技术网 >> ASP学习 >> ASP应用 >> 文章正文

没有公告

热门文章

	在ASP中使用SQL 任何熟悉SQL和关系数据库的人都遇见过大量的连接类型。最简……
	十天学会ASP之第学习目的：掌握ACCESS数据库的连接和读取记录……
	十天学会ASP之第学习目的：学会ACCEES数据库的使用，并建立一……
	十天学会ASP之第学习目的：学会用表单元素向服务器传送变量，然后显……

专题栏目

循序渐进学做留言簿 -- 给留言簿添加在线删除留言功能

作者：本网收集文章来源：本站收集点击数：更新时间：2004-9-24

　　还记得我们在第三章中作删除留言的事么？为了删掉那条往你脸上抹黑的留言，我们当时唯一能用上的方法竟然只有直接在留言数据库上进行查找和删除。（而即使是学习了第七章之后，我们也仅仅只能繁锁地先通过“留言管理”的密码验证，然后下载整个留言数据库，删除更改以后再上传。）天啊！你总没法保证：当你看到那些你不喜欢的留言时，正是当你正在使用着那台放了你留言簿的服务器的时候吧？假如有一天你出差在外，或是你正在使用的计算机根本就没有安装什么上传软件......是不是？无计可施了吧？那么难道我们就只能眼光光地放任某些“好事者”来捣乱我们的留言簿吗？
　　我们当然不会容忍让“好事者”来我们的留言簿肆意涂乌，因此在这一章里我将讲述一下，如何给我们的留言簿添加在线留言删除的功能。

　　既然要添加在线留言删除功能，留言编辑的页面总不能没，于是我把在前面章节已介绍过的留言显示页面程序page2.asp和self2.asp稍加修改，其实仅仅是在每条显示留言的上面添加一个“删除留言”的按钮而已。但是有一点我们是必须明确的是：每条留言上面的“删除留言”按钮，应该只是对该条留言有效，而与其余的留言无关。因此我们可以在self2.asp中的适当位置加入以下的语句后另存成editself.asp,这便是留言编辑界面中，用来定义留言显示格式的程序。
Tab = Tab & "< TR>< TD>< A HREF=""delete.asp?ID=" & rs("ID") & """>"
Tab = Tab &" < b>删除留言< /b> "& "< /TD>< /TR>"
'rs("ID")指ID字段的记录。rs("ID")完整的写法应该是“rs.Fields("ID").Value”，因为Fields是Recordset对象“默认的”属性，Value又是Field对象“默认的”属性，因此我们可以简写成rs("ID")。

　　同样，我们只需将page2.asp程序上面的< !--#include file="self2.asp" -->替换成< !--#include file="editself2.asp" -->这便是删除留言页面的留言处理程序editpage2.asp。

　　在完成了留言编辑的页面后，接下来让我们进一步来学习删除留言的处理程序（delete.asp）。
< !--#include file="adovbs.inc" -->
< %
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("book2.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
sql ="DELETE FROM guestbook WHERE (ID = " & Request.QueryString("id") & ")" Set rs = conn.Execute( sql )
%>
'因为我们要删除的留言记录是留言数据库中序列号ID与“删除留言”按钮所对应的ID相一致的留言记录，因此我们在这里通过 " & Request.QueryString("id") & "来获取当前操作的留言所对应的ID。上述的SQL命令即是表明：删除留言数据库中ID序列号与当前操作的留言所对应的ID相一致的留言记录。

< %
Sub delaySecond(DelaySeconds)
SecCount = 0
Sec2 = 0
While SecCount < DelaySeconds + 1
Sec1 = Second(Time())
If Sec1 <> Sec2 Then
Sec2 = Second(Time())
SecCount = SecCount + 1
End If
Wend
End Sub
%>
< % delaySecond(2) %>
'在删除留言操作后延时2秒。
< % Response.Redirect ("page2.asp") %>
'删除留言后将客户端浏览器指引到“观看留言”页面。

【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】

文章录入：admin 责任编辑：admin

上一篇文章：循序渐进学做留言簿 -- 给留言簿的留言管理设置密码验证（二）

下一篇文章：循序渐进学做留言簿 -- 给留言簿添加在线留言编辑功能（一）

>>>关键词列表
域名注册申请	.cn域名注册	.com域名注册	虚拟主机	asp空间	域名空间代理	深圳虚拟主机	深圳网站建设
英文域名申请注册	中文域名申请	[域名主机]申请	[ASP空间]申请	HTML虚拟主机申请	ASP.Net虚拟主机申请	学生虚拟主机[ASP空间]申请	FTP空间申请
MS SQL数据库空间申请	个人主页空间申请	网站建设	网站推广	3721网络实名	虚拟主机管理系统	域名空间代理	域名空间

网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）

去论坛聊聊

站内文章搜索