Disable Shift at StartUp! Can't be so difficult, can it? Access 2002.

[PerryC]

I have search googles and there are hundreds of tips about
AllowByPassKey... however, none works for me... well, perhaps I am too
new to such high level functionality that it just does not make sense
to me. So, anyone please help. I have no idea what is
"CreateProperty" that Access help was trying to tell me to do. Can
anyone please write me a step by step on how to accomplish this?
(i.e. disable Shift on Startup.) I've seen many codes, but where do I
put them? At the Startup form? That does not work...

Sincerely,
PC

[Rick Brandt]

"PerryC" <pe******@yahoo.com> wrote in message
news:ea**************************@posting.google.c om...

I have search googles and there are hundreds of tips about
AllowByPassKey... however, none works for me... well, perhaps I am too
new to such high level functionality that it just does not make sense
to me. So, anyone please help. I have no idea what is
"CreateProperty" that Access help was trying to tell me to do. Can
anyone please write me a step by step on how to accomplish this?
(i.e. disable Shift on Startup.) I've seen many codes, but where do I
put them? At the Startup form? That does not work...

Perhaps it is the sequence that has you confused.

When you execute code to disable the Shift key it works for all sessions
AFTER the current one. In other words if you add code like this to a
Startup form, close the app, and then hold shift when you reopen it then
the shift key will still work. If you open it one time without holding
shift, then the key will be disabled for all *future* attempts to open it
while holding the key, but it will have no affect on the app until it is
closed.

That being the case you do not need to have a place where this code is run
every time the app is used. You need to call it once before you distribute
the app to your users and then you should be able to forget about it.
--
I don't check the Email account attached
to this message. Send instead to...
RBrandt at Hunter dot com

[Perry Cheng]

OK... Thanks. However, I copied this code of the board:

Public Sub SetAllowByPassKeyProperty()
dim db as database
dim prp as property

set db = currentdb
set prp = db.createproperty("AllowByPassKey", _
dbboolean, false, true)
db.properties.append prp
end sub
And paste it onto the Startup form "Switchboard" VB codes... and save
and exit... reenter without pressing Shift... then exit... come back
again with pressing shift... nothing happen... the shift still bring me
to the database tables... querry...

Hmmm... what am I missing?

Sincerely,
Perry

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Michael \(michka\) Kaplan [MS]]

Is the code being called?

Note that if it is then every time after the first you will get a runtime
error since you cannot create a property that already exists.
--
MichKa [MS]
NLS Collation/Locale/Keyboard Development
Globalization Infrastructure and Font Technologies

This posting is provided "AS IS" with
no warranties, and confers no rights.
"Perry Cheng" <pe******@yahoo.com> wrote in message
news:40*********************@news.frii.net...

OK... Thanks. However, I copied this code of the board:

Public Sub SetAllowByPassKeyProperty()
dim db as database
dim prp as property

set db = currentdb
set prp = db.createproperty("AllowByPassKey", _
dbboolean, false, true)
db.properties.append prp
end sub
And paste it onto the Startup form "Switchboard" VB codes... and save
and exit... reenter without pressing Shift... then exit... come back
again with pressing shift... nothing happen... the shift still bring me
to the database tables... querry...

Hmmm... what am I missing?

Sincerely,
Perry

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

[Albert D. Kallal]

Try my sample download at:

The above will let you switch the shift key for any database you have:

http://www.attcanada.net/~kallal.msn.../msaccess.html

--
Albert D. Kallal (MVP)
Edmonton, Alberta Canada
pl******************@msn.com
http://www.attcanada.net/~kallal.msn

[PerryC]

Albert,
I appreciate your help. I tried your little code program... but
no luck. I selected the database and then click enable bypass... what
else am I suppose to do? exit and then try to run my database once
without hitting the bypass key, then, run it again with the Shift key
to see if it works? Well, I tell you, I tried all kind of combination
to no avail. (I also tried to use the disable bypass key, just to see
if any of my DB codes change? Not that I can see.)

Please enlighten me.

Sincerely,
Perry

[Albert D. Kallal]

My example code will simply set, or un-set the shift key by-pass.

So, my example code does NOT change anything else in the database.

If you want to test, and see how the shift key works. Try download the 3rd
example at:

http://www.attcanada.net/~kallal.msn...s/DownLoad.htm

Now, try running that above sample you just downloaded.

You will notice that when you run that sample mail merge..that all the
access menus are hidden..and the start-up options that I set (in
tools->start-up) are used.)

Now, exit that database...and re-start it. However, hold down shift key
during the start-up...and you will NOT get my custom interface..but will be
free to view..and "see" how I setup the database. So, holding down the shift
key will disable all of the options that I set in the tools->start-up.
(those options for your custom database...and those options allow you to
hide things for your users).

Now, exit the database..and run my shift key utility..and disable the shift
key on that sample download. Now, run the sample download, and you will
notice that the shift key DOES NOT WORK..and as a result you can't get
inside the application. Give the above a try. To get back into my sample
application..you will thus have to exit the sample application...and then
run my shift-key app to un-unlock that application.

By the way..that sample application is also a great example of how to hide
all of the ms-access interface..and NO code was needed to hide all of the
ms-access stuff...but JUST the start-up options were used. So, hold down the
shift key..and then you can get inside the application and see what options
I used to hide everything.
--
Albert D. Kallal (MVP)
Edmonton, Alberta Canada
pl******************@msn.com
http://www.attcanada.net/~kallal.msn