欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

一个测试数据库连接的函数

程序员文章站 2022-07-02 15:37:45
以前一直困扰我的一个问题,如何判断连接是否成功(比如sql没有启动,数据库不存在等),实现友好的错误处理,但vbscript的错误处理机制实在太差,只有on error resume nex/go...
以前一直困扰我的一个问题,如何判断连接是否成功(比如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