Vbscript 不断查找文件,当文件存在时,运行命令
我需要一个vbscript,用于监视文件夹中的特定文件,当找到该文件时,需要执行命令,然后删除该文件,但继续监视文件夹中的同一文件,以防需要再次运行 这个Vbscript 不断查找文件,当文件存在时,运行命令,vbscript,monitor,Vbscript,Monitor,我需要一个vbscript,用于监视文件夹中的特定文件,当找到该文件时,需要执行命令,然后删除该文件,但继续监视文件夹中的同一文件,以防需要再次运行 这个 Set FSO = CreateObject("Scripting.FileSystemObject") Do While 1>0 If FSO.FileExists (file.txt) Then FSO.DeleteFile (file.txt) CreateObject("WScript.She
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
只需创建一个无限循环的脚本,测试文件是否存在以及是否删除它
FileName = "Path\To\FileName"
Set FSO = CreateObject("Scripting.FileSystemObject")
Do
If FSO.FileExists(FileName) Then
FSO.DeleteFile FileName
End If
WScript.Sleep 1000
Loop
-0.49用于在
FSO.DeleteFile(file.txt)
中使用伪(),使用1>0
而不是True
或简单的Do。。循环
,并且没有引用(明显的)字符串文字“file.txt”。@Meoiswa-0.49表示讨厌的1>0
,并且没有显示文件名
是必须初始化的变量。@Ekkehard.Horner同意,我是在紧要关头写的,因为我被赶出了教室。@Meoiswa-请删除文件名赋值中的集合(字符串,而不是对象);窗口的路径分隔符是“\”。谢谢,我对vbscript不太熟悉。@Meoiswa+1的概念/想法、实施和努力,