请教：如何判断与数据库是连接状态还是断开？
Dim rs As ADODB.Recordset
Dim cnn As ADODB.Connection
Dim strcnn As String
if **********(连接状态) then
cnn.close
end if
问题点数：10、回复次数：3Top
1 楼flyingZFX（卍 南无阿弥陀佛 卍）回复于 2005-03-04 09:58:16 得分 10
首先要说明的一点就是
通过 cnn.State 这个属性来判断 连接对象的 状态时，有时候不准确。。
我通常是通过以下的方法来判断 连接状态的。
public function ConnState(conn as adodb.connection ) as Booleam
on error goto err1
conn.execute "select 1",,adcmdtext '仅限 MSSQL
ConnState = True
Exit Function
err1:
err.clear
ConnState = False
end functionTop
2 楼flyingZFX（卍 南无阿弥陀佛 卍）回复于 2005-03-04 09:59:07 得分 0
我想这个函数的意思，楼主是应该可以看明白的吧。。
Top
3 楼pcwak（）回复于 2005-03-04 10:02:45 得分 0
conn.StateTop
