Guten Morgen zusammen,
ich versuche gerade, in einer VB.NET Anwendung eine SQL Abfrage Richtung Access zu steuern.
Aus der Accessdatei will ich auslesen, ob der User berechtigt ist, die Anwendung zu nutzen oder nicht:
Wenn ich mit einem User anfrage, der nicht in der Access steht, erhalte ich im reader.read() ein "False" zurück.
Durch die integrierte If möchte ich entscheiden, was dann passiert.
Allerdings läuft er mir sowohl bei "True" als auch bei "False" in den Else-Teil rein.
Ich habe es auch schon mit ungleich versucht oder If not.
Hat auch nicht geholfen.
Sowohl bei einem berechtigen als auch bei einem unberechtigten User ist es immer das selbe Ergebnis?!
Hat jemand eine Idee, woran es liegen könnte?
Vielen Dank im Voraus für eure Rückmeldung.
ich versuche gerade, in einer VB.NET Anwendung eine SQL Abfrage Richtung Access zu steuern.
Aus der Accessdatei will ich auslesen, ob der User berechtigt ist, die Anwendung zu nutzen oder nicht:
VB.NET-Quellcode
- 'Aufbau der Datenbankverbindung zum Auslesen der UserDaten
- Dim con As New OleDb.OleDbConnection
- Dim cmd As New OleDb.OleDbCommand
- Dim reader As OleDb.OleDbDataReader
- 'Es wird ein ConnectionString zur AccesDatenbank aufgebaut.
- con.ConnectionString =
- "Provider=Microsoft.ACE.OLEDB.12.0;" &
- "Data Source=C:\Users\xxxxxxxxx.accdb;" &
- "Jet OLEDB:Database Password = xxxxxxxxx;"
- cmd.Connection = con
- cmd.CommandText = "select 1 from BENUTZER where WINDOWSUSER = '" & TextBox1.Text & "'"
- Try
- con.Open()
- reader = cmd.ExecuteReader()
- Debug.Print("reader.Read() Beginn: " & reader.Read().ToString)
- If reader.Read() = True Then
- MessageBox.Show("klappt")
- Else
- MessageBox.Show("klappt nicht")
- End If
- Debug.Print("reader.Read() Ende: " & reader.Read().ToString)
- reader.Close()
- con.Close()
- Catch ex As Exception
- 'Wenn eine falsche, bzw. leere Eingabe gemacht wurde, erfolgt eine Fehlermeldung.
- MessageBox.Show(text:=ex.Message,
- icon:=MessageBoxIcon.Error,
- buttons:=MessageBoxButtons.OK,
- caption:="Berechtigungsprüfung konnte nicht durchgeführt werden.")
- End Try
Wenn ich mit einem User anfrage, der nicht in der Access steht, erhalte ich im reader.read() ein "False" zurück.
Durch die integrierte If möchte ich entscheiden, was dann passiert.
Allerdings läuft er mir sowohl bei "True" als auch bei "False" in den Else-Teil rein.
Ich habe es auch schon mit ungleich versucht oder If not.
Hat auch nicht geholfen.
Sowohl bei einem berechtigen als auch bei einem unberechtigten User ist es immer das selbe Ergebnis?!
Hat jemand eine Idee, woran es liegen könnte?
Vielen Dank im Voraus für eure Rückmeldung.