Was bewirkt die Anweisung "On Error Resume Next"?

Question

Ich kam zu einigen VBScript-Beispielen, und ich sah die Anweisung On Error Resume Next grundsätzlich am Anfang des Drehbuchs.

Was bewirkt es?

Answer 1

Sie sagt dem Programm im Grunde, dass es bei einem Fehler einfach in der nächsten Zeile weitergeht.

Answer 2

Es ist erwähnenswert, dass selbst wenn On Error Resume Next in Kraft ist, wird das Err-Objekt immer noch gefüllt, wenn ein Fehler auftritt, so dass Sie immer noch eine Fehlerbehandlung im C-Stil durchführen können.

On Error Resume Next

DangerousOperationThatCouldCauseErrors

If Err Then
    WScript.StdErr.WriteLine "error " & Err.Number
    WScript.Quit 1
End If

On Error GoTo 0

Answer 3

Wenn ein Fehler auftritt, wird die Ausführung in der nächsten Zeile fortgesetzt, ohne dass das Skript unterbrochen wird.

Answer 4

Das heißt, wenn ein Fehler in der Zeile auftritt, wird vbscript angewiesen, die Ausführung fortzusetzen, ohne das Skript abzubrechen. Manchmal ist die On Error folgt die Goto Etikett, um den Ablauf der Ausführung zu ändern, etwa so in einer Sub Codeblocks wissen Sie nun, warum und wie die Verwendung von GOTO kann zu Spaghetti-Code führen:

Sub MySubRoutine()
   On Error Goto ErrorHandler

   REM VB code...

   REM More VB Code...

Exit\_MySubRoutine:

   REM Disable the Error Handler!

   On Error Goto 0

   REM Leave....
   Exit Sub

ErrorHandler:

   REM Do something about the Error

   Goto Exit\_MySubRoutine
End Sub

Answer 5

Sie ermöglicht die Fehlerbehandlung. Das Folgende ist teilweise aus https://msdn.microsoft.com/en-us/library/5hsw66as.aspx

' Enable error handling. When a run-time error occurs, control goes to the statement 
' immediately following the statement where the error occurred, and execution
' continues from that point.
On Error Resume Next

SomeCodeHere

If Err.Number = 0 Then
    WScript.Echo "No Error in SomeCodeHere."
Else
  WScript.Echo "Error in SomeCodeHere: " & Err.Number & ", " & Err.Source & ", " & Err.Description
  ' Clear the error or you'll see it again when you test Err.Number
  Err.Clear
End If

SomeMoreCodeHere

If Err.Number <> 0 Then
  WScript.Echo "Error in SomeMoreCodeHere:" & Err.Number & ", " & Err.Source & ", " & Err.Description
  ' Clear the error or you'll see it again when you test Err.Number
  Err.Clear
End If

' Disables enabled error handler in the current procedure and resets it to Nothing.
On Error Goto 0

' There are also `On Error Goto -1`, which disables the enabled exception in the current 
' procedure and resets it to Nothing, and `On Error Goto line`, 
' which enables the error-handling routine that starts at the line specified in the 
' required line argument. The line argument is any line label or line number. If a run-time 
' error occurs, control branches to the specified line, making the error handler active. 
' The specified line must be in the same procedure as the On Error statement, 
' or a compile-time error will occur.