我的文件存在两个目录里，一个是固定在C盘，可文件名不是很确定，里面的内容倒是确定的，那我程序运行时必须从C盘那个不确定的文件名的DATA文件夹里提取数据，主程序我的路径是相对路径代码是
PUBLIC MYPATH     &&定义全局变量MYPATH
MYPATH=LEFT(SYS(16),RAT("\",SYS(16)))   &&提取当前路径
SET DEFA TO (MYPATH)   
SET PATH TO ...\qy\
那我想问一下，我该如何处理从C盘这个不确定文件名中调取数据。

文件名不确定调取数据就比较麻烦，可以先将指定文件夹下的文件目录先读入到数组中，然后逐个文件打开处理，但这样做效率不高。

tmpfile=getfile("dbf","","",1," >> 请选定Data文件")

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

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

*如果你的不确定文件夹只可能是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()

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 编辑 ]

学习了