Ich habe alles gemacht wie im Video und am ende ist da ein Bug drin, der verändert alle Datensätze der Tabelle.
Kann jemand mir Helfen das zu beheben.
Hier der Code
VB.NET-Quellcode
- Private Sub button_save_Click(sender As Object, e As EventArgs) Handles button_save.Click
- OPEN()
- Try
- SQL = "UPDATE customer SET Name_des_Users='" & text_name.Text & "',Eindeutige_ID_des_Users='" & text_ID.Text & "',IP_Adresse='" & text_ip.Text & "',Datum_und_Uhrzeit='" & text_datum_uhrzeit.Text & "',Eindeutige_ID_des_Users='" & text_ID.Text & "',Strafpunkte='" & text_Strafpunkte.Text & "',Grund='" & RichTextBox1.Text & "',Eingetragen_von='" & text_eingetragen.Text & "'"
- Command.Connection = MySQL
- Command.CommandText = SQL
- Adapter.SelectCommand = Command
- Data = Command.ExecuteReader()
- Data.Close()
- MySQL.Close()
- Form1_Load(Nothing, Nothing)
- MsgBox("Die Daten wurden erfolgreich bearbeitet.", vbInformation, "Erfolgreich")
- Catch ex As Exception
- Timer1.Stop()
- MsgBox(ex.Message, vbCritical, "Fehler")
- End Try
- End Sub