如何使用VBScript检查文件是否存在

Question

我有一个带有许多文件的文件夹。看起来这个file1.txt，newfile1.txt，file2.txt，newfile2.txt，file3.txt，newfile3.txt，file4.txt，newfile4.txt，....

我有一个生成newfilei.txt的代码。我想编写一个vbscript，该vbScript检查该文件夹中是否存在新文件。我尝试了这个

Set objFolder = FSO.GetFolder("C:myFolder")
For Each objFile In objFolder.Files 
        fileName=objFile.name 
    If instr(fileName,"newFile*") =1 Then
        WScript.Echo "new File exist"
    End If
Next 

，但这无效。有什么想法吗？

Answer 1

编辑：com对象非常简单。

Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")
If fso.FileExists("C:myFoldernewFile.txt") Then
    'Perform Code
End If

---

或，如果您希望您的代码工作

Set FSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = FSO.GetFolder("C:myFolder")
For Each objFile In objFolder.Files 
        fileName=objFile.name 
    If instr(fileName,"newFile") Then
        WScript.Echo "new File found"
    End If
Next 

---

而且，将它们全部拉在一起。

Set FSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = FSO.GetFolder("C:myFolder")
Set objFiles = objFolder.Files 
For i=0 to objFiles.Count
    If FSO.FileExists("C:myFoldernewFile" & i & ".txt") Then
        WScript.Echo "new File found"
    End If
Next