连编的苦恼
我是新手，连编前就知道VFP会出现各种问题，于是连编前查了很多资料，看了很多教程，终于把主程序写出来了，自认为万无一失，可是第一次运行后提示“无效路径”,除此之外一切正常。郁闷啊，我的路径只写了两句:
set defa to sys(5)+sys(2003)
set path to sys(5)+sys(2003)
请高手指点一下，这个路径会出错吗、、、、
[解决办法]
看看我的开始程序代码，VFP参考一下：
* ================================================================= \\ 【设置系统环境】 SET EXCLUSIVE OFF SET TALK OFF SET SAFETY OFF SET DELETED ON SET EXACT ON SET ESCAPE OFF SET LOCK OFF SET NULLDISPLAY TO '' SET CENTURY ON &&指定日期的年为4位数 SET DATE AMERICAN && 月日年 SET HOURS TO 24 && 时间为24小时制 SET SYSMENU OFF &&关闭系统菜单 SET NOTIFY off CLEAR CLEAR ALL * --------------------------------------------- \\ 获得当前系统目录 DECLARE LONG GetSystemDirectory IN WIN32API STRING @ , LONG DECLARE LONG GetWindowsDirectory IN WIN32API STRING @ , LONG DECLARE LONG GetCurrentDirectory IN WIN32API LONG , STRING @ public LCSYSDIR , LCWINDIR , LCCURDIR , LNSTRINGLEN,n_dy LCSYSDIR = SPACE(200) + CHR(0) LCWINDIR = SPACE(200) + CHR(0) LCCURDIR = SPACE(200) + CHR(0) LNSTRINGLEN = GETSYSTEMDIRECTORY(@LCSYSDIR,200) LCSYSDIR = LEFT(LCSYSDIR,LNSTRINGLEN) LNSTRINGLEN = GETWINDOWSDIRECTORY(@LCWINDIR,200) LCWINDIR = LEFT(LCWINDIR,LNSTRINGLEN) LNSTRINGLEN = GETCURRENTDIRECTORY(200,@LCCURDIR) LCCURDIR = LEFT(LCCURDIR,LNSTRINGLEN) Sys(987,.T.) && 汉字兼容 set defa to &lccurdir _SCREEN.WINDOWSTATE = 1* ================================================================== \\ 【执行主程序】 DO FORM cx\sys_kl READ event CLEAR CLEAR ALL CLOSE all QUIT
[解决办法]
子程序中是不是设置了路径。其实我认为主程序中路径设置不设置无所谓，设置不当，出错后查找更麻烦。
另外，主目录下，是否还有文件夹。
仔细查下上面几地方。
[解决办法]
个人认为完全没必要写这两句
因为写不写系统总是会把sys(5)+sys(2003)作为默认路径的
如果楼主的项目有规划的话,应把数据/程序/表单分别放在不同的文件夹下,假设为file1,file2,file3...
比如楼主的数据库放在file1的文件夹下
那么打开表就是use file\表名 in 0
对了,楼主做得是单机还是联机啊 这个是有区别哦...
希望我的回答对你有帮助.
最后,衷心希望楼主能多给点分,呵呵
