WEB数据库技术与应用复习大纲及课后习题
P123
6.15 建立一个Access数据库DB1和数据表Student,它包含的字段如下表所示: 字段名 Stno Stname Sex Age Addr E-mail 数据类型 文本 文本 文本 数字 文本 文本 说明 学号 姓名 性别 年龄 住址 电子邮件 输入5位学生的模拟数据,利用Connection对象编写ASP程序来显示Student中的内容。 解答：
建立数据库DB1和数据表Student： 点击“开始”，在子菜单中再点击“程序”，在下级菜单中点击“办公软件”，选择“Microsoft Access”打开，选择“空数据库”，选择好存放的路径后命名为“DB1”。然后打开数据库，弹出如下对话框：
然后点击“设计”，弹出如下对话框：
1
输入各字段的信息得到表如下所示：
然后关闭这个界面，另存为“student”表，而后向“student”表中输入数据,如下所示：
2
向数据库中添加信息,设计一个输入界面，用IE浏览器打开如下所示：
它的代码如下所示：
向界面输入完信息之后，点击添加转入ASP处理程序： （1）“condb.asp”程序如下： <%
set conn=server.CreateObject(\ set urs=server.CreateObject(\set ers=server.CreateObject(%usqlstr=\esqlstr=\
connstr=\与参数的顺序无关 conn.open connstr
'将Recordset 输出成HTML 的“表格” Sub list(rs)
' Part I：输出数据库的“表头”
Response.Write \ Response.Write \ For i=0 to rs.Fields.Count-1
4
Response.WRITE \ Next
Response.Write \
' Part II：输出数据库的“内容” While Not rs.EOF
Response.Write \ For i=0 to rs.Fields.Count-1
Response.WRITE \ Next
Response.Write \ rs.MoveNext Wend
Response.Write \End Sub %> （2）“lx615_add.asp”程序如下： <%
stno=request.form(\
stname=request.form(\sex=request.form(\age=request.form(\addr=request.form(\email=request.form(\
set conn=server.CreateObject (\ set rs=server.CreateObject (\ sqlstr=\
connstr=\ conn.open connstr
rs.open sqlstr,conn,1,2 '要添加数据，把参数改成了1,2 rs.addnew '告诉rs, 要添加一个空行 rs(\
rs(\ '给要添加的行的一个字段赋值 rs(\
rs(\ '同上 rs(\ '同上 rs(\
rs.update '通知rs,要把这个行写入数据库 response.Redirect(\ '定向到信息输入界面 %> （3）“lx615_list.asp”程序如下：
<%
'将Recordset 输出成HTML 的“表格”
5