我做的VF，需要查询的内容很多，有几个临时表和对应的报表。现在在录入表单上（从数据表表单向导做的，文本框）想删除一条内容，用删除健后，出现“临时表处于表缓冲方式下的表，不能发布此命令”。调试器指向pack。
代码是：
sc=pack
if sc=6
delete
pack
&go bottom
go top
thisform.refresh
endif

用独占方式打开表：
use 表 EXCLUSIVE

收到的鲜花

• hao710 于 2008-10-14 08:34 送鲜花  3朵  

qjbzjp老师
我按你说的，加了
if sc=6
use 数据表 EXCLUSIVE
delete
pack
&go bottom
go top
thisform.refresh
endif

delete
pack
&go bottom
go top
thisform.refresh
endif

提示文件正在使用

没有下头的代码

删除时没有刚才的提示了，但删除不了，这个内容还在

if used("数据表")
   sele 数据表
　 use
endif
use 表 EXCLUSIVE

[[it] 本帖最后由 qjbzjp 于 2008-10-13 10:28 编辑 [/it]]

收到的鲜花

• hao710 于 2008-10-14 08:34 送鲜花  3朵  

哈哈，删除是删除了，但是从第一个、第二个删除的。但我想删除的内容还在

仔细检查一下，要删除记录的删除标记打错了！

收到的鲜花

• hao710 于 2008-10-14 08:35 送鲜花  3朵  

老师
删除记录的删除标记是sc么，还是别的呢？
sc=messagebox('确实要删除本条记录吗？',4,'删  除  警  示　窗　口')
use 数据表 EXCLUSIVE
IF sc=6
   DELETE
   PACK
*    GO  bottom
   GO top
    thisform.refresh
ENDIF

已标志删除的记录，在grid刷新时不要显示（sele命令加上deleted()=.f.）。在表单退出时将记录pack，这才是正确的做法。