Just nu i M3-nätverket
Jump to content
Sign in to follow this  
MvS

Formulär med villkorad visning av verktygsfält "Ribbon"

Recommended Posts

Hej där ute i forumet!

Jag försöker med mina högst begränsade kunskaper i VBA att göra två saker:

  1. Att få en login-ruta att öppna ett formulär med olika villkor. Jag har fyra behörighetsnivåer varav nivå 1 är högsta behörigheten. För att ge ett presentabelt användargränssnitt använder jag kod-snutten: DoCmd.ShowToolbar "Ribbon", acToolbarNo för att förhindra onödigt fingrande i strukturen av obehöriga. Men jag vill kunna styra det hela så att den eller de som har högsta behörigheten (dvs 1) undantas från denna restriktion och att formuläret öppnas med "Ribbon" för dem.
  2. Det andra är att när formuläret öppnas för alla, att i en kontroll ange "current user" dvs. inloggat användarnamn. Käll-(login)formuläret heter "frmLogin" med aktuell kontroll "cboUser" och målformuläret "Master" med aktuell kontroll "inlogg_ctrl". 

Någon bevandrad inom VBA som kan hjälpa mig? Login-skriptet har jag hittat på nätet men försöker med mina ringa kunskaper att "skohorna" in mina tillägg, givetvis med uselt resultat...

Bifogar det aktuella skriptet nedan. 

 

//Magnus

Login VBA.txt

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  



×