Partager via

Comment gérer les erreurs lors de la création d’un service de liaison

  • Article

Comme avec la plupart des scripts, vous devez écrire des fonctions pour gérer les erreurs. Ce gestionnaire d’erreurs analyse la file d’attente d’erreurs WMI (Windows Management Instrumentation) à la recherche d’informations et de publications d’erreur pertinentes et affiche l’erreur à l’utilisateur.

L’exemple suivant montre comment gérer les erreurs lors de la création d’un service de liaison :

Syntaxe

  
Sub PrintWMIErrorThenExit(strErrDesc, ErrNum)  
    On Error Resume Next  
    Dim objWMIError : Set objWMIError =    CreateObject("WbemScripting.SwbemLastError")  
    wscript.echo TypeName(objWMIError)  
  
    If ( TypeName(objWMIError) = "Empty" ) Then  
    wscript.echo strErrDesc & " (HRESULT: " & Hex(ErrNum) & ")."  
    Else  
    wscript.echo "Extended error information:"  
    wscript.echo objWMIError.Description  
    Set objWMIError = nothing  
    End If  
    Exit sub  
End Sub