Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations sizbut on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Access security

Status
Not open for further replies.

klmorgan

Technical User
Aug 31, 2001
224
GB
Having written a small system in Access for friends I want to make only the switchboard on it accessable to anyone so that grandchildren etc can't get in and make changes.

I have used the Startup control to hide most of the toolbars but the window that allows access to the table, queries etc still shows minimised at the bottom of the screen is there a way to hide this? And if I do how can I get it back when needed?

I did manage to hide the Toolbar with the tools on it and then couldn't manage to get it back so had to recover from a backup!


Regards

Keith
 
You can uncheck the "Show Database Window" option that will hide the Database window.
Holding the SHIFT key while you open the db will unhide the DB Window and the tool/menubars.

Also to have a search for
1) Creating an MDE
2) Disabling SHIFT key on startup.
3) Password protection

________________________________________________________
Zameer Abdulla
Help to find Missing people
Sharp acids corrode their own containers.
 
Thanks Zameer

Are you referring to the display database tick box on the Start up menu? I have unchecked it but it still displays the menu for databases queries ect.

Any ideas?

The holding the shift is great, I can get back now.

Kind regards

Keith
 
Using this code will hide all the menu/toolbars. Try it on switchboard's Open Event.

Code:
Private Sub Form_Open(Cancel As Integer)

' Disable all Menus and Toolbars
Dim i As Integer

For i = 1 To CommandBars.Count
CommandBars(i).Enabled = False
Next i

End Sub

________________________________________________________
Zameer Abdulla
Help to find Missing people
Sharp acids corrode their own containers.
 
Thanks Zameer

I will have a try at this.

Do I just cut and paste this into the Switchboard open event box or do I somehow have to set up a procedure with it and call it from the Switchboard open event box?

How will I switch it back off when I want to get into modify the system?

Sorry if this is a bit basic, Access is new to me.

Kind Regards

Keith
 
When you are at design view of the form, bring up the property box. On the events tab look for Open Event click on the Ellipses button (three dots button)to go to the code window. Choose "Code builder" if choices prompted.
You will be taken to the code window
Code:
Private Sub Form_Open(Cancel As Integer)

End Sub

then type / paste other lines in between those lines.
Code:
Dim i As Integer
For i = 1 To CommandBars.Count
CommandBars(i).Enabled = False
Next i


________________________________________________________
Zameer Abdulla
Help to find Missing people
Sharp acids corrode their own containers.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top