1

如果我试图在 FoxPro 中打开一个独占表,如果访问被拒绝,它会生成一个对话框。由于我的目标是非交互式应用程序,有没有办法检测操作是否会成功,或者至少让它静默失败?

4

3 回答 3

2

如果您有 VFP 8 或更高版本:

尝试
    使用 MyTable 0 独占
ENDTRY
...
如果使用(“我的表”)
    *-- 使用此处的表格
万一

于 2009-04-16T18:34:19.073 回答
1

对于旧版本:

cOldError = ON("ERROR")
ON ERROR *
USE MyTable IN 0 EXCLUSIVE
lSuccess = used("MyTable")
ON ERROR &cOldError

if lSuccess ...
于 2009-04-16T19:39:17.577 回答
0

我已经成功使用 FOPEN ......

nFHdl = FOPEN("myfile.dbf", 1)  &&  1 tries to open the file for writing
IF nFHdl > 0 THEN
   FCLOSE(nFHdl)
   USE myfile.dbf exclusive
ELSE
   = messagebox("Can't open Exclusive")
ENDIF
于 2009-11-04T16:58:50.710 回答