2025-04-27 07:49:33 -04:00

25 lines
782 B
Plaintext

Set Service = GetObject("winmgmts:root/default")
Set TaskClass = Service.Get ( "Win32_Task" )
Set TaskInstance = TaskClass.SpawnInstance_
TaskInstance.IdleWait = 100
TaskInstance.Deadline = 100
TaskInstance.Comment = "TestTask Comment"
TaskInstance.Creator = "ntdev\stevm"
' TaskInstance.ItemData [] = { 0 , 1 , 2 }
TaskInstance.RetryCount = 1
TaskInstance.RetryInterval = 100
TaskInstance.Flags = 0
TaskInstance.AccountName = "ntdev\stevm"
TaskInstance.Password = ""
TaskInstance.WorkItemName = "TestTask.job"
TaskInstance.ApplicationName = "c:\winnt\system32\notepad.exe"
TaskInstance.Parameters = "Param"
TaskInstance.WorkingDirectory = "c\winnt\system32"
TaskInstance.Priority = 32
TaskInstance.MaxRunTime = 1000
Set NewPath = TaskInstance.Put_