Error codes for secured database........

[mikehoot]

I use the following code to change the access error message for duplicate key values.

Private Sub Form_Error(DataErr As Integer, Response As Integer)
If DataErr = 3022 Then
MsgBox "The Label Code you entered is already in use. Please select another code."
Response = acDataErrContinue
Else
Response = acDataErrDisplay
End If
End Sub

I would like to do the same for errors when a user in a secured database does not have permissions for a certain event. Does anyone have any code, orknow the error numbers of this type of event?

Also, if there is more than one error number, how can I show this in code easily?

Thanks B-)