vfp 9如何取得当前文件运行目录 - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → vfp 9如何取得当前文件运行目录

标题：vfp 9如何取得当前文件运行目录

只看楼主

dzy123

等　级：蝙蝠侠
威　望：5
帖　子：379
专家分：820
注　册：2013-4-18
结帖率：82%

楼主

已结贴√ 问题点数：20 回复次数：6

vfp 9如何取得当前文件运行目录

搜索更多相关主题的帖子: 如何　

2013-05-19 19:26

hu9jj

来　自：红土地
等　级：贵宾
威　望：396
帖　子：11713
专家分：43267
注　册：2006-5-13

第 2 楼

得分:0

sys(2003)

活到老，学到老！ http://www. E-mail:hu-jj@

2013-05-19 19:31

dzy123

等　级：蝙蝠侠
威　望：5
帖　子：379
专家分：820
注　册：2013-4-18

第 3 楼

得分:0

不是这个这个是取得默认目录，我想是exe的文件目录

2013-05-19 19:33

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 4 楼

得分:0

SYS(5)+SYS(2003)

2013-05-19 19:42

dzy123

等　级：蝙蝠侠
威　望：5
帖　子：379
专家分：820
注　册：2013-4-18

第 5 楼

得分:0

我想到了应是这样的
TGT=SUBSTR(SYS(16),AT(":",SYS(16))-1)
TGT=LEFT(TGT,RAT("\",TGT))

2013-05-19 19:43

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 6 楼

得分:20

PUBLIC LCSys16,LCNowpath
LCSys16=SYS(16) &&获取当前程序所在的全路径，包括当前运行程序名。
LCNowpath=LEFT(LCsys16,RAT("\",LCSys16,1)) &&获取当前运行程序所在工作目录。
messagebox(LCNowpath) &&程序文件所在的当前路径

2013-05-19 19:44

j132222

等　级：新手上路
帖　子：16
专家分：0
注　册：2010-10-8

第 7 楼

得分:0

谢谢版主，原来是路径问题

2016-05-09 09:50

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-407499-1-1.html