Ejemplo de desencadenador semanal (scripting)
En este ejemplo de scripting se muestra cómo crear una tarea que ejecuta el Bloc de notas a las 8:00 a.m. el lunes de cada semana. La tarea contiene un desencadenador diario que especifica cuándo se ejecuta la tarea y una acción ejecutable que ejecuta el Bloc de notas.
En el procedimiento siguiente se describe cómo programar una tarea para iniciar un ejecutable a las 8:00 a. m. el lunes de cada semana.
Para programar el Bloc de notas para que comience a las 8:00 a.m. el lunes de cada semana
Cree un objeto TaskService . Este objeto permite crear la tarea en una carpeta especificada.
Obtenga una carpeta de tareas y cree una tarea. Utilice el método TaskService.GetFolder para obtener la carpeta donde se almacena la tarea y el método TaskService.NewTask para crear el objeto TaskDefinition que representa la tarea.
Defina información sobre la tarea mediante el objeto TaskDefinition . Utilice la propiedad TaskDefinition.Settings para definir la configuración que determina cómo el servicio Programador de tareas realiza la tarea y la propiedad TaskDefinition.RegistrationInfo para definir la información que describe la tarea.
Cree un desencadenador semanal mediante la propiedad TaskDefinition.Triggers . Esta propiedad proporciona acceso al objeto TriggerCollection que se usa para crear el desencadenador.
Use el método TriggerCollection.Create (especificando el tipo de desencadenador que desea crear) para crear un desencadenador semanal.
Establezca la propiedad WeeklyTrigger.StartBoundary para especificar cuándo se activa el desencadenador y la hora del día en que se ejecuta la tarea. En este ejemplo, el desencadenador se activa el 1 de enero de 2005 y la tarea se ejecuta a las 8:00 a. m.
Establezca la propiedad WeeklyTrigger.EndBoundarypara especificar cuándo se desactiva el desencadenador. En este ejemplo, el desencadenador se desactiva el 1 de enero de 2015.
Establezca la propiedad WeeklyTrigger.DaysOfWeek para especificar los días de la semana en los que se ejecuta la tarea. En este ejemplo, la tarea se ejecuta el lunes.
Establezca la propiedad WeeklyTrigger.WeeksIntervalpara especificar el intervalo entre las semanas de la programación. En este ejemplo, la tarea se ejecuta cada semana.
Cree una acción para que la tarea se ejecute mediante la propiedad TaskDefinition.Actions . Esta propiedad proporciona acceso al objeto ActionCollection usado para crear la acción. Use el método ActionCollection.Create para especificar el tipo de acción que desea crear. En este ejemplo se usa un objeto ExecAction , que representa una acción que ejecuta una operación de línea de comandos.
Registre la tarea mediante el método TaskFolder.RegisterTaskDefinition . En este ejemplo, la tarea iniciará el Bloc de notas a las 8:00 a. m. el lunes de cada semana.
En el siguiente ejemplo de VBScript se muestra cómo programar una tarea para ejecutar el Bloc de notas todos los días a las 8:00 a. m.
'------------------------------------------------------------------
' This sample schedules a task to start on a weekly basis.
'------------------------------------------------------------------
' A constant that specifies a weekly trigger.
const TriggerTypeWeekly = 3
' A constant that specifies an executable action.
const ActionTypeExec = 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 = "Start Notepad weekly."
regInfo.Author = "Administrator"
' Set the task setting info for the Task Scheduler by
' creating a TaskSettings object.
Dim settings
Set settings = taskDefinition.Settings
settings.Enabled = True
settings.StartWhenAvailable = True
settings.Hidden = False
'********************************************************
' Create a weekly trigger. Note that the start boundary
' specifies the time of day that the task starts, the
' day-of-week specfies on what day of the week the task
' runs, and the interval specifies what weeks the task runs.
Dim triggers
Set triggers = taskDefinition.Triggers
Dim trigger
Set trigger = triggers.Create(TriggerTypeWeekly)
' Trigger variables that define when the trigger is active
' and the time of day that the task is run. The format of
' this tims is YYYY-MM-DDTHH:MM:SS
Dim startTime, endTime
Dim time
startTime = "2006-05-02T08:00:00" 'Task runs at 8:00 AM
endTime = "2015-05-02T08:00:00"
WScript.Echo "startTime :" & startTime
WScript.Echo "endTime :" & endTime
trigger.StartBoundary = startTime
trigger.EndBoundary = endTime
trigger.DaysOfWeek = 1
trigger.WeeksInterval = 1 'Task runs every week.
trigger.Id = "WeeklyTriggerId"
trigger.Enabled = True
'***********************************************************
' Create the action for the task to execute.
' Add an action to the task to run notepad.exe.
Dim Action
Set Action = taskDefinition.Actions.Create( ActionTypeExec )
Action.Path = "C:\Windows\System32\notepad.exe"
WScript.Echo "Task definition created. About to submit the task..."
'***********************************************************
' Register (create) the task.
call rootFolder.RegisterTaskDefinition( _
"Test Weekly Trigger", taskDefinition, 6, , , 3)
WScript.Echo "Task submitted."
Temas relacionados