getfile()能否打开指定文件夹后选取文件？

zhousr 发布于 2021-03-25 11:49， 2175 次点击

我要获取的文件是　E;\志愿筛选系统\usertable\志愿信息表2.xlsx，点击“获取数据”按钮，“打开”对话框中只显示到“志愿筛选系统”这一级（见图一），而我希望的结果是继续打开到“usertable”这一级，以便直接从“usertable”文件夹中选取所需文件（见图二）。
我在main.prg中的设置是：
lj=JUSTPATH(SYS(16,1))
SET DEFAULT TO (lj)
SET PATH TO usertable

查了getfile()的帮助，好像也没有相应的参数可以设置。

请教方家，用getfile()有没办法直接打开第二级目录呢？

只有本站会员才能查看附件，请登录

7 回复

wengjl2021-03-25 12:31

在图一的时候，鼠标双击　文件夹usertable　不就到了嘛

zhousr2021-03-25 12:36

没错，谢版主！
如能直接打开文件夹usertable，我可以少点一次鼠标

想要此功能，纯粹想偷懒而已

如能实现，也是增长了知识

sdta2021-03-25 12:43

如果 E:\志愿筛选系统\usertable\ 是固定的，可以这样设置代码
oldPath = SYS( 5) + CURDIR()
newPath = SYS(5) + "\志愿筛选系统\usertable\"
SET DEFAULT TO (newPath)
getfile()
<写自己需要的代码>
SET DEFAULT TO (oldPath)

zhousr2021-03-25 13:35

以下是引用sdta在2021-3-25 12:43:15的发言：

如果 E:\志愿筛选系统\usertable\ 是固定的，可以这样设置代码
oldPath = SYS( 5) + CURDIR()
newPath = SYS(5) + "\志愿筛选系统\usertable\"
SET DEFAULT TO (newPath)
getfile()
<写自己需要的代码>
SET DEFAULT TO (oldPath)

真高手！！！思路非常好，完美解决！非常感谢！！！

wengjl2021-03-25 16:45

这个帖子说明：　有想法，总会有办法

zhousr2021-03-26 11:00

以下是引用wengjl在2021-3-25 16:45:36的发言：

这个帖子说明：　有想法，总会有办法

ycvf2021-03-30 18:10

如果是是 F:\志愿筛选系统\usertable\ ,应怎么改？
newPath = SYS(5) + "\志愿筛选系统\usertable\"