Reinventing the Web

By Al Williams

Dr. Dobb's Sourcebook May/June 1997

(a)	On Error Resume Next
	Some_Operation
	If Err.Number <> 0 Then ...
	Another_Operation
	If Err.Number<> 0 Then ...
	 .  . .
	End Sub

(b)	On Error GoTo ErrHandle
	Some_Operation
	Another_Operation
	Exit Sub
	ErrHandle:
	  ' Put Error code here
	End Sub

Example 3: Using the On Error GoTo statement.

Back to Article