title image


Smiley Re: Ein Formular mit einem Paßwort vor nichterlaubten Zugriff schützen
HalloIch hab das so gelöst.Beim öffnen des Formular´sPrivate Sub Form_Open(Cancel As Integer)Dim pw, fname As Stringfname = Me.Namepw = InputBox("Bitte Passwort eingeben", "Passwort Abfrage")If pw "Dein Passwort" ThenDoCmd.Close acForm, fnameEnd IfEnd SubNachteil ist: Das Passwort kann man bei der eingabe sehen.Viel SpassJENS

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: