你再帮我问一下VBScript是否连接上数据库要怎么测试
答案:2 悬赏:0 手机版
解决时间 2021-05-09 05:47
- 提问者网友：捧腹剧
- 2021-05-08 20:26
你再帮我问一下VBScript是否连接上数据库要怎么测试
最佳答案
- 五星知识达人网友：执傲
- 2021-05-08 21:48
判断一下连接状态是不是Open就知道了
全部回答
- 1楼网友：鱼芗
- 2021-05-08 22:43
用这段代码试试
<% 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 %>
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯