asp数据库网页设计基础
一、关于数据库网页设计步骤
1、先建好一个数据库放在服务器中。
2、创建数据库的ODBC。
3、设计一个查询网页，接收用户选择。
4、设计一个处理网页（ASP），根据用户的请求，从服务器中选择部分或全部记录。
5、设计一个显示查询结果网页。
二、建立一个数据库
在Access97中建立一个数据库，Book.mdb
IDnamepwd
1张国强1111
2李志英2222
3王建军3333
4刘芳华4444
三、创建Access数据库的ODBC
1、在服务器中打开“ODBC管理器”。
2、选择“系统DSN”——“添加”。
3、指定Access驱动程序——“完成”。
4、指定“数据源名”为“accessdb”（可随便起）。
5、选取一个数据库——D:Book.mdb——“确定”。
四、运行ASP程序
1、启动PWS（在调试阶段）。
2、将所有文件保存在“D:/网页设计”中。
3、将“D:/网页设计”在PWS中虚拟为“WWW”目录。
4、启动IE，在地址栏输入：http://localhost/www/disp.asp（要用虚拟目录，不用绝对路径）
五、例一、显示全部记录
功能：显示Book.dbf中的全部记录，文件名disp.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.movefirst
do while not rs.eof
response.write rs(0) & "--" & rs(1) & "--" & rs(2) & "<br>"
rs.movenext
loop
rs.close
set rs=nothing
%>
</body>
</html>
六、与数据库有关的属性
rs.movefirst最前记录
rs.movelast最后记录
rs.movenext下一记录
rs.moveprevious上一记录
rs.move(n)向前、向后移动N个记录
rs.bof
rs.eof
rs.recordcount记录总数
rs.fields("name")字段名
rs(2)第三个字段
七、例二、在表格中显示全部记录
功能：在表格中显示Book.dbf中的全部记录，文件名disp1.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.movefirst
%>
<table border=1>
<tr><td>编号</td><td>姓名</td><td>密码</td></tr>
<%
do while not rs.eof
response.write "<tr>"
response.write "<td>"&rs(0)&"</td>"
response.write "<td>"&rs(1)&"</td>"
response.write "<td>"&rs(2)&"</td>"
response.write "</tr>"
rs.movenext
loop
rs.close
set rs=nothing
%>
</body>
</html>
八、例三、增加空记录
功能：在最后增加一个空记录。文件名app_bnk.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.addnew
rs.update
rs.close
%>
</body>
</html>
九、例四、删除当前记录
功能：删除最后记录。文件名delete_1.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.movelast
rs.delete
rs.close
%>
</body>
</html>
十、例五、删除某个记录
功能：删除ID=13的记录。文件名delete.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "delete from info where ID=13","dsn=accessdb",3,3
set rs=nothing
%>
</body>
</html>
十一、例六、修改记录
功能：将ID=4的那个记录，name字段的内容改为“刘自强”。文件名edit.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "update info set name='刘自强' where ID=4","dsn=accessdb",3,3
set rs=nothing
%>
</body>
</html>
十二、例七、查询记录
功能：查询显示ID>=3的记录。文件名find.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info where ID>=3","dsn=accessdb",3,3
rs.movefirst
do while not rs.eof
response.write rs(0) & "--" & rs(1) & "--" & rs(2) & "<br>"
rs.movenext
loop
rs.close
set rs=nothing
%>
</body>
</html>
十三、例八、在文本框中显示记录
功能：在文本框中显示第一条记录。文件名disp_form.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.movefirst
%>
<form>
<br>编号:<input type="text" value="<%=rs(0)%>">
<br>姓名:<input type="text" value="<%=rs(1)%>">
<br>密码:<input type="text" value="<%=rs(2)%>">
</form>
<%
rs.close
set rs=nothing
%>
</body>
</html>
注：也可写成：
<br>编号:<input type="text" value="<%response.write rs(0)%>">
十四、例九、在列表框中显示记录
功能：在列表框中显示记录的name字段。文件名disp_list.asp。
<html>
<body>
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from info","dsn=accessdb",3,3
rs.movefirst
%>
<form>
<p>
<select name=choose size=7>
<% do while not rs.eof %>
<option value="<%=rs(1)%>"> <%=rs(1)%>
<%
rs.movenext
loop
%>
</select>
</form>
<%rs.close
set rs=nothing%>
</body>
</html>
577
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
