Hallo zusammen,
ich versuche mit unten stehenden Code ein Login zu programmieren.
Aber es kommt ständig der Fehler: Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben. & die cmd.ExecuteReader wird als Fehler markiert.
Kann mir hier jemand unter die Arme greifen und den richtigen Hinweis geben?
Vielen Dank.
Gruß, Mac
ich versuche mit unten stehenden Code ein Login zu programmieren.
Aber es kommt ständig der Fehler: Für mindestens einen erforderlichen Parameter wurde kein Wert angegeben. & die cmd.ExecuteReader wird als Fehler markiert.
Kann mir hier jemand unter die Arme greifen und den richtigen Hinweis geben?
VB.NET-Quellcode
- Private Sub cmdLogin_Click(sender As Object, e As EventArgs) Handles cmdLogin.Click
- Dim con As New OleDbConnection
- Dim cmd As New OleDbCommand
- Dim reader As OleDbDataReader
- Dim benutzer As String
- Dim passwort As String
- benutzer = txtBenutzer.Text
- passwort = txtPasswort.Text
- con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\schulcrt\Documents\AuditPlanner!.accdb;"
- cmd.Connection = con
- con.Open()
- cmd.CommandText = "select Benutzername, Passwort from Benutzer where Benutzer = '" & benutzer & "' and Passowrt = '" & passwort & "'"
- reader = cmd.ExecuteReader
- If reader.HasRows = True Then
- frmMain.mnuPlanner.Enabled = True
- frmMain.mnuViewer.Enabled = True
- End If
- con.Close()
- End Sub
Vielen Dank.
Gruß, Mac