[RESOLVED] Code for ERROR HANDLING !!!

[seema_s]

How can I write the code if I don't know or don't want to write error number?

Private Sub cmdfirst_Click()
On Error GoTo FIRST
rs.MoveFirst
show_rec
FIRST:
If Err.Number = 3021 Then 'How can I modify the code here?
End If
End Sub