主题：[讨论]VFP下的自创目录问题
妙计山人
[专家分：130] 发布于 2009-08-27 20:11:00
本人的预算软件可以同时保存多个项目文件（一个项目包含许多个数据表，这是VFP的最大缺陷），但所有这些文件目前都存放在系统的一个目录里，是为遗憾。最近本人意欲如图示分类管理，不知这种思路在VFP中是否可行？难度究竟又有多大呢？
回复列表 （共8个回复）
沙发
homayzh [专家分：7040] 发布于 2009-08-28 08:15:00
可以，肯定是可以的！你了解下
md ，getdir()，DIRECTORY()
这三个命令，你就应该会了！
板凳
妙计山人 [专家分：130] 发布于 2009-08-28 08:57:00
有了小兄弟的这番话，山人便有了优化程序的的动力。谢谢。
顺便说一下，前番有位老兄提到“GetFile()”这个函数，山人早前很少用，软件中所导入的“EXCEL清单”，往往是在固定的目录下完成的，这自然很受局限，这几天经过反复测试，终于摆脱了这些限制。
来到贵坛刚好一周，通过与诸位的交流，受益颇丰，再次对诸位的不吝赐教表示诚挚的谢意！
3 楼
homayzh [专家分：7040] 发布于 2009-08-28 09:02:00
这个是getDir()是取目录的！你所说的是getFile()是文件名。
你看看帮助getdir()的用法。
md 你肯定知道 建立目录
DIRECTORY() 是判断目录是否存在
我想有了这几条命令，你的目录肯定达到了。
set path to 命令能使操作文件更方便！
4 楼
妙计山人 [专家分：130] 发布于 2009-08-28 09:14:00
GetFile()是另外一位朋友告知山人的，以前虽也似曾相识，但总觉得离自己的要求相距甚远，是故敬而远之了。其实好多东西在真正动手之前总感觉很畏惧，可是一旦投入进去了，反倒觉得原来并非有想象的那么困难。
5 楼
妙计山人 [专家分：130] 发布于 2009-08-28 09:20:00
补充一点，我所要建的目录应该是动态的，换言之，用户“新建”时通常只输入“项目文件”名称，系统应根据用户的“项目文件”来创建目录，并存放相关的报价文件（比如清单、定额、定额用量、取费、工料机单价等）。若是“打开”项目，则原有的这些报价文件要自动转换到系统中来。
6 楼
homayzh [专家分：7040] 发布于 2009-08-28 09:35:00
寡人是现代人！莫非足下是从三国时期来的？望与交流时请使用我们现代汉语，否则足下之意，吾不能懂也！！好是费劲。
孤了解足下之意，足下可用[color=0000FF]GetDir（）[/color]
如
GETDIR(SYS(5)+SYS(2003),"输入目录名",'新建目录',64)
或，你也要以用
apath = INPUTBOX("输入目录名：",'新建目录')
if dire(apath)
messagebox("目录已存在！")
cd &apath.
else
messagebox("目录不存在！现在建立")
md &apath.
endif
.......
.......
7 楼
妙计山人 [专家分：130] 发布于 2009-08-28 10:26:00
看来是“山人”一词很让阁下大为光火。山人一词从联坛杀到股坛，叫顺口了。名称仅仅是个称谓而已，何必那么较真呢？
8 楼
homayzh [专家分：7040] 发布于 2009-08-28 11:06:00
这是问题不用再讨论，我关心你的问题解决了吗
我来回复
您所在位置：社区首页 — Visual Foxpro讨论区 — [讨论]VFP下的自创目录问题