Also die Source hat ein Error wegen diese
Und das ist der Source darüber und darunter Bitte um Hilfe der Fehler wird mir angezeigt
Screen:
Mydata = Command.ExecuteReader
Und das ist der Source darüber und darunter Bitte um Hilfe der Fehler wird mir angezeigt
Dim myadapter As New MySqlDataAdapter
Dim sqlquary = "SELECT * FROM user WHERE username = " & UsernameTextBox.Text & " AND password = " & PasswordTextBox.Text & " ;"
Dim Command As New MySqlCommand
Command.Connection = Mysqlconnection
Command.CommandText = sqlquary
myadapter.SelectCommand = Command
Dim Mydata As MySqlDataReaderMydata = Command.ExecuteReaderIf Mydata.HasRows = 0 ThenMessageBox.Show("Sorry Falsche Eingabe")ElseMessageBox.Show("Willkommen: " & UsernameTextBox.Text)End If
Screen: