Question

打开网页提示“数据库连接出错，请打开conn.asp文件检查连接字串。”，求高手解决

下面是我是conn.asp文件的内容，请求高手指点
<%
'Option Explicit
Response.Buffer = True
Dim Conn,Connstr,Db
Db = "data/taisen.mdb" '数据库路径
Sub ConnectionDatabase()
On Error Resume Next
Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & webapp & Db
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open Connstr
If Err Then
Err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错，请打开conn.asp文件检查连接字串。"
Response.End
End If
End Sub

Sub CloseConn()
Conn.close
Set Conn = Nothing
End Sub
%>

Answer 1

Connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & webapp & Db
改为
Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(Db)
试下

追问

试了一下结果显示“糟糕，网页无法显示”

追答

显示“糟糕，网页无法显示” 说明连接已正常

连接不正常应该显示 "数据库连接出错，请打开conn.asp文件检查连接字串。"