Resetting Right-Click functionality

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • RLN

    Resetting Right-Click functionality


    RE: Access 2003

    I wanted to turn off right clicking on forms so users couldn't go into
    design mode and change stuff.
    I have a special "programmer s' form that, when a password is put in,
    enables F11 so I can go modify objects in the container.

    Now I cannot even right click in the container.

    I tried looping through the forms and resetting the shortcut menu
    property to "Yes". This did not work and I still cannot right-click on
    my forms or the DB container.

    Does anyone have an example of code that would reset this property
    across all forms and the container as well?

    Here is the code I have so far that does not work correctly:

    Dim frm As Form
    For Each frm In Forms
    Debug.Print frm.Name
    frm.ShortcutMen u = True 'allow right clicking on all forms
    Next frm

    thnx...


    *** Sent via Developersdex http://www.developersdex.com ***
  • Tom van Stiphout

    #2
    Re: Resetting Right-Click functionality

    On Fri, 06 Jun 2008 12:33:28 -0500, RLN <nospamrln@devd ex.comwrote:

    Couldn't you simply ship an MDE to your users?
    -Tom.

    >
    >RE: Access 2003
    >
    >I wanted to turn off right clicking on forms so users couldn't go into
    >design mode and change stuff.
    >I have a special "programmer s' form that, when a password is put in,
    >enables F11 so I can go modify objects in the container.
    >
    >Now I cannot even right click in the container.
    >
    >I tried looping through the forms and resetting the shortcut menu
    >property to "Yes". This did not work and I still cannot right-click on
    >my forms or the DB container.
    >
    >Does anyone have an example of code that would reset this property
    >across all forms and the container as well?
    >
    >Here is the code I have so far that does not work correctly:
    >
    >Dim frm As Form
    >For Each frm In Forms
    Debug.Print frm.Name
    frm.ShortcutMen u = True 'allow right clicking on all forms
    >Next frm
    >
    >thnx...
    >
    >
    >*** Sent via Developersdex http://www.developersdex.com ***

    Comment

    • RLN

      #3
      Re: Resetting Right-Click functionality



      Yes, I could do an MDE. I was just trying to see if there was a way to
      hide the "dangerous menus" form the users, then restore them once the
      app had closed.

      *** Sent via Developersdex http://www.developersdex.com ***

      Comment

      Working...