我在表单"Load"中设置
CLEAR MEMORY
PUBLIC RQ
OPEN DATABASE DATA\dbgl
IF .NOT.USED("jbxx_mx")
    SELECT 0
  USE jbxx_mx
ENDIF
IF .NOT.USED("yhsb_ls")
 SELECT 0
 USE DATA\yhsb_ls EXCL
ENDIF
在表单"Destroy"中设置为:

SELECT yhsb_ls
delet all
PACK
*SELECT jbxx_ls
*delet all
*PACK
CLOSE DATA
CLEAR MEMO

可运行表单时仍提示: pack "文件应以独占方式打开",我已经用了"Exclusive"命令了请问这是为什么?

[[it] 本帖最后由 cyzmdm 于 2008-3-6 21:24 编辑 [/it]]

你在表单的数据环境中，点击表，在属性窗口中 设exclusive属性为.T.
就可以了

谢谢!我成功了!