普宁垃圾场事件:为什么我用VF做的档案查询系统会显示“找不到对象表1”

来源:百度文库 编辑:神马品牌网 时间:2024/05/08 14:44:40
我设计的档案查询系统
其中有一个“删除记录”,运行时弹出对话框显示“程序错误:找不到对象表1”(我做的档案表的名字是“表1”)但其他的运行“第一条”“上一条”“下一条”“添加记录”的都正确!
程序如下:
do case
case this.value=1
goto top
case this.value=2
if ! bof()
skip-1
if bof()
goto bottom
endif
endif
case this.value=3
if ! eof()
skip+1
if eof()
goto top
endif
endif
case this.value=4
goto bottom
case this.value=5
append blank
case this.value=6
use e:\表1.dbf
delete for 表1.编号=thisform.text1.value
pack
case this.value=7
browse noappend
case this.value=8
endcase
thisform.text1.refresh
thisform.text2.refresh
thisform.text3.refresh
thisform.text4.refresh
thisform.text5.refresh
thisform.text6.refresh
thisform.text7.refresh

“删除记录”的程序是
case this.value=6
use e:\表1.dbf
delete for 表1.编号=thisform.text1.value
谢谢大家啦

delete for 表1.编号=thisform.text1.value
确保thisform显示为蓝色