Cómo controlar Configuration Manager errores sincrónicos mediante WMI
Puede controlar los errores sincrónicos, en Configuration Manager, inspeccionando el SWbemLastError objeto cuando se produce un error. Se ha producido un error cuando la propiedad del objeto Number de error no es cero.
Nota:
En VBScript, debe declarar que desea reanudar la ejecución del script si se produce un error. De lo contrario, el script finalizará cuando se produzca una condición de error. Para ello, use la declaración en el On Error Resume Next script.
Ejemplo
En el siguiente ejemplo de VBScript se muestra la información de error más reciente que está disponible en el SWbemLastError objeto . Puede usar el código siguiente, que intenta obtener un paquete de SMS_Package no válido para probarlo.
Para obtener información sobre cómo llamar al código de ejemplo, vea Llamar a fragmentos de código de Configuration Manager.
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