Jenny I would like to make 1 suggestion on your code. Don't think it will help your crashing but it will make the code more efficient
Change
Code:
'Assign a security level number to variable Security
Security = DLookup("Usersecurity", "QryUser", "[UserLogin] = '" & Me.txtuser & "'")
If Security = 1 Then
Me.NavbuttonAdm.Enabled = True
End If
If Security = 2 Then
Me.NavbuttonAdm.Enabled = False
End If
If Security = 3 Then
Me.NavbuttonCM.Enabled = False
Me.NavbuttonAdm.Enabled = False
End If
To
Code:
'Assign a security level number to variable Security
Security = DLookup("Usersecurity", "QryUser", "[UserLogin] = '" & Me.txtuser & "'")
Select Case Security
Case is = 1
Me.NavbuttonAdm.Enabled = True
Case is = 2
Me.NavbuttonAdm.Enabled = False
Case is = 3
Me.NavbuttonCM.Enabled = False
Me.NavbuttonAdm.Enabled = False
End Select
For what you're doing the Select statement is more efficient.