Delen via

Taaknamen en statussen weergeven (scripting)

  • Artikel

In dit scriptvoorbeeld ziet u hoe u taken in een taakmap opsommen en eigenschapswaarden van elke taak weergeeft.

In de volgende procedure wordt beschreven hoe u taaknamen en statussen voor alle taken in een taakmap weergeeft.

Om taaknamen en statussen weer te geven voor alle taken in een taakmap

  1. Maak het TaskService-object.

    Met dit object kunt u verbinding maken met de Task Scheduler-service en toegang krijgen tot een specifieke taakmap.

  2. Haal een taakmap op met de taken waarover u informatie wilt.

    Gebruik de methode TaskService.GetFolder om de map op te halen.

  3. Haal de verzameling taken op uit de map.

    Gebruik de methode TaskFolder.GetTasks om de verzameling taken op te halen (RegisteredTaskCollection).

  4. Haal het aantal taken in de verzameling op en inventariseer elke taak in de verzameling.

    Gebruik de RegisteredTaskCollection verzameling objecten om een RegisteredTask objectexemplaar op te halen. Elke instantie bevat een taak in de verzameling. Vervolgens kunt u de informatie (eigenschapswaarden) van elke geregistreerde taak weergeven.

In het volgende VBScript-voorbeeld ziet u hoe u een verzameling geregistreerde taken in de hoofdtaakmap opsommen en de naam en status voor elke taak weergeeft.

'---------------------------------------------------------
' 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

De taakplanner gebruiken