Disable Shift Key on Startup

J

Jeff Boyce

Have you searched at Google.com on this topic? It's come through the
'groups a few times...

Good luck

Jeff Boyce
<Access MVP>
 
D

Deano

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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top