dbused( ) 函数示例

下面的示例打开 testdata 数据库，然后用 dbused( ) 函数确定数据库 testdata 和另一个名为 test 的数据库是否打开。

close databases
open database (sys(2004) + "samples\data\testdata")

clear
? 'testdata database open? '
?? dbused('testdata') && 显示 .t.
? 'test database open? '
?? dbused('test') && 显示 .f.