Error handling in UFT / VBScript

'Will Returns the Error.no and corresponding Error description


On Error Resume Next

For i = 1 To 10

    Err.Raise i
    MsgBox "Err no: = " & Err.Number & "  Desc: = " & Err.Description


Next


...