你的“do form kfyd”是打开当前路径下的“kfyd”表单,如果“kfyd”不在当前目录下,就显示文件不存了,这是用绝对路径方法,如文件夹移动过就无法找到了。
最好的把要设计的程序放在一个总文件夹内,里面再分为“表单”(FORM)、”表“(DBF)、程序(PRG)等文件夹,把文件分类放置在这些文件夹内。并使用相对路径,只要你设计的总文件夹整体移动或到其他电脑,都能找到所指定的文件。
在程序前面加入:
PUBLIC LCNowpath
LCNowpath=right(justpath(sys(16)),RAT("\",sys(16))-AT("\",sys(16))+3) && 获取表单运行的当前路径
SET PATH to &LCNowpath;&LCNowpath\dbf;&LCNowpath\FORM &&设置搜索路径
do form &LCNowpath\FORM\kfyd &&打开当前(相对)路径中”FORM“目录下的”kfyd“表单。