Moin Moin,
wir haben folgendes Problem:
Eine MySQL Datenbank mit einer Tabelle Namens fahrzeug - Darunter befinden sich Vier Spalten Einträge mit jeweils folgenden Daten:
id , kennung, status, besetzt
Die Kennung liegt in einem Label in einer Form. Wir möchten jetzt aus der Kennung im Label in der Form, die id des Fahrzeuges, in ein Label auslesen.
Datenbankverbindung funktioniert.
Es werden keine Fehlermeldungen ausgegeben. Das
Für eure Hilfe schon mal im voraus vielen Dank.
PS.: Wegen der Hartcodierung - Läuft Lokal
LG
wir haben folgendes Problem:
Eine MySQL Datenbank mit einer Tabelle Namens fahrzeug - Darunter befinden sich Vier Spalten Einträge mit jeweils folgenden Daten:
id , kennung, status, besetzt
Die Kennung liegt in einem Label in einer Form. Wir möchten jetzt aus der Kennung im Label in der Form, die id des Fahrzeuges, in ein Label auslesen.
Datenbankverbindung funktioniert.
VB.NET-Quellcode
- Public Class kfz_verwaltung
- Dim conn As New MySqlConnection
- Dim cmd As New MySqlCommand
- Private Sub kfz_verwaltung_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- 'Aufbau Mysql Verbindung und schreiben in die Datenbank
- conn.ConnectionString = "server=xxx.xxx.xxx.xxx;userid=meinuser;password=meinpasswort;database=meinedatenbank"
- cmd.Connection = conn
- cmd.CommandText = "SELECT * FROM fahrzeug WHERE kennung = '" & Label2.Text & "' ORDER BY id DESC"
- conn.Open()
- 'Auslesen Fahrzeug ID
- reader = cmd.ExecuteReader
- Try
- While reader.read()
- Label4.Text = reader("id")
- End While
- Catch ex As Exception
- MessageBox.Show(ex.Message, "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Error)
- End Try
- conn.Close()
- 'Schreiben der Belegung des Fahrzeuges
- 'Try
- 'cmd.CommandText = "UPDATE `fahrzeug` SET `besetzt` = '1' WHERE `fahrzeug`.`id` = '" & Label4.Text & "'"
- 'conn.Open()
- 'cmd.ExecuteNonQuery()
- 'Catch ex As Exception
- 'MessageBox.Show(ex.Message, "Fehler", MessageBoxButtons.OK, MessageBoxIcon.Error)
- 'End Try
- 'conn.Close()
- End Sub
- End Class
Es werden keine Fehlermeldungen ausgegeben. Das
Label4
bleibt einfach leer.Für eure Hilfe schon mal im voraus vielen Dank.
PS.: Wegen der Hartcodierung - Läuft Lokal
LG
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „MrJaWo“ ()