Exemple de déclencheur de temps (script)

Cet exemple de script montre comment créer une tâche qui exécute le Bloc-notes à un moment spécifique. La tâche contient un déclencheur basé sur le temps qui spécifie une limite de début pour activer la tâche, une action exécutable qui exécute le Bloc-notes et une limite de fin qui désactive la tâche.

La procédure suivante décrit comment planifier une tâche pour démarrer un exécutable à un moment spécifique.

Pour planifier le bloc-notes pour démarrer à une heure spécifique

1. Créez un objet TaskService . Cet objet vous permet de créer la tâche dans un dossier spécifié.
2. Obtenez un dossier de tâches et créez une tâche. Utilisez la méthode TaskService.GetFolder pour obtenir le dossier dans lequel la tâche est stockée et la méthode TaskService.NewTask pour créer l’objet TaskDefinition qui représente la tâche.
3. Définissez des informations sur la tâche à l’aide de l’objet TaskDefinition . Utilisez la propriété TaskDefinition.Settings pour définir les paramètres qui déterminent la façon dont le service Planificateur de tâches effectue la tâche et la propriété TaskDefinition.RegistrationInfo pour définir les informations qui décrivent la tâche.
4. Créez un déclencheur basé sur le temps à l’aide de la propriété TaskDefinition.Triggers . Cette propriété permet d’accéder à l’objet TriggerCollection . Utilisez la méthode TriggerCollection.Create (en spécifiant le type de déclencheur que vous souhaitez créer) pour créer un déclencheur basé sur le temps. Lorsque vous créez le déclencheur, définissez la limite de début et la limite de fin du déclencheur pour activer et désactiver le déclencheur. La limite de début spécifie le moment où l’action de la tâche sera effectuée.
5. Créez une action pour que la tâche s’exécute à l’aide de la propriété TaskDefinition.Actions . Cette propriété permet d’accéder à l’objet ActionCollection . Utilisez la méthode ActionCollection.Create pour spécifier le type d’action à créer. Cet exemple utilise un objet ExecAction , qui représente une action qui exécute une opération de ligne de commande.
6. Inscrivez la tâche à l’aide de la méthode TaskFolder.RegisterTaskDefinition . Pour cet exemple, la tâche démarre le Bloc-notes à l’heure actuelle plus 30 secondes.

L’exemple VBScript suivant montre comment planifier l’exécution d’une tâche dans le Bloc-notes 30 secondes après l’inscription de la tâche.

'------------------------------------------------------------------
' This sample schedules a task to start notepad.exe 30 seconds
' from the time the task is registered.
'------------------------------------------------------------------

' A constant that specifies a time-based trigger.
const TriggerTypeTime = 1
' 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 at a certain time"
regInfo.Author = "Author Name"

'********************************************************
' Set the principal for the task
Dim principal
Set principal = taskDefinition.Principal

' Set the logon type to interactive logon
principal.LogonType = 3


' 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 time-based trigger.
Dim triggers
Set triggers = taskDefinition.Triggers

Dim trigger
Set trigger = triggers.Create(TriggerTypeTime)

' Trigger variables that define when the trigger is active.
Dim startTime, endTime

Dim time
time = DateAdd("s", 30, Now)  'start time = 30 seconds from now
startTime = XmlTime(time)

time = DateAdd("n", 5, Now) 'end time = 5 minutes from now
endTime = XmlTime(time)

WScript.Echo "startTime :" & startTime
WScript.Echo "endTime :" & endTime

trigger.StartBoundary = startTime
trigger.EndBoundary = endTime
trigger.ExecutionTimeLimit = "PT5M"    'Five minutes
trigger.Id = "TimeTriggerId"
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 TimeTrigger", taskDefinition, 6, , , 3)

WScript.Echo "Task submitted."



'------------------------------------------------------------------
' Used to get the time for the trigger 
' startBoundary and endBoundary.
' Return the time in the correct format: 
' YYYY-MM-DDTHH:MM:SS. 
'------------------------------------------------------------------
Function XmlTime(t)
    Dim cSecond, cMinute, CHour, cDay, cMonth, cYear
    Dim tTime, tDate

    cSecond = "0" & Second(t)
    cMinute = "0" & Minute(t)
    cHour = "0" & Hour(t)
    cDay = "0" & Day(t)
    cMonth = "0" & Month(t)
    cYear = Year(t)

    tTime = Right(cHour, 2) & ":" & Right(cMinute, 2) & _
        ":" & Right(cSecond, 2)
    tDate = cYear & "-" & Right(cMonth, 2) & "-" & Right(cDay, 2)
    XmlTime = tDate & "T" & tTime 
End Function

Rubriques connexes

Utilisation du planificateur de tâches