关于删除记录时表要以独占方式打开的问题

loveno1 2003-08-28 02:38:14
具体情况如下

在一个form里,有一个Grid和一个表绑定在一起,有几个textbox,通过一个“确定”按钮 向Grid里添加这些记录。

我还有一个 “退出” 按钮,退出的时候,我想把这个Grid里的记录全部删除,可是总是提示我文件必须以独占方式打开,或者就是文件正在使用。

我搜索了以前的帖子,可是很多方法都试了,解决不了。

“确定” 里 添加记录的代码如下

select tmp

append blank
replace 时间 with alltrim(thisform.text3.value)
replace 工资 with val(alltrim(thisform.text1.value))
replace 存入银行 with val(alltrim(thisform.text2.value))
replace 备注 with thisform.edit1.value

“退出” 的代码如下

if used("tmp")
select "tmp"
else
select 0
use "tmp"
endif
delete all
pack

“确定” 代码里的打开数据库的方法我也试了
if used("tmp")
select "tmp"
else
select 0
use "tmp"
endif

这个方法,还是不可以

请问各位,这个问题应该如何解决, 谢谢
...全文
279 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
wxjUN 2003-08-29
  • 打赏
  • 举报
回复
数据环境?有没有?

既然是“退出”,如果实在不行就把它CLOSE ALL
然后再打开。

close all
use tem excl
zap

fj_jiangqi 2003-08-28
  • 打赏
  • 举报
回复
如何无法独占打开,一定是有被其它地方打开。查查看。
-------------------------
我流落在凄凉的世界里-孤苦伶仃
我过着动荡无助的生活-四处漂泊
loveno1 2003-08-28
  • 打赏
  • 举报
回复
不行啊~~

还有哪位帮帮忙啊
fj_jiangqi 2003-08-28
  • 打赏
  • 举报
回复
use tem in 0 excl要完全独占打开,不能用again参数,这个参数会按前面一个已打开的方式来打开。
全部删除可以用zap
-------------------------
我流落在凄凉的世界里-孤苦伶仃
我过着动荡无助的生活-四处漂泊
loveno1 2003-08-28
  • 打赏
  • 举报
回复
magnetmoon(天涯明月刀) 的方法不行啊,还是提示我“文件必须以独占的方式打开”

怎么解决我,希望大家帮忙啊~~ 急~~~ 谢谢
magnetmoon 2003-08-28
  • 打赏
  • 举报
回复
“退出” 的代码如下

if used("tmp")
select "tmp"
else
select 0
use "tmp"
endif
delete all
pack

....
if used("tmp")
use in tmp
use tmp in 0 again excl
endif
select tmp
delete all
pack
loveno1 2003-08-28
  • 打赏
  • 举报
回复
临时表? 我的意思就是一个临时用的

你是你怎么做的?
95000100 2003-08-28
  • 打赏
  • 举报
回复
为什么要删除呢,我是建一建临表,用后就没了

2,749

社区成员

发帖
与我相关
我的任务
社区描述
VFP,是Microsoft公司推出的数据库开发软件,用它来开发数据库,既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧