Hallo zusammen,
ich habe mal wieder ein Problem. Und zwar wird bei mir der Fehler Laufzeitfehler 94 "Unzulässige Verwendung von Null" angezeigt. Dabei dürfte es eigentlich keinen Zugriff auf ein Leeres Feld geben. Vielleicht habe ich mal wieder etwas übersehen. Ich stelle den Code mal ein und hoffe, mir kann einer von euch weiterhelfen.
Private Sub cmdLogIn_Click()
Dim PassOri As String
' Füllen der Felder überprüfen
If IsNull(cboBenutzername) Then
MsgBox "Bitte wählen Sie einen Mitarbeiter aus."
txtPasswort = Null
cboBenutzername.SetFocus
cboBenutzername.Dropdown
GoTo ende
End If
If IsNull(txtPasswort) Then
MsgBox "Bitte geben Sie das Passwort ein."
txtPasswort = Null
txtPasswort.SetFocus
GoTo ende
End If
' Passwortkontrolle
If txtPasswort <> cboBenutzername.Column(2) Then
MsgBox "Das eingegebene Passwort ist falsch. Bitte wiederholen Sie Ihre Eingabe."
txtPasswort = Null
txtPasswort.SetFocus
GoTo ende
End If
' User und Recht merken
ZALKUser = cboBenutzername.Column(1)
ZALKPw = cboBenutzername.Column(2)
ZALKRecht = cboBenutzername.Column(3)
ZALKIaner = cboBenutzername.Column(4)
ZALKVorname = cboBenutzername.Column(5)
' Hauptmenü öffnen
DoCmd.OpenForm "frmZALK"
' Form schliessen
DoCmd.Close acForm, Me.Name
ende:
End Sub
In dem von mir rot markierten Text tritt der Fehler auf. Wenn ich die drei letzten Anweisungen "rausnehme" funktioniert es.
Danke und Gruß
W.
Hallo,
die Spaltenzählung einen Kombis beginnt mit 0, hast Du das bedacht ?
Hallo,
Was sind denn diese "ZALKxxx"-Objekte? Woher kommen und welchen Datentyp haben diese?
Prüfe, ob die Kombifeld_Eigenschaft "Spaltenanzahl" auf 6 steht,
und nutze, falls dann noch erforderlich, die NZ()-Funktion, im Falle von Datentyp TEXT bei den "ZALKxxx" Variablen(?).
ZALKUser = nz(cboBenutzername.Column(1),"")
ZALKPw = nz(cboBenutzername.Column(2),"")
ZALKRecht = nz(cboBenutzername.Column(3),"")
ZALKIaner = nz(cboBenutzername.Column(4),"")
ZALKVorname = nz(cboBenutzername.Column(5),"")
Moin,
ich bedanke mich recht herzlich für die schnelle Hilfestellung.
Bezüglich der einzelnen Objekten handelt es sich um eine Vorgabe. Da wir gerade dabei sind, vier DB zusammenzuführen, muss man sich manchmal an Deklarationen vorheriger halten. Aber die waren auch alle richtig eingebunden. Habe einfach vergessen, dass ich die Spaltenzahl erhöhen muss. Sitze seit ein paar Wochen an dem Teil und manchmal verliert man einfach mal die Übersicht.
Jetzt nur noch eine Dumme Frage; jetzt zeigt das Kombinationsfeld alle Spalten aus der Liste an, wie kann man das nochmal ändern? So, dass nur noch der Username sichtbar ist?
Sorry, bin gerade etwas durch und habe seit ca. 15 Jahren nichts mehr in dieser Richtung gemacht
Hallo,
setze die Spaltenbreiten der nicht anzuzeigenden Spalten auf 0cm.
Super! Danke! Das hat meinem alten Hirn gefehlt! Einfach mal wieder etwas in die Welt der DB´s abtauchen!