Disable Shift Code (help)
You need to write some code to disable the shift key upon startup. Here it is:
Dim db As DAO.Database
Dim myProp As Property
Set myProp = db.CreateProperty("AllowBypassKey", dbBoolean, False)
db.Properties.Append myProp
db.Properties("AllowBypassKey").Value = False
Hope this is what your looking for.
--Craig
" wrote:
Hi,
I'm sorry and need your help with code.
I'm trying to figure it out. After reading the information from the
group, I was not successful to block shift without opening the database
tables.
After finishing finalize the database (.mdb) and convert to the
database (.mde), I was able to open the database windows tables to hold
the shift and double click on the database (.mde). I'm looking for
permanent block on MDE database.
I did unchecked boxes from startup completely. I still open the
database by using "hold shift and double click on the MDE database".
Your help would be much appreciated.
Thanks
|