标题:[求助]路径设置问题
只看楼主
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
结帖率:100%
 问题点数:0 回复次数:2 
[求助]路径设置问题
请教各位高手,以下代码涉及路径设置,如果事前不懂得文件在哪个盘上,也许在D盘,也可能在E、 G 、H,那么该怎样来设置路径呢?
gndbcnumber = adir(ml,'F:\lujing\*.xls',"D") && 创建数组
for i = 1 to gndbcnumber
selectfile1=ml(i,1)
selectfile="F:\lujing\"+selectfile1
appen from &selectfile type xls
ENDFOR
搜索更多相关主题的帖子: 路径 
2009-11-15 15:54
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:396
帖 子:11713
专家分:43267
注 册:2006-5-13
得分:0 
可以用可能出现的盘符替换进行搜索。
如文件的盘符可能是D-G,则:
for nDisk=68 to 71                &&对应字母D-G的ASCII码
gndbcnumber = adir(ml,chr(nDisk)+':\lujing\*.xls',"D") && 创建数组
for i = 1 to gndbcnumber
selectfile1=ml(i,1)
selectfile="F:\lujing\"+selectfile1
appen from &selectfile type xls
if 找到相应的文件
  exit
endif
ENDFOR
if 找到相应的文件
  exit
endif
endfor


[ 本帖最后由 hu9jj 于 2009-11-15 16:23 编辑 ]

活到老,学到老! http://www. E-mail:hu-jj@
2009-11-15 16:22
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
得分:0 
感谢hu9jj!直接用相对路径设置就可以了.
2009-11-15 21:24



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




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.095765 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved