|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。还记得我们在第三章中作删除留言的事么?为了删失落那条往你脸上争光的留言,我们事先独一能用上的办法居然只要间接在留言数据库长进行查找和删除。(而即便是进修了第七章以后,我们也仅仅只能繁锁地先经由过程“留言办理”的暗码考证,然后下载全部留言数据库,删除变动今后再上传。)天啊!你总没法包管:当你看到那些你不喜好的留言时,恰是当你正在利用着那台放了你留言簿的服务器的时分吧?假设有一天你出差在外,或是你正在利用的盘算机基本就没有安装甚么上传软件......是否是?黔驴技穷了吧?那末岂非我们就只能目光光地听任某些“功德者”来扰乱我们的留言簿吗?
我们固然不会容谦让“功德者”来我们的留言簿肆意涂乌,因而在这一章里我将报告一下,怎样给我们的留言簿增加在线留言删除的功效。
既然要增加在线留言删除功效,留言编纂的页面总不克不及没,因而我把在后面章节已先容过的留言显现页面程序page2.asp和self2.asp略加修正,实在仅仅是在每条显现留言的下面增加一个“删除留言”的按钮罢了。可是有一点我们是必需明白的是:每条留言下面的“删除留言”按钮,应当只是对该条留言无效,而与其他的留言有关。因而我们能够在self2.asp中的得当地位到场以下的语句后另存成editself.asp,这即是留言编纂界面中,用来界说留言显现格局的程序。
Tab=Tab&"<TR><TD><AHREF=""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程序下面的<!--#includefile="self2.asp"-->交换成<!--#includefile="editself2.asp"-->这即是删除留言页面的留言处置程序editpage2.asp。
在完成了留言编纂的页面后,接上去让我们进一步来进修删除留言的处置程序(delete.asp)。
<!--#includefile="adovbs.inc"-->
<%
Setconn=Server.CreateObject("ADODB.Connection")
DBPath=Server.MapPath("book2.mdb")
conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&DBPath
sql="DELETEFROMguestbookWHERE(ID="&Request.QueryString("id")&")"Setrs=conn.Execute(sql)
%>
由于我们要删除的留言纪录是留言数据库中序列号ID与“删除留言”按钮所对应的ID相分歧的留言纪录,因而我们在这里经由过程"&Request.QueryString("id")&"来猎取以后操纵的留言所对应的ID。上述的SQL命令便是标明:删除留言数据库中ID序列号与以后操纵的留言所对应的ID相分歧的留言纪录。
<%
SubdelaySecond(DelaySeconds)
SecCount=0
Sec2=0
WhileSecCount<DelaySeconds+1
Sec1=Second(Time())
IfSec1Sec2Then
Sec2=Second(Time())
SecCount=SecCount+1
EndIf
Wend
EndSub
%>
<%delaySecond(2)%>
在删除留言操纵后延时2秒。
<%Response.Redirect("page2.asp")%>
删除留言后将客户端扫瞄器指引到“寓目留言”页面。
实现规模效益。与传统的用户拥有硬件软件所有权和使用权以及传统的应用服务商提供一对一的服务模式不同,ASP拥有应用系统所有权,用户拥有使用权,应用系统集中放在ASP的数据中心中,集中管理,分散使用,以一对多的租赁的形式为众多用户提供有品质保证的应用技术服务,实现规模效益。 |
|