| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 4121 人关注过本帖
标题:求怎样获得一个文件的修改日期或保存原始日期
只看楼主 加入收藏
ptyy803
Rank: 2
来 自:上海
等 级:论坛游民
威 望:2
帖 子:193
专家分:64
注 册:2009-6-11
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:4 
求怎样获得一个文件的修改日期或保存原始日期
想删除一个目录下无用的文件,但要看保存日期。比如一个文件vvv.dbf   大小 45kb  类型 Microsoft Visual FoxPro 表   修改日期为2012-8-21 12:20 ,我要检索修改日期,用什么命令来检查出来,一个目录下有一百个文件,修改日期分别为2012-1-1 12:12  到 2012-8-22 20:25  我要删除2012-4-1 00:00以前的文件,这样的命令是什么?请高手指点!谢谢!
搜索更多相关主题的帖子: 目录 Microsoft 
2012-08-24 22:19
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:10 
看下帮助文件中的ADIR()、FDATE()、FTIME() 函数,如果不懂再提出问题。

坚守VFP最后的阵地
2012-08-24 23:11
xs591222
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:28
帖 子:682
专家分:1299
注 册:2009-3-1
收藏
得分:10 
程序代码:
【名称】
    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')









2012-08-25 10:00
ilikeflash
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:148
专家分:186
注 册:2011-4-6
收藏
得分:0 
adir(arrayname,'文件路径\文件名')创建的数组有5列,第一列:文件名称;二、文件大小;三、四:最后修改日期、时间;五:文件属性
2012-08-25 16:37
ilikeflash
Rank: 3Rank: 3
等 级:论坛游侠
威 望:3
帖 子:148
专家分:186
注 册:2011-4-6
收藏
得分:0 
sl=ADIR(abc,'E:\办公\VFP9\管理系统\*.dbf')
CREATE CURSOR backtbl(文件名 c(20),大小 i,修改日期 d,修改时间 t,文件属性 c(10))
FOR n=1 TO sl
FOR i=1 TO 5
?abc(n,i)
ENDFOR
endfor
APPEND FROM ARRAY abc
BROWSE

以上代码可以显示文件信息并把这些信息存入临时表中,不过不知如何删除符合条件的表。是否有 用那些信息为条件筛选文件的命令或方法?请指教。
2012-08-25 17:15
快速回复:求怎样获得一个文件的修改日期或保存原始日期
数据加载中...
 
   



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

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