实验七 AD0在ASP中应用

实验七 AD0在ASP中的应用

一、实验目的

了解ADO数据库访问技术。二、实验内容

活动数据对象ADO

连接数据库Connection对象检索数据Recordset对象三、实验步骤

【7-1】向a1.mdb数据库中添加一条新的记录。 <%

set cn1=Server.CreateObject(\'与ODBC中配置的数据源ql建立连接 cn1.Open\'SQL插入语句abc变量

abc=\女','20','1200','2222222','北京')\'执行SQL语句 cn1.execute(abc)

response.Write(\插入成功!\cn1.close set cn1=nothing %>

【7-2】更改a1.mdb数据库中姓名为“tx”的记录,将其改名为“小陶”。 <%

set cn1=Server.CreateObject(\'采用直接连接数据源的方法

cn1.Open\Server.MapPath(\

'执行SQL语句,直接将SQL语句书写在execute后

cn1.execute(\小陶' where name='tx'\response.Write(\更新成功!\cn1.close set cn1=nothing %>

【7-3】查询并显示a1.mdb数据库中的记录(只显示了S表中的第一条记录的数据)。 <%

set cn1=Server.CreateObject(\

cn1.open\Server.MapPath(\

Set rs=server.Createobject(\rs.open\%>

姓名为:<% =rs(\年龄为:<% =rs(\工资为:<% =rs(\<% rs.close set rs=nothing %>

【7-4】查询并显示a1.mdb数据库中的所有记录。 <%@LANGUAGE=\<%

Dim filepath,cn1,sql,rs

filepath=Server.MapPath(\

Set cn1=Server.CreateObject(\

cn1.Open\sql=\Set rs=cn1.Execute(sql) %>

用户情况表