程序代码:
【名称】
ADIR()函数
【类别】
函数
【描述】
将文件信息存放到数组中。
【原形】
ADIR(ArrayName [, cFileSkeleton [,cAttribute]])
【参数】
ArrayName
指定数组名。如果数组不存在,Visual FoxPro将自动创建此数组。如果数组存在,但其大小不足以包含所有信息,则 Visual FoxPro自动增加数组大小,使得数组能容纳所有信息。如果数组超过了所需大小,Visual FoxPro将截掉多余部分。如果数组存在,并且 ADIR( )函数由于没找到匹配文件而返回0,则数组保持不变。如果数组不存在,并且 ADIR( )函数返回零,则不创建数组。
cFileSkeleton
指定文件梗概,以便存储满足搜索条件的文件名或扩展名的文件信息。
cAttribute
指定在返回内容中包含子目录或嵌套文件夹、隐藏或系统文件、或者卷名。
cCreatorType
用指定的创建程序类型指定文件。
【返回值】
数值型
【示例】
CLOSE DATABASES
gnNumber = ADIR(myDatabase, '*.DBC') &&创建数组
CLEAR
FOR nCount = 1 TO gnNumber
? myDatabase(nCount,1) && 显示数据库名称
ENDFOR
【名称】
FDATE()函数
【类别】
函数
【描述】
返回文件最近一次修改的日期。
【原形】
FDATE(cFileName [,nType])
【参数】
cFileName
指定文件名,由 FDATE( )函数返回其最近一次修改的日期,cFileName可在文件名前包含路径。如果文件名前不包含路径,Visual FoxPro将在默认目录和 SET PATH命令指定的所有目录下搜索该文件。
nType
指定FDATE( )返回最后修改的是日期还是日期时间。
【返回值】
日期型
【示例】
? FDATE('test.txt')
? FDATE('FOXUSER.DBF', 1)
【名称】
FILE()函数
【类别】
函数
【描述】
如果在磁盘上找到指定的文件,则返回“真”(.T.)。
【原形】
FILE(cFileName [, nFlags])
【参数】
cFileName
指定要查找文件的名称,必须包含文件的扩展名。
nFlags
指定当文件存在但被隐藏或系统属性屏蔽时函数返回值的类型。
【返回值】
逻辑值
【示例】
? FILE('yjz.txt')