Question

如何判断VBS opentextfile()打开文件是否成功？

Const ForReading = 1
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\Scripts\Test.txt", ForReading)
以上为VBS中打开C:\Scripts\Test.txt，如何判断此txt文件打开成功与否？
请高手指点！

Answer 1

1可以先判断文件是否存在，一般存在就能打开
2.也可以通过取错误代码的方式，判断是否成功
on error resume next
err.clear
...open...
if err.number <> 0
'打开失败

err.clear

end if