Disable Shift Key on Startup

  • Thread starter Thread starter Deano
  • Start date Start date
Have you searched at Google.com on this topic? It's come through the
'groups a few times...

Good luck

Jeff Boyce
<Access MVP>
 
Having searched google, found this website
http://techonthenet.com/access/security/disable_shift.htm with the following
code.
Sub DisableShiftKey()

Dim db As DAO.Database
Dim prp As DAO.Property

Set db = CurrentDb
db.Properties.Delete "AllowBypassKey"
Set prp = db.CreateProperty("AllowBypassKey", dbBoolean, False, True)
db.Properties.Append prp

db.Properties.Refresh

Set prp = Nothing
Set db = Nothing

End Sub

And it works a treat. Thought I'd post it here as others may require it.
There are other snipits of code on the site for you to enable it aswell.



Thanks for recommendations
 
Back
Top