如何判断ado的连接状态

Question

在网络中如何判断ado是否连到sql server

Answer 1

if ADOConnection.Connected then
  ShowMessage('Connected');

Answer 2

不建议使用1楼的方法，并不是每次ADO连接中断能用Connected来判断建议和异常捕捉和Connected一起判断、使用

Answer 3

1、利用错误陷阱进行判断，代码如下： 
     on error resume next 
     err.clear 
     dim mycn as new adodb.connection 
     set mycn = new adodb.connection 
     mycn.open "dsn=abc;uid=uidstr;pwd=pwdstr" '此处以odbc举例。 
     if err.number = 0 then 
     '数据库打开成功 
     else 
     '打开失败 
     end if 
    2、与上问类似，添加ado控件后， 不要设置关于连接的属性。 
     on error resume next 
     err.clear 
     Adodc1.CommandType = adCmdtable 
     Adodc1.ConnectionString = "dsn=abc;uid=uidstr;pwd=pwdstr" '此处以odbc举例。 
     Adodc1.RecordSource = "table1" 
     Adodc1.Refresh 
     
     if err.number = 0 then 
     '数据库打开成功 
     else 
     '打开失败 
     end if 

Answer 4

楼上的是用VB
Delphi代码怎么写

Answer 5

if ADOConnection.Connected then
  ShowMessage('Connected');
并可靠，
QWERT520(别来无恙) 的代码也不行。
有时 sql server 会ADOConnection.Connected 时也失去连接的。 
我的解决办法是：如查没有连接则重连（这里就要做好多的文章了）。
你可以参考 sql server 说明.

Answer 6

to:楼上的
SQL Server 查哪个关键字作帮助