UC知道连接数据库代码，哪里错了？
来源：百度知道 编辑：UC知道 时间：2024/05/16 15:30:51
<%
dim starttime
starttime=timer()
On Error Resume Next
Dim rs,sql,Conn,Connstr,Db
Db="data/data.mdb" // 数据库连接地址及名称
Set conn = Server.CreateObject("ADODB.Connection")
Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'Connstr="Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
Conn.Open Connstr
If Err Then
response.write "<font size=""4"">·数据库连接错误....</font>"
Response.End
End If
Function CloseDatabase
Conn.close
Set Conn = nothing
End Function
%>
dim starttime
starttime=timer()
On Error Resume Next
Dim rs,sql,Conn,Connstr,Db
Db="data/data.mdb" // 数据库连接地址及名称
Set conn = Server.CreateObject("ADODB.Connection")
Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'Connstr="Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
Conn.Open Connstr
If Err Then
response.write "<font size=""4"">·数据库连接错误....</font>"
Response.End
End If
Function CloseDatabase
Conn.close
Set Conn = nothing
End Function
%>
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.mappath(db)& ";Persist Security Info=False"
这样写有局限性 你输出你的MAPPATH 打个比方 你调用CONN的文件在A文件夹的B文件内 而DATA文件夹跟A文件夹平级
你在B内调用CONN 就会出现如下代码
../A/DATA/DATA.MDB 显示错误 不是正确路径 数据库连接错误
一般我们都写
MAPPATH("../DATA/DATA.MDB") 你看看有没有帮助吧