代码分享

milk

要用连接数据库判断作操作的同学可以试试
define var aa as integer no-undo.
do aa = 1 to num-dbs with frame a :
disp  ldbname(aa)  pdbname(aa) format "x(50)" with frame a .
end.

adminelvis

这个可以有，需要动态链接数据库时很有用处