UC知道Asp数据库连接代码分析！
来源：百度知道 编辑：UC知道 时间：2024/05/25 04:21:33
<%
dim conn,connstr,time1,time2,mdb
time1=timer
mdb="mdb/db.mdb"
on error resume next
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If
%>
我是一个初学者，我想知道这些代码都代表什么意思！
dim conn,connstr,time1,time2,mdb
time1=timer
mdb="mdb/db.mdb"
on error resume next
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If
%>
我是一个初学者，我想知道这些代码都代表什么意思！
定义变量
dim conn,connstr,time1,time2,mdb
给变量赋值
time1=timer
mdb="mdb/db.mdb"
忽略脚本错误
on error resume next
利用asp内置对象建立数据库链接
Connstr="DRIVER=Microsoft Access Driver (*.mdb);DBQ="+server.mappath(mdb)
Set Conn=Server.CreateObject("ADODB.Connection")
conn.Open connstr
判断数据库链接是否成功，如果不成功就终止运行
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请检查连接字串。"
Response.End
End If