 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
今天我们来写一个有治理功能的留言板程序。所谓的治理功能，其实就是每条留言前有一个选择框，点中要删除的留言，或者点“删除所有留言”，就完成了批量删除。通过这一实例，我们可以初步了解ASP中对数据库的基本操作。 一、建立数据库(ACCESS2000中文版) myid 文本型 20字节 这是发言的唯一标志 myname 文本型 10字节 这是保存留言人姓名的 nowtime 日期/时间型 这里记录了留言时间 mytitle 文本型 30字节 这是留言的题目 mybody 备注 留言内容 其中的myid字段是要害，它是删除的唯一标志。 二、治理程序 manage.asp代码 \\\'先定义变量 dim listrs,conn,cmd \\\'可根据实际留言数量修改i的循环次数 for i=1 to 100 if request("delit"&i)<>empty then \\\'上面这条语句为要害部分，检查第i条留言是否被选中，若被选中，则执行下面的删除操作 Set conn = Server.CreateObject("ADODB.Connection") sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("guestbook.mdb")&";" \\\'mappath函数要用一个参数guestbook.mdb，表示要连接的数据库，注重路径问题 conn.Open sConnection \\\'再连接数据表 set cmd=Server.Createobject("ADODB.Command") set cmd.activeconnection=conn cmd.commandtext="delete from guest where myid=\\\'"&request("delit"&i)&"\\\'" \\\'上面的guest是数据表的表名，myid是字段名 cmd.execute set conn=Nothing set cmd=Nothing \\\'执行SQL指令及释放对象 end if next \\\'输出表单，注重action属性指向manage.asp response.write "" \\\'连接数据库 set conn=Server.CreateObject("ADODB.Connection") set listrs=server.createobject("ADODB.Recordset") sConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("guestbook.mdb")&";" conn.Open sConnection listrs.open "select * from guest",conn,2,2 \\\'上面打开了数据库的guest表 i=1 \\\'变量i开始记数 while not listrs.eof response.write "来自:"&listrs("myname")&"----"&listrs("mytitle")&"时间:"&listrs("nowtime")&" "&listrs("mybody")&" " i=i+1 \\\'上面两步是要害处，输出每条留言的同时，输出一个checkbox复选框，此框功能是选中与不选中将返回不同值 listrs.movenext wend set listrs=Nothing \\\'输出提交按钮和表单结束标志 response.write 三、代码分析 代码不太好理解，且听我说来： 1.程序首次执行时，if request("delit"&i)<>empty then总是返回假值，因为复选框未被选中，接着输出所有的留言。 2.在选中了要删除的留言后，按下“删除按钮”，重新执行。 3.删除全部选中的留言后，再输出留言板。 返回类别: 教程 上一教程: GLOBAL.ASA 参考 下一教程: ASP OBJECT之:BUFFER 您可以阅读与"实现有治理功能的ASP留言板"相关的教程: · ASP环境下邮件列表功能的实现 (一) · ASP环境下邮件列表功能的实现 (二) · ASP环境下邮件列表功能的实现 （一） · ASP环境下邮件列表功能的实现 （二）（推荐） · ASP环境下邮件列表功能的实现 （二） |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
