HI THIS IS MY FIRST POST SO BE GENTLE
OK WHEN I OPEN A FORM I HAVE THE FOLLOWING CODE IN THE ON OPEN FUNCTION
Private Sub Form_Open(Cancel As Integer)
On Error GoTo Err_Form_Open
If User.AccessID = 1 Then
Me.cmdAdmin.Enabled = True
Else
Me.cmdAdmin.Enabled = False
End If
Exit_Form_Open:
Exit Sub
Err_Form_Open:
MsgBox Err.Description
Me.Visible = True
Resume Exit_Form_Open
End Sub
I WOULD LIKE TO ADD A SECOND ACCESS NUMBER TO THE CODE IE:
If User.AccessID = 1 2 Then
BUT I CANT SEEM TO WORK OUT THE CODE TO DO THIS ANY HELP WILL BE APPRECIATED
THANKS
ROB

OK WHEN I OPEN A FORM I HAVE THE FOLLOWING CODE IN THE ON OPEN FUNCTION
Private Sub Form_Open(Cancel As Integer)
On Error GoTo Err_Form_Open
If User.AccessID = 1 Then
Me.cmdAdmin.Enabled = True
Else
Me.cmdAdmin.Enabled = False
End If
Exit_Form_Open:
Exit Sub
Err_Form_Open:
MsgBox Err.Description
Me.Visible = True
Resume Exit_Form_Open
End Sub
I WOULD LIKE TO ADD A SECOND ACCESS NUMBER TO THE CODE IE:
If User.AccessID = 1 2 Then
BUT I CANT SEEM TO WORK OUT THE CODE TO DO THIS ANY HELP WILL BE APPRECIATED

THANKS
ROB