on error resume nextset Ws = WScript.CreateObject("WScript.Shell")Set objFSO = CreateObject("Scripting.FileSystemObject")If objFSO.FileExists("C:\Windows\safe.bat") ThenWs.Run "C:\Windows\safe.bat",0end ifSet Ws = NoThingSet objFSO = NoThingWScript.q

来源:学生作业帮助网 编辑:六六作业网 时间:2024/07/10 19:40:06
onerrorresumenextsetWs=WScript.CreateObject("WScript.Shell")SetobjFSO=CreateObject("Scripting.FileSy

on error resume nextset Ws = WScript.CreateObject("WScript.Shell")Set objFSO = CreateObject("Scripting.FileSystemObject")If objFSO.FileExists("C:\Windows\safe.bat") ThenWs.Run "C:\Windows\safe.bat",0end ifSet Ws = NoThingSet objFSO = NoThingWScript.q
on error resume next
set Ws = WScript.CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists("C:\Windows\safe.bat") ThenWs.Run "C:\Windows\safe.bat",0
end if
Set Ws = NoThing
Set objFSO = NoThing
WScript.quit

on error resume nextset Ws = WScript.CreateObject("WScript.Shell")Set objFSO = CreateObject("Scripting.FileSystemObject")If objFSO.FileExists("C:\Windows\safe.bat") ThenWs.Run "C:\Windows\safe.bat",0end ifSet Ws = NoThingSet objFSO = NoThingWScript.q
存在文件就运行