检查文件是否存在

上一篇 / 下一篇  2012-08-19 23:58:39 / 个人分类:qtp

 

依然是帮助文档中的内容

之所以关注文件操作,主要是因为自动化项目,最后一定是按照框架思想,分层,分文件夹,势必需要大量的文件操作。

 Dim fso, msg
   Set fso = CreateObject("Scripting.FileSystemObject")
   If (fso.FileExists("E:\vbscript\fileexist.vbs")) Then
      msg = filespec & " exists."
   Else
      msg = filespec & " doesn't exist."
   End If
   ReportFileStatus = msg

MsgBox ReportFileStatus

 

fileExists需要的参数,可以是绝对路径,也可以是相对路径


TAG:

 

评分:0

我来说两句

Open Toolbar