你再帮我问一下VBScript是否连接上数据库要怎么测试

你再帮我问一下VBScript是否连接上数据库要怎么测试

判断一下连接状态是不是Open就知道了

用这段代码试试

<%     dim ConnObj     dim ConnString     dim Rs     dim SqlString           Set ConnObj = Server.CreateObject("Adodb.Connection") '    ConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Test.mdb")     ConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Test.mdb")           On Error Resume Next         ConnObj.Open ConnString           If err.Number<>0 Then         Response.Write("错误信息<br>")         Response.Write("错误编号：" & err.Number & "<br>")         Response.Write("错误信息：" & err.Description & "<br>")         On Error Goto 0     Else         Response.Write("连接成功！")     End IF '    ConnObj.Open ConnString Then %>

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息