运行脚本的脚本

Question

我在 vbscript 上有一个脚本

Dim WSHShell, WinDir, Value, wshProcEnv, fso, Spath    

Set WSHShell = CreateObject("WScript.Shell")    


Dim objFSO, objFileCopy    
Dim strFilePath, strDestination    

 Const OverwriteExisting = True    
 Set objFSO = CreateObject("Scripting.FileSystemObject")    
 Set windir = objFSO.getspecialfolder(0)    
 objFSO.CopyFile "\\dv.rt.ru\SYSVOL\DV.RT.RU\scripts\shutdown.vbs", windir&"\", OverwriteExisting    

strComputer = "."    
Set objWMIService = GetObject("winmgmts:" _    
    & "{impersonationLevel=impersonate}!\\" _    
    & strComputer & "\root\cimv2")     
JobID = "1"    

Set colScheduledJobs = objWMIService.ExecQuery _    
    ("Select * from Win32_ScheduledJob")    
For Each objJob in colScheduledJobs    
 objJob.Delete    
Next    

Set objNewJob = objWMIService.Get("Win32_ScheduledJob")    
errJobCreate = objNewJob.Create _    
    (windir & "\shutdown.vbs", "********093000.000000+660", _    
        True, 1 OR 2 OR 4 OR 8 OR 16 OR 32 OR 64, ,True, JobId) 

如何使 shutdown.vbs 不在 9:30 运行一次，而是在 9:30 到 12:00 运行

Answer 1

• 修改 shutdown.vbs 脚本来检查时间 - 如果在 9:30 到 12:00 之间，则 shutdown
• 安排两项任务来执行关机脚本：一项在 9:30 运行，一项在系统启动时运行。