Share via

Visualizzazione di nomi e stati delle attività (scripting)

  • Articolo

Questo esempio di scripting mostra come enumerare le attività in una cartella attività e visualizzare i valori delle proprietà di ogni attività.

La procedura seguente descrive come visualizzare i nomi e gli stati delle attività per tutte le attività in una cartella attività.

Per visualizzare i nomi e lo stato delle attività per tutte le attività in una cartella attività

  1. Creare l'oggetto TaskService .

    Questo oggetto consente di connettersi al servizio Utilità di pianificazione e accedere a una cartella attività specifica.

  2. Ottenere una cartella attività che contiene le attività su cui si vogliono ottenere informazioni.

    Utilizzare il metodo TaskService.GetFolder per ottenere la cartella .

  3. Ottenere la raccolta di attività dalla cartella .

    Utilizzare il metodo TaskFolder.GetTasks per ottenere la raccolta di attività (RegisteredTaskCollection).

  4. Ottenere il numero di attività nella raccolta ed enumerare ogni attività nella raccolta.

    Utilizzare l'insieme RegisteredTaskCollection di oggetti per ottenere un'istanza dell'oggetto RegisteredTask . Ogni istanza conterrà un'attività nella raccolta. È quindi possibile visualizzare le informazioni (valori delle proprietà) da ogni attività registrata.

Nell'esempio di VBScript seguente viene illustrato come enumerare una raccolta di attività registrate nella cartella dell'attività radice e visualizzare il nome e lo stato per ogni attività.

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

Uso dell'Utilità di pianificazione