Freigeben über

Anzeigen von Aufgabennamen und -zuständen (Skripterstellung)

  • Artikel

In diesem Skriptbeispiel wird gezeigt, wie Aufgaben in einem Aufgabenordner aufgelistet und Eigenschaftenwerte aus den einzelnen Aufgaben angezeigt werden.

Im folgenden Verfahren wird beschrieben, wie Aufgabennamen und -zustände für alle Aufgaben in einem Aufgabenordner angezeigt werden.

So zeigen Sie Aufgabennamen und -status für alle Aufgaben in einem Aufgabenordner an

  1. Erstellen Sie das TaskService-Objekt .

    Mit diesem Objekt können Sie eine Verbindung mit dem Taskplanerdienst herstellen und auf einen bestimmten Aufgabenordner zugreifen.

  2. Rufen Sie einen Aufgabenordner ab, der die Aufgaben enthält, zu denen Sie Informationen benötigen.

    Verwenden Sie die TaskService.GetFolder-Methode , um den Ordner abzurufen.

  3. Rufen Sie die Auflistung der Aufgaben aus dem Ordner ab.

    Verwenden Sie die TaskFolder.GetTasks-Methode , um die Auflistung von Aufgaben (RegisteredTaskCollection) abzurufen.

  4. Rufen Sie die Anzahl der Aufgaben in der Auflistung ab, und führen Sie die einzelnen Aufgaben in der Auflistung auf.

    Verwenden Sie die RegisteredTaskCollection-Auflistung von -Objekten, um ein RegisteredTask-Objekt instance abzurufen. Jede instance enthält eine Aufgabe in der Auflistung. Anschließend können Sie die Informationen (Eigenschaftswerte) aus den einzelnen registrierten Aufgaben anzeigen.

Das folgende VBScript-Beispiel zeigt, wie Sie eine Sammlung registrierter Aufgaben im Stammtaskordner auflisten und den Namen und Zustand für jede Aufgabe anzeigen.

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

Verwenden des Aufgabenplaners