我在VFP里弄了个部门调换的表单,但联编后点调换那个按钮是显示文件正在使用中这是我的代码,求高手帮忙

public x
select a
use 基本情况
select b
use 基本工资
select c
use 奖金福利
x=alltrim(thisform.txt部门代码.value)
replace 基本情况.部门代码 with alltrim(thisform.bu.value)
replace 基本工资.部门代码 with alltrim(thisform.bu.value)
replace 奖金福利.部门代码 with alltrim(thisform.bu.value)
thisform.refresh
表单运行是没问题的,只是联编以后才出现这个问题

哈哈,把use改成select就行了

代码基本没问题

问题出在这一句
x=alltrim(thisform.txt部门代码.value)
应该是 thisform.txt部门代码, 的数据源杯绑定在某一个表上了. 取消这个绑定试试
不是代码问题就是数据环境问题建议把代码改成标准的如:

public x
if !used('基本情况')
use 基本情况 in 0
endif
if !used('基本情况')
use 基本情况 in 0
endif

if !used('奖金福利')
use 奖金福利 in 0
endif
x=alltrim(thisform.txt部门代码.value)
replace 基本情况.部门代码 with alltrim(thisform.bu.value)
replace 基本工资.部门代码 with alltrim(thisform.bu.value)
replace 奖金福利.部门代码 with alltrim(thisform.bu.value)
thisform.refresh
温馨提示:内容为网友见解,仅供参考
第1个回答  2012-06-20
建议在thisform.refresh后面继续增加close all table之类的关闭所有已打开的表的命令,这样子就不会提示文件正在使用中了。
产生的原因也是因为你之前执行过表单,执行的时候,表已经打开了,再执行的时候就会提示文件在使用了

我在VFP里弄了个部门调换的表单,但联编后点调换那个按钮是显示文件正在...
代码基本没问题 问题出在这一句 x=alltrim(thisform.txt部门代码.value)应该是 thisform.txt部门代码, 的数据源杯绑定在某一个表上了. 取消这个绑定试试 不是代码问题就是数据环境问题建议把代码改成标准的如:public x if !used('基本情况')use 基本情况 in 0 endif if !used('基本情况')...

vfp,在没有联编成exe文件前,一切正常,可是生成后就会弹出“文件必须以独...
在你程序中,当某个数据表打开后需要对其进行处理时,必须以独占方式打开,否则就会出现上述问题。解决办法是:在你原来程序中,把相应的数据表打开语句后面加上“excl”,使之变成“use ***.dbf excl”的形式,再重新编译成exe即可。

vfp联编出现错误代码,怎么才能解决(急)
二者在显示方面的不同地位是:顶层表单在Windows任务栏上有一席之地,从属表单却没有这种待遇;顶层表单最小化时,从属表单随之被隐藏,当顶层表单关闭后,从属表单随之关闭。 ShowWindow的第三种选择"在屏幕中(默认)"仅是"在顶层表单中"的一个特例,即为"在_Screen这个特定的顶层表单中"之意,选择此种属性值时,它一定...

相似回答
大家正在搜