Saturday, July 31, 2004

TechNet Scripts: Schedule a Task

TechNet Scripts: Schedule a Task: "Schedule a Task

Description
Schedules Notepad to run at 12:30 PM every Monday, Wednesday, and Friday.
Script Code
strComputer = '.'
Set objWMIService = GetObject('winmgmts:' _
& '{impersonationLevel=impersonate}!\\' & strComputer & '\root\cimv2')
Set objNewJob = objWMIService.Get('Win32_ScheduledJob')
errJobCreated = objNewJob.Create _
('Notepad.exe', '********123000.000000-420', _
True , 1 OR 4 OR 16, , , JobID)
Wscript.Echo errJobCreated"

No comments: