主题:无法删除问题
老师,你好,
我用一个表单对一个营销人表进行输入管理,因为编号要惟一,所以在营销人编号的TEXT的VALID事件中加入了local array acount(1)
select count(*) from d:\jxkh\yxr where allt(营销人编号)==allt(thisform.text1.value) into array acount
if acount(1)>1
messagebox ("编号不能重复!请重新输入")
return
endif
现在在使用删除按钮时,代码如下dele
pack
thisform.refresh
显示错误为文件必须以独占方式打开,这种情况怎么办?
我用一个表单对一个营销人表进行输入管理,因为编号要惟一,所以在营销人编号的TEXT的VALID事件中加入了local array acount(1)
select count(*) from d:\jxkh\yxr where allt(营销人编号)==allt(thisform.text1.value) into array acount
if acount(1)>1
messagebox ("编号不能重复!请重新输入")
return
endif
现在在使用删除按钮时,代码如下dele
pack
thisform.refresh
显示错误为文件必须以独占方式打开,这种情况怎么办?