导读：access数据库教程连接代码 dim conn,connstr,timesdb,rs timesdb=../www.111cn.net/#tsm_admin_data.asp connstr=provider=microsoft.jet.oledb.4.0;data source= server.mappath(timesdb) 'on error resume next set conn = server.createobject(adodb.conn...
access数据库教程连接代码
dim conn,connstr,timesdb,rs
timesdb="../www.111cn.net/#tsm_admin_data.asp"
connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(""×db&"")
'on error resume next
set conn = server.createobject("adodb.connection")
conn.open connstr
if err then
err.clear
set conn = nothing
response.write "<center>数据库连接错误，请检查conn.asp文件连接字符串！</center>"
response.end
end if
set rs=server.createobject("adodb.recordset")
