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

2016-01-29 20:21 3 1 收藏

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

【 tulaoshi.com - ASP 】

以前一直困扰我的一个问题,如何判断数据库连接是否成功(比如sql没有启动,数据库不存在等),实现友好的错误处理,但vbscript的错误处理机制实在太差,只有on error resume nex/go to,但往往使用ADO的错误陷阱后,等待你的将是脚本超时,这个函数将改变这一状况(连接超时长短可以自己根据实际情况控制)

'入口参数:连接字符串strconn
'返回值:TestConnection=true,false

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/)

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

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/)

来源:http://www.tulaoshi.com/n/20160129/1511060.html

延伸阅读
一直以来,ACCESS数据库中的申报数据在分公司与总公司之间传递,用EXCEL或DBASE、TXT甚至ACCESS等格式,我总觉得不太理想。最近看了一本书,不经意间发现了一个方法,使用ACCESS数据库生成申报数据与读入数据似乎简单了不少,特拿出来与大家分享。同时,也希望能得到更多的指点。 附上示例: Sub Mwrite() On Error GoTo thiserr ...
标签: PHP
  4.据库连接 通过PHP你可以轻松的连接到数据库,请求数据并将其显示在你的web站点中,甚至修改数据库中的数据。MySQL是一种很流行的数据库,并且在互联网中有许多有关PHP与MySQL的教程。MySQL是免费的,这一点也许就吸引了不少人。由于其广泛应用,我就不想在这里赘述MySQL的使用方法了。Oracle被大量在企业应用中采用,因此我们就利用O...
Function CreatePassWordDB(strPathName As String, strPsd As String) As Boolean On Error GoTo Exit_ERR Dim wrkDefault As Workspace Dim NewDB As Database CreatePassWordDB = False Set wrkDefault = DBEngine.Workspaces(0) If Dir(strPathName) "" Then Kill strPathName Set NewDB = wrkDefault.CreateDatabase(strPathName...
标签: Web开发
% '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% '数据库操作类 '%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% '名称:Class_DBOperate '版本:0.2 '作者:qihangnet '更新:2005年6月14日 '作用:简化数据库操作的流程 '授权:免费使用 '%%%%%%%%%%%%%%%%%%%%%%%%%%...
下面的示例创建一个 OracleConnection 和一个 OracleTransaction。它还演示了如何使用 BeginTransaction、Commit 和 Rollback 方法。 public void RunOracleTransaction(string myConnString){ OracleConnection myConnection = new OracleConnection(myConnString); myConnection.Open(); OracleCommand myCommand = myConnection.CreateCom...

经验教程

101

收藏

50
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部