不斷查找文件，當文件存在時，運行命令

我需要一個vbscript監視一個文件夾中的特定文件，當找到文件時需要執行一個命令然後刪除那個文件但是繼續監視這個文件夾相同的文件需要再次運行。不斷查找文件，當文件存在時，運行命令

這...

Set FSO = CreateObject("Scripting.FileSystemObject") 
Do While 1>0 
    If FSO.FileExists (file.txt) Then 
     FSO.DeleteFile (file.txt) 
     CreateObject("WScript.Shell").Run "c:\windows\notepad.exe" 
    End If 
    WScript.Sleep 1000 
Loop

給了我一個「對象所需：文件」錯誤

更新，這個工作...

FileName = "c:\vbscript\cat.txt" 
Set FSO = CreateObject("Scripting.FileSystemObject") 
Do 
    If FSO.FileExists(FileName) Then 
     FSO.DeleteFile FileName 
     CreateObject("WScript.Shell").Run "c:\windows\notepad.exe" 
    End If 
    WScript.Sleep 1000 
Loop

來源

2013-05-02 Jack Asson

-0.49用於使用僞（）在'FSO.DeleteFile（file.txt的）'，使用> 0'的'1'代替或TRUE'簡單'DO .. Loop'，而不是引述（明顯的）字符串文字「file.txt」。 – 2013-05-02 15:44:51

只需創建一個腳本，無限循環，測試文件是否存在以及是否刪除它。

FileName = "Path\To\FileName" 
Set FSO = CreateObject("Scripting.FileSystemObject") 
Do 
    If FSO.FileExists(FileName) Then 
     FSO.DeleteFile FileName 
    End If 
    WScript.Sleep 1000 
Loop

來源

2013-05-02 15:04:10 Meoiswa

我得到一個錯誤「對象需要：文件」 – 2013-05-02 15:32:19

@Meoiswa -0.49令人討厭的'1> 0'，並沒有顯示FileName是一個必須被初始化的變量。 – 2013-05-02 15:46:40

@ Ekkehard.Horner同意了，我因爲被踢出教室而被掐了。 – Meoiswa 2013-05-02 16:52:38

不斷查找文件，當文件存在時，運行命令

回答

相關問題