数据库连接错误,请检查字符串

来源:百度知道 编辑:UC知道 时间:2024/05/31 03:48:17
下了一个源码 本地测试时候出现 “数据库连接错误,请检查字符串”
conn.asp里面的代码如下
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style><%
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DB_set)
'如果你的服务器采用较老版本Access驱动,请用下面连接方法
'connstr="driver={Microsoft Access Driver (aaaaa#3334@.asa)};dbq=" & Server.MapPath(DB_set)
conn.Open connstr
If Err Then
Err.Clear
Set conn = Nothing
Response.Write "<br><br><br><center><font style=color:red;font-size:9pt;><b>数据库连接出错,请检查连接字串!</b></font></center>"
Response.End
End If

sub CloseConn()
On Error Resume Next
If IsObject(Conn) Then
conn.close
set conn=nothing
end if
end sub
Const Vers

<%
Set conn = Server.CreateObject("ADODB.Connection")
On Error Resume Next
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("aaaaa#3334@.asa")
%>
<%
If Err.Number <> 0 Then
Err.Clear
conn.Close
Response.Write("数据库连接错误!请检查连接字串")
End If
%>