security

[redandblack]

i want to make different levels of access availiable in my database but everytime I finish using the wizard the database will not open saying that i do not have the rights to get into it. can anybody see what i may be doing wrong?

 

[redandblack]

please help me

 

[gecko_1]

I also have this problem, along with lots of people.
So I have created access levels using the user name of the person loged on.
Comparing LanUserID to a tblUsers UserID

I then disable the menus and the shift key using

Function SetBypassKey(rbFlag As Boolean) As String
On Error GoTo SetBypassKey_Error

Dim db As Database
Set db = CurrentDb
db.Properties!AllowBypassKey = rbFlag
If rbFlag Then
    SetBypassKey = "Allow shift Key"
Else
    SetBypassKey = "Shift Key disabled"
End If


SetBypassKey_Exit:
   Exit Function
   
SetBypassKey_Error:
   If Err = 3270 Then
      'AllowBybassKey property does not exist
      db.Properties.Append _
         db.CreateProperty("AllowBypassKey", _
         dbBoolean, rbFlag)
      Resume Next
   Else
      'Some other error
      MsgBox "Unexpected error: " & Error$ & " (" & Err & ")"
      Resume SetBypassKey_Exit
   End If

End Function

The database can still be linked from another access database so its not very secure, but its puts people off where I work.

But if anyone knows how to use the Access Security I want to know to.

 

[redandblack]

hrm...seems this problem is a common one