简单的ASP留言板制作教程.doc
简单的ASP留言板制作教程一、安装与调试创建ASP的运行环境（安装IIS） IIS(Internet Information Service)是构建ASP站点所必须的，先确认自己的电脑已安装了IIS信息服务，如果没有安装好的话，请按以下步骤： 1、打开“控制面板” 2、双击“添加/删除程序” 3、单击“添加/删除Windows组件”，打开添加/删除Windows组件对话框： 3、从下拉的列表中选择“Internet 信息服务(IIS)”单击“下一步”： 4、出现组件安装进度窗口，如弹出需要安装盘的话，放入Windows2000安装盘，按提示操作直至最后安装完毕。 -二、设计数据库 留言本有以下信息需要保存：留言者姓名、联系方式、留言内容等等。因为ASP并不能储存数据，所以数据库在这种环境之下就产生了。数据库的种类也很多，针对不同的程序也有适用于它的数据库，比如Access和Ms SQL就比较适用ASP和ASP.net程序。打开access后，出现一个对话框，选择第一个选项”空Access数据库”点击确定，弹出一个新建数据库的文件框，选择你上次你建的站点目录，起个data的文件名，点击创建， 双击”使用设计器创建表”打开表创建窗口”，创建表的结构如下表：数据库设计好了以后，可以直接在数据库里添加两条记录，以后测试时候用。再来创建一个储存管理员用户的表，以同样的方法，起名为admin，设计如下表：打开表，自己添加一个管理员用户，以便测试使用。整个数据库建立好了。-三、连接数据库 用ASP把程序和数据库连接起来，以后就可以连接到数据库、在ASP中显示数据库中的数据以及更复杂的插入、修改和删除。 以下代码是ASP程序中常用的连接数据库的代码： <% set conn=server.createobject("adodb.connection") c&server.mappath("data.mdb") conn.open connstr %> 解释： <% '这是ASP程序的起始 set conn=server.createobject("adodb.connection") '在服务器上创建了一个连接数据库的对象 connstr="Provider=Microsoft.jet.oledb.4.0;data source="&server.mappath("data.mdb") '告诉ASP数据库的接接方法以及路径 conn.open connstr '创建了对象后就用来打开数据库进行连接 %> 将上面的代码另存为conn.asp文件，放在服务器目录中。这一节是最重要的，否则以后操作数据库将变得不现实。下一步将数据库中的数据显示在页面中（实现留言本的查看功能）-四、查看留言板前面已经连接好了数据库，这里讲解如何将数据库里的数据用ASP读取出来并在页面中显示出来，这样就等于是查看留言本了。 利用DW制作首页面：将制作好的文件存为index.asp，下面创建数据记录集，用来显示数据库的数据到这个页面中： 用记事本打开index.asp，在页头加入以下代码： <%LANGUAGE="VBScript" codepage="936"%> <!-#include file="conn.asp"-> <% set rs=server.createobject("adodb.recordset") sql="select user,qq,email,content,data from main order by id desc" rs.open sql,conn,1,1 %> 解释一下： 第一行，表明ASP使用的是VB脚本 第二行，是用include包含文件，这里包含的是数据库连接文件。 第三行，ASP程序开始 第四行，利用Server内置对象创建一个记录集 第五行, SQL语句，这里的意思是选择数据库中的user,qq,email,content,data字段，指定该数据表的名称是“main”数据 的排列顺序是倒序。 第六行，用刚才创建的名为rs的记录集打开数据库，设置属性为只读（1,1为只读数据,1,3为插入数据，2,3是修改数据。 这样就打开了数据库，接下来就可以显示了。 将“留言人”代替为“<%=rs("user")%> “时间”代替为“<%=rs("data")%> “留言内容在此”代替为“<%=rs("content")%> “QQ”链接到：<%=rs("qq")%> “邮件”链接到：mailto:<%=rs("email")%> 最后将“填写留言”链接 add.asp “管理留言”链接 admin.asp 再次保存，原来在数据库里添加了两条记录的，为什么浏览只显示一条记录？因为我们没有指定ASP循环显示，所以就只有一条。 在刚才的代码后面添加一行 <%do while not rs.eof%> 并在页面的第一个表格的末尾加上 <% rs.movenext loop %> 上面的代码是用rs记录集指针一条一条往下一条移动，直到末尾，loop是循环的意思。再次浏览这个文件：这样就可以让数据库中的数据全部显示在页面中了，下一步介绍添加留言功能。-五、制作添加留言页面，实现留言功能 我们是做的一个留言本，实现留言的功能就十分重要了，要不然就算不上留言本了，接下来就一起来实现这个功能。 用DW制作页面：设置表单的属性如下：姓名：设置为单行文本域，名称为“user” QQ号：设置为单行文本域，名称为“qq” 邮件：设置为单行文本域，名称为“email” 内容：设置为多行文本域，名称为“content” 最后将表单的“Action”动作指向addsave.asp就可以了。 保存文档名为add.asp。 表单做好了，但还需要后台程序的支持，使用ASP编写一个添加留言处理程序，添加留言代码： <%LANGUAGE="VBScript" codepage="936"%> '表明ASP使用的是VB脚本 <!-#include file="conn.asp"-> '是用include包含文件，这里包含的是数据库连接文件 <% set rs=server.createobject("adodb.recordset") '利用Server内置对象创建一个记录集 sql="select user,qq,email,content,data from main" 'SQL语句，解释过了 rs.open sql,conn,1,3 '用刚才创建的名为rs的记录集打开数据库，设置属性为插入数据 rs.addnew '用记录集新添加一条数据 user=request.form("user") '请求表单的变量，定义变量为user，这里request.form是请求表单的意思 qq=request.form("qq") '请求表单的变量，定义变量为qq，这里request.form是请求表单的意思 email=request.form("email") '请求表单的变量，定义变量为email，这里request.form是请求表单的意思 content=request.form("content") '请求表单的变量，定义变量为content，这里request.form是请求表单的意思 rs("user")=user '将请求到的表单值传向记录集中代表user字段的名称 rs("qq")=qq '将请求到的表单值传向记录集中代表qq字段的名称 rs("email")=email '将请求到的表单值传向记录集中代表email字段的名称 rs("content")=content '将请求到的表单值传向记录集中代表content字段的名称 rs.update '更新一下数据库中的数据。 rs.close '关闭记录集 set rs=nothing '销毁记录集 conn.close '关闭数据库连接 set rs=nothing '销毁数据库连接 %> 读懂后节省时间，可以复制粘贴以上代码<%LANGUAGE="VBScript" codepage="936"%><!-#include file="conn.asp"-><%set rs=server.createobject("adodb.recordset")sql="select user,qq,email,content,data from main"rs.open sql,conn,1,3rs.addnewuser=request.form("user")qq=request.form("qq")email=request.form("email")content=request.form("content")rs("user")=userrs("qq")=qqrs("email")=emailrs("content")=contentrs.updaters.closeset rs=nothingconn.closeset rs=nothing%>将以上文件存为addsave.asp，测试发现填好提交以后就出现空白，为什么？这是因为在addsave.asp中没有设置数据成功提交后的转向页面，这里简单做一个刷新页面就行了，在程序的后面加上：<meta http-equiv="refresh" content="2;URL=index.asp">然后在页面中添加提示信息，比如：“您的留言已经成功提交，2秒钟后将自动返回留言本首页” 留言的功能实现了，最后再测试看看效果。 以上是要求掌握部分，以下可以试着学习，完成一个完整的留言板六、制作管理登陆页面留言本的后台管理功能很重要，这里只做留言本删除功能就行了当然也可以在这基础上添加更多的功能，比如回复留言者。用Dreamweaver做一个登陆页面，如下图：把用户名的表单名称设置为admin，密码的表单名称设为password，把动作指向checkpass.asp，存admin.asp这样登陆页面就好了，下面就做检测密码的ASP程序了，看以下代码解释：<!-#include file="conn.asp"-> '把conn.asp包含进来连接数据库<% 'ASP起始admin=request.form("admin") '定义admin的值是表单传过来的用户名域名称adminpassword=request.form("password") '定义admin的值是表单传过来的用户名域名称adminif admin="" or password="" then '这句的意思是假如用户名和密码没有输入的话那么执行下一句response.Write("<script language=javascript>alert('请填写完整!');history.go(-1)</script>") '用javascript脚本提示用户end if '结束if语句sql="select * from admin where admin='"&admin&"' and password='"&password&"'" '这句很重要，放到后面讲set rs=conn.execute(sql) '设定记录集rs，用conn执行SQL语句if rs.eof or rs.bof then '当没有符合筛选结果时，则执行下面的句子response.write "<script language=javascript>"response.write "alert('用户或密码不对!');"response.write "javascript:history.go(-1);"response.write "</script>" '用javascript脚本提示用户else '如果符合条件的时候session("admin")=admin '新建session，值等于表单传来的用户名response.redirect "mymanage.asp" '转向到mymanage.asp，进入管理页end if '结束if语句%> 'ASP结束将以上代码保存为checkpass.asp。这样，用户在admin.asp页面中输入用户名和密码后，就把用户名和密码值传给checkpass.asp处理，当用户名和密码的值和数据库中的字段相匹配时，就进入mymanage.asp这个管理页面，同时建一个session，这个session的会话变量将在后面起作用，下一步就明白了。七、制作管理页面当用户名和密码正确时就转到管理页面，其实这个留言本的管理页面和用户直接看到的首页没有多大的区别，只是用了Session会话变量用作保护和增加了一个删除链接，当点击这个链接的时候，就会自动删除这条留言。这个页面和首页的index.asp相似，先复制然后再改一下首先找到下面这句：sql="select user,qq,email,content,data from main order by id desc"把它改为sql="select id,user,qq,email,content,data from main order by id desc"这样，就选取到了id这个自动编号的值，以便删除留言时锁定这个id。然后在“邮件”这个链接后面增加一个链接“删除”，链接：del.asp?id=<%=rs("id") ，修改代码后为<a href="del.asp?id=<%=rs("id")%>" onclick="return confirm('是否确定删除本留言？');">删除</a> 改过后存为mymanage.asp-八、删除留言上面增加了一个删除留言的链接，以下是这个del.asp的代码<!-#include file="conn.asp"-><%set rs=server.createobject("adodb.recordset")id=Request.QueryString("id")sql="select * from main where id="&idrs.open sql,conn,2,3rs.deleters.update%>第4句：id=Request.QueryString("id") 用id取值字符串中传的id，回头看一下删除的链接：del.asp?id=<%=rs("id")%> 就是这个链接才把id的值传来的，<%=rs("id")%>是读取数据库中的自动编号字段中的id。第5句：用sql定义SQL语句，这里的*是通配符，表示所有，而Where有点像汉语中的“当”，整句话的意思是选择所有来自表名为main的字段，它的条件是当数据库中的id字段是字串所传来的id。第6句是打开符合条件的记录， 2，3指定可以对数据库中的数据进入修改。第7、8句rs.delete 这才是整个程序的精髓，就是执行了删除。rs.update 这是更新数据库中的表，删除后就更新。最后用rs.close和conn.close释放。
