property:Clear
return type:void
content:ใช้กำหนดให้ รหัสของความผิดพลาดเท่ากับศูนย์ ( Err.Number = 0 )
ควรใช้คำสั่งนี้เสมอเมื่อแสดงความผิดพลาดแล้ว
example:On Error Resume Next
Dim yourAge
yourAge = Request.Form(“age”)
If youtAge <> “” Then
If yourAge < 0 Then
Err.Raise vbobjectError+1, , “Age must be more than Zero”
Else If yourAge > 150 Then
Err.Raise vbobjectError+2, , “Age must be less than 150”
End If
Call checkError
End If
Dim result
Result = 5/0
Call checkError
Sub checkError()
If Err.Number <> 0 Then
Response.Write “<u> Error occurred. </u><br>”
Response.Write “Number : “ & Err.Number & “<br>”
Response.Write “Description : “ & Err.Description
Err.Clear
End If
End Sub
