pb中,有什么办法判断当数据库服务器与客户端连接断开时,客户端立即就可以知道?该如何处理

pb中,有什么办法判断当数据库服务器与客户端连接断开时,客户端立即就可以知道?
如题,我们看股票的行情软件,当客户端与服务器一断开后,客户端马上就能得到连接中断的信息,并显示目前处于中断的情况。

那么在PB中,我们用什么方法能实现这一功能,注意是与数据库服务器的连接,而不是网络本身。

我的想法是:在主窗口中,启用timer事件,设定时间间隔与服务器数据库进行通讯(用dbping命令可以吗?),如果连接不成功,就对一个全局变量“连接变量”进行修改,而每次需要连接数据库时(比如查询、更新时)都检查这个全局变量,如果其状态为断开,则需要重新连接。

各位还有什么更好的办法?

------解决方案--------------------
或许是通过查询了数据库中的什么数据来判断的吧
------解决方案--------------------
Function ulong InternetGetConnectedState( REF ulong lpdwFlags, ulong dwReserved ) LIBRARY "wininet.dll"

uLong lul_connection

lul_connection = 7
Return InternetGetConnectedState( lul_connection, 0 )
//= 0 //不通
//= 1 //拨号连通
//= 2 //网络连通
//= 4 //proxy连通