Hallo Leute,
ich habe Google etc. schon nach meinem Problem befragt. aber es gibt da nichts was passt.
Ich möchte aus einer MySQL DB den Benutzernamen abrufen und in eine Combobox packen.
Hier der Code
Im Punkt:
kommt die Meldung "Connection must be valid and open."
ich bin für Hilfe dankbar.
Grüße
ich habe Google etc. schon nach meinem Problem befragt. aber es gibt da nichts was passt.
Ich möchte aus einer MySQL DB den Benutzernamen abrufen und in eine Combobox packen.
Hier der Code
VB.NET-Quellcode
- Dim MySQL_Conn As New MySqlConnection
- Dim MySQL_SQLCommand As String
- Dim MySQL_Conn_String As String
- Dim MySQL_DB_Reader As MySqlDataReader
- Dim MySQL_DB_Adapter As MySqlDataAdapter
- Dim MySQL_DB_Command As New MySqlCommand
- Dim DB_CFG As String = System.Windows.Forms.Application.StartupPath & "\sys\cfg\database.cfg" ' Hier ist der ConnString drin.
- 'Constring: Server=192.168.15.99;Database=qs;Uid=db_user;Pwd=fjklgkhfjksdgkjhfgahrousghajsgjkdfsjkghfkjgs;
- Dim DBCFG_file = IO.File.ReadAllLines(DB_CFG)
- MySQL_Conn_String = DBCFG_file(7)
- Try
- MySQL_Conn.ConnectionString = DBCFG_file(7)
- Catch ex As Exception
- MessageBox.Show(ex.Message)
- End Try
- Try
- MySQL_SQLCommand = "SELECT Benutzername FROM user"
- MySQL_DB_Command.CommandText = MySQL_SQLCommand
- MySQL_Conn.Open()
- MySQL_DB_Reader = MySQL_DB_Command.ExecuteReader
- ' Database.MySQL_Connection_Open()
- Catch myerror As MySqlException
- MsgBox("Keine Verbindung zur Datenbank : " & myerror.Message.ToString) ' Falls Fehler : Fehler anzeigen
- End Try
- While (MySQL_DB_Reader.Read())
- cbo_Username.Items.Add(MySQL_DB_Reader("Benutzername"))
- cbo_Username.Sorted = True
- End While
- MySQL_Conn.Close()
Im Punkt:
kommt die Meldung "Connection must be valid and open."
ich bin für Hilfe dankbar.
Grüße
Grüße von mir
P.S. Bitte keine schlauen Kommentare wie (Grundlagen blablabla...) danke
P.S. Bitte keine schlauen Kommentare wie (Grundlagen blablabla...) danke