Script for run script
Posted
by user31568
on Server Fault
See other posts from Server Fault
or by user31568
Published on 2010-05-13T03:21:18Z
Indexed on
2010/05/13
3:24 UTC
Read the original article
Hit count: 315
scripting
Hello everyone. There is script: 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)
How make that shutdown.vbs run not at 9:00 once, but run for 9:00 to 12:00 Thanks
© Server Fault or respective owner