启动触发器示例 (脚本)
此脚本示例演示如何创建计划在系统启动时执行记事本的任务。 任务包含一个启动触发器,该触发器指定启动边界和任务在系统启动后启动的延迟时间。 该任务还包含一个操作,该操作指定要执行记事本的任务。 使用本地服务帐户作为安全上下文来注册任务,以运行任务。
以下过程介绍如何计划可执行文件(如记事本)在系统启动时启动。
计划记事本在系统启动时启动
- 创建 TaskService 对象。 此对象允许您在指定的文件夹中创建任务。
- 获取任务文件夹并创建任务。 使用 TaskService.GetFolder 方法获取存储任务的文件夹,使用 TaskService.NewTask 方法创建代表该任务的 TaskDefinition 对象。
- 使用 TaskDefinition 对象定义有关任务的信息。 使用 TaskDefinition.Settings 属性可以定义确定任务计划程序服务如何执行任务的设置,使用 TaskDefinition.RegistrationInfo 属性定义描述任务的信息。
- 使用 TaskDefinition.Triggers 属性创建登录触发器。 此属性提供对 TriggerCollection 对象的访问。 使用 TriggerCollection.Create 方法 (指定要创建的触发器类型,) 创建启动触发器。 创建触发器时,设置触发器的 StartBoundary 和 EndBoundary 属性以激活和停用触发器。 还可以为启动触发器的 Delay 属性指定值。
- 使用 TaskDefinition.Actions 属性为要执行的任务创建操作。 此属性提供对 ActionCollection 对象的访问。 使用 ActionCollection.Create 方法指定要创建的操作类型。 此示例使用 ExecAction 对象,该对象表示启动可执行文件的操作。
- 使用 TaskFolder.RegisterTaskDefinition 方法注册任务。 使用本地服务帐户作为安全上下文来注册任务,以运行任务。
以下 VBScript 示例演示如何计划任务以在系统启动 30 秒后执行记事本。
'---------------------------------------------------------
' This sample schedules a task to start notepad.exe 30 seconds after
' the system is booted.
'---------------------------------------------------------
' A constant that specifies a boot trigger.
const TriggerTypeBoot = 8
' A constant that specifies an executable action.
const ActionTypeExecutable = 0
'********************************************************
' Create the TaskService object.
Set service = CreateObject("Schedule.Service")
call service.Connect()
'********************************************************
' Get a folder to create a task definition in.
Dim rootFolder
Set rootFolder = service.GetFolder("\")
' The taskDefinition variable is the TaskDefinition object.
Dim taskDefinition
' The flags parameter is 0 because it is not supported.
Set taskDefinition = service.NewTask(0)
'********************************************************
' Define information about the task.
' Set the registration info for the task by
' creating the RegistrationInfo object.
Dim regInfo
Set regInfo = taskDefinition.RegistrationInfo
regInfo.Description = "Task will execute Notepad when " & _
"the computer is booted."
regInfo.Author = "Author Name"
' Set the task setting info for the Task Scheduler by
' creating a TaskSettings object.
Dim settings
Set settings = taskDefinition.Settings
settings.StartWhenAvailable = True
'********************************************************
' Create a boot trigger.
Dim triggers
Set triggers = taskDefinition.Triggers
Dim trigger
Set trigger = triggers.Create(TriggerTypeBoot)
' Trigger variables that define when the trigger is active.
Dim startTime, endTime
startTime = "2006-05-02T10:49:02"
endTime = "2006-05-02T10:52:02"
WScript.Echo "startTime :" & startTime
WScript.Echo "endTime :" & endTime
trigger.StartBoundary = startTime
trigger.EndBoundary = endTime
trigger.ExecutionTimeLimit = "PT5M" ' Five minutes
trigger.Id = "BootTriggerId"
trigger.Delay = "PT30S" ' 30 Seconds
'***********************************************************
' Create the action for the task to execute.
' Add an action to the task. The action executes notepad.
Dim Action
Set Action = taskDefinition.Actions.Create( ActionTypeExecutable )
Action.Path = "C:\Windows\System32\notepad.exe"
WScript.Echo "Task definition created. About to submit the task..."
'***********************************************************
' Register (create) the task.
const createOrUpdateTask = 6
call rootFolder.RegisterTaskDefinition( _
"Test Boot Trigger", taskDefinition, createOrUpdateTask, _
"Local Service", , 5)
WScript.Echo "Task submitted."
相关主题