PB6.5 里如何判断数据库是否已经连接?

[xyzhh]

(注意:不是判断连接是否成功)

[jdsnhan]

正规的方法不知道。
可以这样：无论什么时候，想判断了，就执行connect,此时，
如果已经连接，则sqlca.sqlcode = -1,sqlca.sqlerrtext = 已经连接上；
如果没有连接，这时，那就去连接了。

[jdsnhan]

也可以通过dbhandle(sqlca)判断，如是零，则没连接，否则，连接。

[strawberryyeah]

随便写一个可以从数据库中提取数据的函数，如果函数返回值了，那就说明连接成功了。

[pbMaster]

如果是oracle可以这样判断：
select sysdate into :ldt_temp from dual;
如果sqlca.sqlcode=-1，那么一般是没连上！