There is a possibility to stop the shift-key code to broke into the database.
In what place, and what code exactly is neccesary,
and how to make a password to come in by myself, so, don't exclude myself,
Quick answer: Go to startup menu and click "Advanced". Then uncheck "Use special access keys".
Long answer: Read faq181-1021. Contains tips and tricks for locking out users from your database design. (As well as making sure you as the designer still get in.) Maq B-)
<insert witty signature here>
Create 2 buttons( i have a password that makes them visible but you may just want to strategicly place them in an admin section of your database)
Private Sub Command61_Click()
Dim db As Database
Dim prp As Property
Set db = CurrentDb
Set prp = db.CreateProperty("AllowByPassKey", dbBoolean, False)
db.Properties.Append prp
MsgBox "System Lockdown, the shift key has been blocked"
DoCmd.Close
DoCmd.OpenForm "MainForm", acNormal
End Sub
Private Sub Command62_Click()
Dim db As Database
Set db = CurrentDb
db.Properties.Delete "AllowByPassKey"
db.Properties.Refresh
MsgBox "System open, the program is currently unlocked"
DoCmd.Close
DoCmd.OpenForm "MainForm", acNormal
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.