Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Sie behandeln synchrone Fehler im Configuration Manager, indem Sie das SWbemLastError Objekt überprüfen, wenn ein Fehler auftritt. Ein Fehler ist aufgetreten, wenn die Fehlerobjekteigenschaft Number ungleich Null ist.
Hinweis
In VBScript sollten Sie erklären, dass Sie die Ausführung des Skripts fortsetzen möchten, wenn ein Fehler auftritt. Andernfalls wird das Skript beendet, wenn eine Fehlerbedingung eintritt. Verwenden Sie dazu die On Error Resume Next Deklaration in Ihrem Skript.
Beispiel
Im folgenden VBScript-Beispiel werden die neuesten Fehlerinformationen angezeigt, die für das SWbemLastError Objekt verfügbar sind. Sie können den folgenden Code verwenden, mit dem versucht wird, ein ungültiges SMS_Package Paket abzurufen, um es zu testen.
Informationen zum Aufrufen des Beispielcodes finden Sie unter Aufrufen von Configuration Manager-Codeausschnitten.
Sub ExerciseError(connection)
On Error Resume next
Dim packages
Dim package
' Run the query.
Set package = connection.Get("SMS_Package.PackageID='UNKNOWN'")
If Err.Number<>0 Then
Call DisplayLastError
End If
End Sub
Sub DisplayLastError
Dim ExtendedStatus
' Get the error object.
Set ExtendedStatus = CreateObject("WbemScripting.SWBEMLastError")
' Determine the type of error.
If ExtendedStatus.Path_.Class = "__ExtendedStatus" Then
WScript.Echo "WMI Error: "& ExtendedStatus.Description
ElseIf ExtendedStatus.Path_.Class = "SMS_ExtendedStatus" Then
WScript.Echo "Provider Error: "& ExtendedStatus.Description
WScript.Echo "Code: " & ExtendedStatus.ErrorCode
End If
End Sub