PDA

Vollständige Version anzeigen : kennworteingabe funktioniert nicht (A97)


snick
25.09.2003, 13:17
Hallo,
um auf das Formular "Adressformular" zu kommen muss man einen Benutzer und ein Kennwort eingeben. Wenn ich nun aber das Passwort eingebe kommt immer eine Fehlermeldung (LAufzeitfehler 2465 : Access kann das in ihrem Ausdruck angesprochene Feld "Visible" nicht finden).


If Not IsNull(Me!Kombi_Benutzer) And Me!Kombi_Benutzer <> "" Then
If Not IsNull(Me!Kombi_Benutzer.Column(2)) And Me!Kombi_Benutzer.Column(2) <> "" Then
If Me!Kennwort = Me!Kombi_Benutzer.Column(2) Then
If Me!Kombi_Benutzer.Column(1) = "MARKETING" Then
Forms!Adressformular!BExport.Visible = True
Else
Forms!Adressformular!BExport.Visible = False
End If
Me!Visible = False
Forms!Adressformular.Visible = True
Else
MsgBox "Geben Sie bitte das korrekte Kennwort ein.", vbExclamation, "Falsches Kennwort"
End If
Else
' Kein Kennwort vergeben
If Me!Kombi_Benutzer.Column(1) = "MARKETING" Then
Forms!Adressformular!BExport.Visible = True
Else
Forms!Adressformular!BExport.Visible = False
End If
Me.Visible = False
Forms!Adressformular.Visible = True
End If
Else
MsgBox "Sie müssen einen Benutzer wählen !", vbCritical, "Fehlender Benutzer"
Me!Kombi_Benutzer.SetFocus
End If


kann mir einer weiterhelfen ? wenn ich Me!Visible = False rausnehme, sehe ich zwar das Formular, aber das Anmeldefenster bleibt offen und ich kann das Formular nicht markieren und drin arbeiten,

Hideloop
25.09.2003, 13:21
Me!Visible = False sollte me.visible=false sein

Loop

MRR
25.09.2003, 13:22
Geht es denn mit
Me.Visible = False
?

snick
25.09.2003, 13:23
thx :)