Question

测试conn.asp出错，提示“数据库连接出错，请打开conn.asp文件检查连接字串。”

源码为：
<%
Dim startime,Conn,db
Response.Buffer = True
startime = Timer()
'--定义数据库类别，1为SQL数据库，0为Access数据库
Const isSqlDataBase = 1
Dim NowString
Dim ConnStr

If IsSqlDataBase = 1 Then
Else
End If

Dim DBPath
'-- 采集数据库连接路径
DBPath = "/database/#collection.mdb" '-- 请用根相对路径

Sub ConnectionDatabase()
On Error Resume Next
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()
On Error Resume Next
If IsObject(Conn) Then
Conn.Close
Set Conn = Nothing
End If
Set Newasp = Nothing
End Sub
%>

Answer 1

你使用的是ACCESS数据库，Const isSqlDataBase 的值应该是 0

追问

的确是access数据库，但是，测试还是错误啊。
还是有错误啊
急救！

追答

你好，本地测试出错一般为三种情况：一是服务器问题，一是设置问题，一是网站问题（包括代码和文件的问题），只需一一排查即可。

Answer 2

数据库路径出错