高校问答dj枫枫:关于ASP连接Access数据库，谁能给个具体步骤？
来源：百度文库 编辑：高校问答 时间：2024/05/05 00:45:47
我不太熟悉，怎么用，现在表单已经建立好，代码我也知道，这么做，详细的步骤能给一个吗？
代码如下
<%
dim conn,rs,sql,strConn
'建立数据连接
strConn="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("db1.mdb")
conn.open strConn
'建立记录集
rs=server.CreateObject("Adodb.Recordset")
Sql="Select dID from Date"
rs.open sql,conn,1,1 '最后两个数字表示只读，不锁定。
'记录已经建立，可以开始使用
if rs.eof or rs.bof then
'表中无记录
'添加你的处理代码
else
'有记录
do while not rs.eof
'输出所有记录
response.write("ID=" &rs("dID") &"<br>")
rs.movenext
loop
end if
'最后释放资源
rs.close
conn.close
set rs=nothing
set conn=nothing
%>
－－－－－－－－－－－－－－－－－－－－－－－－－
补充：
楼下的说得很对，我忘了这点了。因为平常我都把数据库连接放在一个单独得文件里供其他文件调用得，所以。。呵呵。见笑了。
以上基本正确，但有个小问题：
conn 变量没有创建
在strConn="provider=microsoft.jet.oledb.... 前加一句话
set conn=server.CreateObject("Adodb.Connection")
否则会出错