Share via

Affichage des noms et états des tâches (script)

  • Article

Cet exemple de script montre comment énumérer des tâches dans un dossier de tâches et afficher les valeurs de propriété de chaque tâche.

La procédure suivante explique comment afficher les noms et états des tâches pour toutes les tâches d’un dossier de tâches.

Pour afficher les noms et l’état des tâches pour toutes les tâches d’un dossier de tâches

  1. Créez l’objet TaskService .

    Cet objet vous permet de vous connecter au service Planificateur de tâches et d’accéder à un dossier de tâches spécifique.

  2. Obtenez un dossier de tâches qui contient les tâches sur lesquelles vous souhaitez obtenir des informations.

    Utilisez la méthode TaskService.GetFolder pour obtenir le dossier.

  3. Obtenez la collection de tâches à partir du dossier.

    Utilisez la méthode TaskFolder.GetTasks pour obtenir la collection de tâches (RegisteredTaskCollection).

  4. Obtenez le nombre de tâches dans la collection et énumérez chaque tâche de la collection.

    Utilisez la collection d’objets RegisteredTaskCollection pour obtenir un objet RegisteredTask instance. Chaque instance contiendra une tâche dans la collection. Vous pouvez ensuite afficher les informations (valeurs de propriété) de chaque tâche inscrite.

L’exemple VBScript suivant montre comment énumérer une collection de tâches inscrites dans le dossier de tâches racine et afficher le nom et l’état de chaque tâche.

'---------------------------------------------------------
' This sample enumerates through the tasks on the local computer and
' displays their name and state.
'---------------------------------------------------------


' Create the TaskService object.
Set service = CreateObject("Schedule.Service")
call service.Connect()

' Get the task folder that contains the tasks. 
Dim rootFolder
Set rootFolder = service.GetFolder("\")
 
Dim taskCollection
Set taskCollection = rootFolder.GetTasks(0)

Dim numberOfTasks
numberOfTasks = taskCollection.Count

If numberOfTasks = 0 Then 
    Wscript.Echo "No tasks are registered."
Else
    WScript.Echo "Number of tasks registered: " & numberOfTasks
    
    Dim registeredTask
    For Each registeredTask In taskCollection
        WScript.Echo "Task Name: " & registeredTask.Name
    
        Dim taskState 
        Select Case registeredTask.State 
            Case "0"
                taskState = "Unknown"
            Case "1"
                taskState = "Disabled"
            Case "2"
                taskState = "Queued"
            Case "3"
                taskState = "Ready"
            Case "4"
                taskState = "Running"
        End Select

        WScript.Echo "    Task State: " & taskState
    Next
End If

Utilisation du planificateur de tâches