Hide Development Tools / Tables / Queries....ect. depending on access level

[WickidWe]

Hi
I have created a simple login form that is based on
User Name and Password.

the table contains
UserName, First Name, Last Name, Password and User Role(dev, admin...ect.)

How can I change who can access different parts of the database?

I want all the Development tools only accessable to People who have "dev" as a "User Role"
Admin can only access the forms related to data entry
and managers can view all forms but not the tables, querie and tools...ect.

[June7]

Disable/enable ribbons and navigation pane and shortcut menus based on user role. This is rather complex coding.

Review

http://office.microsoft.com/en-us/ac...010341609.aspx

http://office.microsoft.com/en-us/ac...#_Toc265079114

[WickidWe]

where can I Find this code
Below is the code I am Using for my login though there is nothing that takes into account what
User role the user Has

Private Sub cmdLogin_Click()
On Error GoTo Err_ErrorHandler
'Check to see if data is entered into the UserName text box
    If IsNull(Me.txtUserName) Or Me.txtUserName = "" Then
            MsgBox "You must enter a User Name.", vbCritical, "Required Data"
            Me.txtUserName.SetFocus
        Exit Sub
    End If
'Check to see if data is entered into the password box
    If IsNull(Me.txtPassword) Or Me.txtPassword = "" Then
            MsgBox "You must enter a Password.", vbCritical, "Required Data"
            Me.txtPassword.SetFocus
        Exit Sub
    End If
'Check the values entered against the table data
    If DCount("*", "tblUsers", "[UserName] = '" & Me.txtUserName & "' AND [UserPassword] = '" & Me.txtPassword & "'") = 0 Then
        MsgBox "Either the UserName or Password are incorrect..." & vbCr & vbCr & "Press OK to try again", _
        vbCritical, "Invalid Credentials"
        Me.txtUserName = ""
        Me.txtPassword = ""
        Me.txtUserName.SetFocus
        
        
    Else
        DoCmd.OpenForm "frmButtons"
        DoCmd.Close acForm, "frmLogon", acSaveNo
    End If
    
    
exit_ErrorHandler:
    Exit Sub
Err_ErrorHandler:
    MsgBox Err.Description
    Resume exit_ErrorHandler
End Sub

at the moment once the User has Logged on and is taken to the frm buttons
it doesnt matter who logged in.

Is there a way that the person logged in is remembered by the database so only the specific options for their particular User Role
Are Used or displayed?

[June7]

My code saves the user ID to a textbox on a form that never closes (Main Menu) so it is always available for reference by subseqent code. Another method is a global declared variable. I avoid global variable because they can be a pain during debugging. If the code execution is interrupted the variable will lose its value.

I don't do much in the way of user restrictions. I do have code for customized ribbon and project settings disable shortcuts and hide navigation pane. I hold down the shift key when opening db to override settings and bypass code so I can do design edts. Anyone aware of the shift key bypass can do the same.

http://social.msdn.microsoft.com/For...orum=accessdev