声明：本空间的内容不全部是原创，如有雷同只为学习与借鉴之方便，别无它意，来者是朋友，愿通过此平台结交天下测试达狼！

QTP查找某个文件最后次修改时间

上一篇 / 下一篇  2010-05-14 09:15:19 / 个人分类：QTP

查看( 402 ) / 评论( 1 ) / 评分( 0 / 0 )
Dim fso, f1
YbW,\nD4b^+e0Set fso = CreateObject("Scripting.FileSystemObject")
'Xe)O2u2em |.^!w4o0' Get a File object to query.51Testing软件测试网)b2O9?,U$Q&qX w
Set f1 = fso.GetFile("c:\data.xls")   51Testing软件测试网-|uc S3O$T
' Print information.51Testing软件测试网2p$Mu"o+T$qBS+?q#n
msgbox "File last modified: " & f1.DateLastModified
 
结果见附件：

321

321

收藏 举报

TAG:

张君666的个人空间 引用 删除 张君666   /   2010-05-14 20:22:45
我什么时候能开空间啊
 

评分：0

我来说两句

Open Toolbar