Textfeld mit Kennwort sichern

30/12/2007 - 10:54 von Werner Meier | Report spam
Hallo,

in meinem Endlosformular möchte ich drei von sechs Textfeldern mit einem
Kennwort schützen.
Der Anwender soll also in drei Tf. eine Eingabe machen können.
In den anderen dreien nicht bzw. nur wenn er das Kennwort vorher eingibt.
Wie kann ich das am elegantesten hinbekommen?

Vielen Dank im Voraus. Werner
 

Lesen sie die antworten

#1 Thomas Möller
30/12/2007 - 11:11 | Warnen spam
Hallo Werner,

Werner Meier schrieb:
in meinem Endlosformular möchte ich drei von sechs Textfeldern mit
einem Kennwort schützen.
Der Anwender soll also in drei Tf. eine Eingabe machen können.
In den anderen dreien nicht bzw. nur wenn er das Kennwort vorher
eingibt. Wie kann ich das am elegantesten hinbekommen?



Du formatierst die Steuerelemente standardmàßig als "gesperrt".
Dann fügst Du eine Schaltflàche ein. Dort fragst Du das PWD ab. Wenn das
PWD richtig ist aktivierst Du die entsprechenden Steuerelemente wieder,
z. b.:

Dim strPWD As String

strPWD = InputBox("Bitte Passwort eingeben.")

If strPWD = "Richtig" Then
Me!DeinTextfeld1.Locked = False
Me!DeinTextfeld2.Locked = False
Me!DeinTextfeld3.Locked = False
Else
Msgbox "Passwort falsch!"
End If


HTH
Thomas

Homepage: www.Team-Moeller.de

Ich wünsche allen den berühmten Guten Rutsch ins neue Jahr.

Ähnliche fragen