如何检查文件是否存在？

Question

我想检查文件是否存在,如果存在,我想打开它并阅读第1行,

如果文件不存在或文件没有内容,那么我想静默失败而不让任何人知道发生了错误.

Answer 1

从这开始:

Set fso = CreateObject("Scripting.FileSystemObject")
If (fso.FileExists(path)) Then
   msg = path & " exists."
Else
   msg = path & " doesn't exist."
End If

取自文档.