대부분의 스크립트와 마찬가지로 오류를 처리하는 함수를 작성해야 합니다. 이 오류 처리기는 WMI(Windows Management Instrumentation) 오류 큐에서 관련 오류 정보 및 게시물을 검색하고 사용자에게 오류를 표시합니다.
다음 샘플에서는 링크 서비스를 만드는 동안 오류를 처리하는 방법을 보여줍니다.
문법
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