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/05/11 00:18:00
on error resume nextset Ws = WScript.CreateObject(

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
存在文件就运行