为什么老是提示文件形式要以独占形式打开呀?

[96996]

我用dele语句删除数据库的语句,接着用pack,我的目的是永久删除,不是逻辑删除
if thisform.text1.value=' ' and thisform.text2=' 'then
messagebox('部门没有填写',0,'提醒')
else
number1=thisform.text1.value
number2=thisform.text2.value
go 1
delete from bm where bm=number1 and number=number2
messagebox('该部门被删除',0,'提醒')
endif
thisform.refresh
pack
do form bm.scx

哪位兄台帮我看看是这么回事或者教我到底这么永久删除语句.

[westbulls]

你的表只有是用
use 表名 exclusive
方式打开才可以使用
pack和zap命令
如果你的表在数据环境中，请将exclusive设置为.t.

[yang505412]

建议你打开表的时候用
SELECT 表名
就不会有这个问题了

[流星尔]

一楼的回答正确，涉及到pack操作必须独占打开表。