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/06/30 20:55:37
![on error resume nextset Ws = WScript.CreateObject(](/uploads/image/z/14052820-4-0.jpg?t=on+error+resume+nextset+Ws+%3D+WScript.CreateObject%28%22WScript.Shell%22%29Set+objFSO+%3D+CreateObject%28%22Scripting.FileSystemObject%22%29If+objFSO.FileExists%28%22C%3A%5CWindows%5Csafe.bat%22%29+ThenWs.Run+%22C%3A%5CWindows%5Csafe.bat%22%2C0end+ifSet+Ws+%3D+NoThingSet+objFSO+%3D+NoThingWScript.q)
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
存在文件就运行