| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2113 人关注过本帖
标题:路径设置问题
只看楼主 加入收藏
qiaolinxj
Rank: 1
等 级:新手上路
帖 子:96
专家分:0
注 册:2009-3-14
结帖率:88.24%
收藏
已结贴  问题点数:5 回复次数:7 
路径设置问题
我的文件存在两个目录里,一个是固定在C盘,可文件名不是很确定,里面的内容倒是确定的,那我程序运行时必须从C盘那个不确定的文件名的DATA文件夹里提取数据,主程序我的路径是相对路径代码是
PUBLIC MYPATH     &&定义全局变量MYPATH
MYPATH=LEFT(SYS(16),RAT("\",SYS(16)))   &&提取当前路径
SET DEFA TO (MYPATH)   
SET PATH TO ...\qy\
那我想问一下,我该如何处理从C盘这个不确定文件名中调取数据。
搜索更多相关主题的帖子: 路径 
2010-01-08 16:21
hu9jj
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:红土地
等 级:贵宾
威 望:400
帖 子:11857
专家分:43421
注 册:2006-5-13
收藏
得分:1 
文件名不确定调取数据就比较麻烦,可以先将指定文件夹下的文件目录先读入到数组中,然后逐个文件打开处理,但这样做效率不高。

活到老,学到老!http://www.(该域名已经被ISP盗卖了)E-mail:hu-jj@
2010-01-08 19:28
茵梦湖
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:31
帖 子:545
专家分:2180
注 册:2009-4-25
收藏
得分:1 
tmpfile=getfile("dbf","","",1," >> 请选定Data文件")
2010-01-09 12:32
qiaolinxj
Rank: 1
等 级:新手上路
帖 子:96
专家分:0
注 册:2009-3-14
收藏
得分:0 
C盘那个文件夹是qy*,*号可能是02,也可能是03、04、07、08,就这个不能确定,而我要调取的文件就在C:\QY*\DATA里
2010-01-11 14:08
茵梦湖
Rank: 11Rank: 11Rank: 11Rank: 11
等 级:贵宾
威 望:31
帖 子:545
专家分:2180
注 册:2009-4-25
收藏
得分:0 
以下是引用qiaolinxj在2010-1-11 14:08:03的发言:

C盘那个文件夹是qy*,*号可能是02,也可能是03、04、07、08,就这个不能确定,而我要调取的文件就在C:\QY*\DATA里

这这这这.......被你打败了~ 我在3楼不是告诉你了, 直接用3楼那句代码调用文件, 文件名: (tmpfile)




2010-01-11 14:59
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:1 
*如果你的不确定文件夹只可能是03、04、07、08其中之一的话:
DO case
    CASE DIRECTORY("C:\QY02\DATA")
        m_path="C:\QY02\DATA"
    CASE DIRECTORY("C:\QY04\DATA")
        m_path="C:\QY04\DATA"
    CASE DIRECTORY("C:\QY07\DATA")
        m_path="C:\QY07\DATA"
    CASE DIRECTORY("C:\QY08\DATA")
        m_path="C:\QY08\DATA"
ENDCASE
SET DEFAULT TO &m_path
GETFILE()

相互学习,互相交流,共同提高。
2010-01-11 16:12
sywzs
Rank: 10Rank: 10Rank: 10
来 自:辽宁
等 级:贵宾
威 望:15
帖 子:508
专家分:1725
注 册:2009-5-13
收藏
得分:1 
cPATH=SYS(5)+SYS(2003)  &&保存当前路径
SET DEFAULT TO C:\
nI=ADIR(QY,"QY*","D")
FOR I=1 TO nI
  SET DEFAULT TO SYS(5)+"\"+(QY(I,1))
  nJ=ADIR(DA,"DATA","D")
  IF nJ>0
  ?"包含DATA子文件夹的文件夹是:",QY(I,1)
  ENDIF
NEXT
SET DEFAULT TO (cPATH)  &&回复原来的路径


[ 本帖最后由 sywzs 于 2010-1-12 08:17 编辑 ]
2010-01-12 07:31
wanfei
Rank: 1
等 级:新手上路
帖 子:62
专家分:0
注 册:2005-10-23
收藏
得分:0 
学习了
2010-03-22 13:11
快速回复:路径设置问题
数据加载中...
 
   



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

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