Navigation

ilanray

Member
Local time
Today, 21:41
Joined
Jan 3, 2023
Messages
126
Hi
I have a code that hide the navigation pane (workd great)>
The problem is in form, when I click Right Click on the tab it let the users edit the form. how can I disable the right click menu?

Code:
Docmd.ShowToolBar "Ribbon", acToolBarNo
docmd.NavigationTo("acNavigationCategoryObjectType")
docmd.RunCommand (acCmdWindowHide)
 
Or provide users with a .accde
 
Am I the only one who clicked on this thread because I thought "Navation" was a cool new feature I didn't know about ?? Please!
 
So you were hoping for the equivalent of the floating mountains in Access? What would that be? One touch web page generation/ interaction / db synchronisation?
 
Code:
Forms("FormName").ShortcutMenu = true ' Or False'

I use a tempvar to handle the boolean
so when your first form opens [in my case frmSplash on the Load event:
I set that form to:
Code:
Forms("Splash").ShortcutMenu = False

Then I create a Tempvar called SCM

Now in any form depending on the user level [in my case] either SuperAdmin=1, Admin = 2 , etc.
only SA has SCM = TRUE

Yes the ACCDE doest it, sort of, still has a right Click, this solves that problem.
I know there are many other ways and more fancy, but this works, and is easy to handle.

By the way the only caveat is that you have to use that 1 line of code in each form you open
Code:
Forms("FormName").ShortcutMenu = TempVars("SCM").Value

but is a small price to pay.

Master Guru Colin Riddington @isladogs has a great resource I use frequently:
https://www.isladogs.co.uk/control-application-interface/index.html
 

Users who are viewing this thread

Back
Top Bottom