最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
一个测试数据库连接的函数(原创)
时间：2022-06-30 10:25:20 编辑：袖梨 来源：一聚教程网
以前一直困扰我的一个问题，如何判断数据库连接是否成功(比如sql没有启动，数据库不存在等),实现友好的错误处理，但vbscript的错误处理机制实在太差，只有on error resume nex/go to，但往往使用ADO的错误陷阱后，等待你的将是脚本超时，这个函数将改变这一状况（连接超时长短可以自己根据实际情况控制）
'入口参数：连接字符串strconn
'返回值：TestConnection=true,false
Function TestConnection(strconn)
On Error Resume Next
set conn=server.createobject("adodb.connection")
'这里设定连接超时为10秒
conn.ConnectionTimeout=10
conn.Open strconn
If conn.Errors.Count = 0 Then
TestConnection = True
conn.close
Else
TestConnection = False
End If
set conn=nothing
End Function
'入口参数：连接字符串strconn
'返回值：TestConnection=true,false
Function TestConnection(strconn)
On Error Resume Next
set conn=server.createobject("adodb.connection")
'这里设定连接超时为10秒
conn.ConnectionTimeout=10
conn.Open strconn
If conn.Errors.Count = 0 Then
TestConnection = True
conn.close
Else
TestConnection = False
End If
set conn=nothing
End Function
相关文章
- 《永夜降临：复苏》伊丽莎白有哪些 06-16
- 《斗罗大陆：史莱克学院》快速升级有哪些 06-16
- 《异界事务所》装备属性强化怎样 06-16
- 《零之战线》黑豹强度表现如何 06-16
- 《无限暖暖》蓝色跃动设计图位置怎么找 06-16
- 《出发吧麦芬》金色歌剧院副本怎么通关最快 06-16