VBScript 런타임 오류 처리 > script

VBScript 런타임 오류 처리
Microsoft® VBScript가 Err 개체를 제공하고 이 개체가 VBA Err 개체와 동일한 메서드 및 속성을 사용하기는 하지만, VBScript를 사용한 오류 처리기 작성은 VBA의 경우와는 다릅니다. VBScript에서는 On Error 문의 기능이 제한되기 때문에 VBA에서는 가능한 주요 작업을 수행할 수 없습니다. 예를 들어, VBScript에서는 On Error GoTo ErrorHandler 구문을 사용하여 오류 처리기로 분기할 수 없습니다. 대신 On Error Resume Next 구문으로 오류 처리 기능을 사용할 수만 있습니다.

다음 코드에서는 스크립트의 오류 처리기 부분을 보여줍니다. 스크립트는 간단한 분할을 수행한 직후 오류가 발생했는지 확인하고 결과에 따라 적절히 응답합니다.

intResult = intNumerator/intDenominator

' 판단 결과 오류가 있는지 검사합니다.
If Err <> 0 Then
   Select Case Err.Number
      Case DIVIDE_BY_ZERO
         If Len(txtDenominator.Value) = 0 Then
            strErrorResultText = "Missing!"
         Else
            strErrorResultText = "'" & txtDenominator.Value & "'"
         End If
         strErrorMessage = "Error: " & Err.Number & _
            vbCrLf & vbCrLf & "The value you entered in the " _
            & "text box was: " & strErrorResultText
         txtDenominator.Focus
      Case Else
         strErrorMessage = "Error: " & Err.Number & _
            vbCrLf & vbCrLf & "Unrecognized error!"
   End Select
   MsgBox strErrorMessage, CRITICAL_ERROR + MSGBOX_OKONLY, _
      "Error Type = " & Err.Description
End If