我的代码是这样的：
close tables
bf=thisform.lj.value
copy file *.dbf to "&bf\*.dbf"
copy file *.fpt to "&bf\*.fpt"
copy file *.cdx to "&bf\*.cdx"

自己运行的时候没问题，连编以后就会报错，说文件正在使用。
请问哪里有问题？

第一句应为
close database
这样写就对了

bf=thisform.lj.value
这一句不要

copy file *.dbf to "&bf\*.dbf"
改为:
copy file sys(5)+"\......\......\*.dbf" to sys(5))+"\......\......\*.dbf"
其它类推

close all
bf=ALLTRIM(thisform.lj.value)
IF !EMPTY(BF)
copy file *.dbf to "&bf.*.dbf"
copy file *.fpt to "&bf.*.fpt"
copy file *.cdx to "&bf.*.cdx"
ELSE
MESSAGEBOX("路径不存在，不能完成复制")
ENDIF
*说明，要是bf里面以"\"结尾的话，就去掉上述语句中的"\"。
*为了保证总是得到以"\"结尾的文件夹,且该文件夹是存在的，
*建议文本框是只读的，且通过命令按钮实现
*如命令按钮的CLICK里这样写
THISFORM.LJ.VALUE=GETDIR()
*或者只规定要复制到的文件夹总是F:\BACKUP,则可表单初始化里写上
THISFORM.LJ.VALUE="F:\BACKUP\"

谢谢，可是连编以后运行的时候系统还是会报错，说文件正在使用。请问这是哪里出问题了？

是你有的库没有关掉，我也这么用过，也不好使!不知道为什么，好像是那个foxusr.dbf在使用吧!