Just nu i M3-nätverket
Gå till innehåll
MvS

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

Rekommendera Poster

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

Dela detta inlägg


Länk till inlägg
Dela på andra webbplatser

Skapa ett konto eller logga in för att kommentera

Du måste vara medlem för att kunna kommentera

Skapa ett konto

Skapa ett nytt konto på vårt forum. Det är lätt!

Registrera ett nytt konto

Logga in

Redan medlem? Logga in här.

Logga in nu



×
×
  • Skapa nytt...