1、 Asp动态网站制作流程 1、建立个人站点文件夹（如：E:\web100） 2、配置IIS：开始—程序—管理工具—Internet信息服务—默认网站—属性 （1）主目录：本地路径：E:\web100 （2）文档：index.asp 3、启用DW 8.0建立站点：站点—新建站点—“高级”或站点—管理站点—编辑—“高级” （1）本地信息：站点名称：myweb；本地根文件夹：E:\web100； （2）测试服务器：服务器模型：ASP VBScript；访问：本地/网络。 4、在DW中选择：文件—新建—动态页 ASP VBScript（文档类型：无）—创建 5、开始网页页面
2、设计及代码编写等操作，将文件保存为.htm或.asp类型。 6、在Internet信息服务器窗口中右键点击要浏览的网页文件，选择“浏览”，在打开的IE窗口中进行测试，也可以直接打开IE，在地址栏里输入： 或或http://本机IP地址，来进行页面测试。 对数据库中数据表的操作主要有：增、删、改 （1）读取记录（显示/浏览记录） （2）写入记录（插入记录） （3）查询记录（查找满足指定条件的记录） （4）修改记录 （5）删除记录 小小留言本的制作 目录 1、创建数据库test.mdb及留言用的数据表liuyan 2 2、创建连接数据库的文件conn.asp 2 3、制作留
3、言本的首页index.asp 2 4、制作留言浏览页list.asp 3 5、制作添加留言的静态页add.htm 4 6、制作提交留言写入数据库的动态页add.asp 6 7、制作查询留言的静态页chaxun.htm 7 8、制作查询留言结果显示页cxjg.asp 8 9、制作删除留言静态页shanchu.htm 10 10、制作删除留言动态页scjg.asp 11 11、制作修改留言静态页xiugai.htm 12 12、制作修改留言动态页xiugai.asp 13 13、制作修改留言成功动态页xgjg.asp 15 详细步骤及代码 1、创建数据库test.mdb及留
4、言用的数据表liuyan 确定数据表的各个字段名称及数据类型分别为：qq（文本，10）、nich（文本，10）、ly（备注）、time（日期/时间，默认值=Now（）。 2、创建连接数据库的文件conn.asp conn.asp代码如下： <% set conn=server.CreateObject("adodb.connection") ‘设置一个adodb数据库连接组件 conn.open "driver={microsoft access driver (*.mdb)};dbq=" &server.MapPath("test.mdb")‘设定所要连接的数据库（包括名称和路
5、径） %> 3、制作留言本的首页index.asp index.asp代码如下： <%@language="vbscript" codepage="936"%>
6、a href="xiugai.htm">修改留言 删除留言 4、制作留言浏览页list.asp list.asp代码如下： ‘包含连接数据库的文件 <% exec="select * from liuyan" ‘查询数据表记录的表达式 set rs=server.CreateObject("adodb.recordset") ‘创建相应记录集 rs.open exec,conn,1,1 ‘读取记录集中满足表达式的相应
7、记录 %> <, /P>
所有访客留言内容
| 编号 | QQ号 | 昵称 | 留言内容 | 留言时间 |
| <%=rs("id")%> | <%=rs("qq")%> | <%=rs("nich")%> | <%=rs("ly")%> | <%=rs("time")%> |
添加新留言
13、) ly=request.Form("ly")‘从提交的表单中获取相应的值 exec="insert into liuyan(qq,nich,ly) values('"+qq+"','"+nich+"','"+ly+"')" ‘插入记录的表达式 conn.execute exec ‘执行该表达式命令 response.Write(" 添加留言成功!") conn.close set conn=nothing %> ‘本段代码用来添加相应记录到数据表中
17、asp代码如下： <% qq=request.Form("qq") nich=request.Form("nich")‘从表单中获取要查询的条件值 exec="select * from liuyan where qq='"+qq+"'or nich='"+nich+"'" ‘设定查询条件表达式 set rs=server.CreateObject("adodb.recordset") ‘创建相应记录集 rs.open exec,conn,1,1 ‘读取记录集中满足表达式的相应记录 %> <
18、head>
查找到的留言内容
| 编号 | QQ号 | 昵称 | 留言内容 19、> | 留言时间 |
| <%=rs("id")%> | <%=rs("qq")%> | <%=rs("nich")%> | <%=rs("ly")%> | <%=rs("time")%> |
20、thing conn.close set conn=nothing‘关闭记录集和数据库 %>