作者:淡水鱼yw灬s | 来源:互联网 | 2023-06-04 14:04
系统为WindowsServer2003EnterpriseEdition,之前还好好的,现在打开网站出现“数据库连接出错,请检查连接字串……”的出错提示(预设的出错提示),数据库文件路径没有
系统为Windows Server 2003 Enterprise Edition,之前还好好的,现在打开网站出现“数据库连接出错,请检查连接字串……”的出错提示(预设的出错提示),数据库文件路径没有改变,字符串也没有错误,网站之前一切正常。重启电脑和IIS也解决不了问题,数据库和连接字符串都没错的情况下还有哪些情况导致数据库连接出错呢?
之前清理过系统的一些临时文件,是不是这里出了问题?还有就是防火墙的阻止访问,好像也没看到有阻止访问ACCESS了,不解中……
9 个解决方案
改成 Response.Write "" & err.description & ""结果网页上面什么内容都没有;改成Response.Write 数据库连接出错,请检查连接字串……则显示“数据库连接出错,请检查连接字串……”
代码如下:
<%@ LANGUAGE = Vbscript CodePage = 936%>
<%
Option Explicit
Response.Buffer = True
Dim Startime
Dim SqlNowString,bbs,template,MyBoardOnline
Dim Conn,Plus_Conn,Db,MyDbPath
Const fversion="7.1.0 Sp1"
Const EnabledSession= True
Startime = Timer()
Const MsxmlVersion=".3.0"
Const IsSqlDataBase = 0
MyDbPath = ""
If IsSqlDataBase = 1 Then
Const SqlDatabaseName = "bbs"
Const SqlPassword = "bbs"
Const SqlUsername = "bbs"
Const SqlLocalName = "(local)"
SqlNowString = "GetDate()"
Else
Db = "data/db.mdb"
SqlNowString = "Now()"
End If
Const IsDeBug = 1
Set bbs = New Cls_Forum
Set template = New cls_templates
Sub ConnectionDatabase
Dim ConnStr
If IsSqlDataBase = 1 Then
ConnStr = "Provider = Sqloledb; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial
Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";"
Else
ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(MyDbPath & db)
End If
On Error Resume Next
Set conn = Server.CreateObject("ADODB.Connection")
'Response.Write ConnStr
conn.open ConnStr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "" & err.description & ""
Response.End
End If
End Sub
%>
啊, ASP ...
还同时用 Access 和 SQL ....
输出你的连接字符串 看看是否正确撒
改成 Response.Write err.description & " " & ConnStr
结果显示:未指定的错误 Provider = Microsoft.Jet.OLEDB.4.0;Data Source = D:\bbs\Data\db.mdb
这个路径是正确的
我的网站也碰到同样的问题,不过奇怪的是,过个10分钟左右就可以了,是不是多用户的时候Access毛病多
http://www.lanxingkong.net/blog/article.asp?id=254