Hallo zusammen bin vb neuling und ´folgendes Problem:

die mesagebox soll daten aus mysql anzeigen drei felder der tabelle aber nix tutu sich..
fehlermeldung keine.. der ausgewählte soll übergeben werden und zwar die tid

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged         Dim con As New Odbc.OdbcConnection         Dim cmd As New Odbc.OdbcCommand         Dim reader As Odbc.OdbcDataReader           con.ConnectionString = "DSN=odbc_tserver"         con.ConnectionString = "Provider=MSDASQL;" _            & "Driver={MySQL ODBC 5.1 Driver};" _            & "Server=192.168.178.0;UID=ich;PASSWORD=du; " _            & "database=lenz"         cmd.Connection = con         cmd.CommandText = "select name jahr tid from lenz_turnier order by jahr DESC"           Try             con.Open()             reader = cmd.ExecuteReader()             lstTab.Items.Clear()             Do While reader.Read()                 ComboBox1.Items.Add("TID :" & reader("tid") & " Jahr " _                     & reader("jahr") & " Turnier " _                     & reader("name"))             Loop             reader.Close()             con.Close()         Catch ex1 As Exception             ComboBox1.Items.Add(ex1.Message)           End Try     End Sub

Hallo ronaldl,

ich sehe auf den ersten Blick nur eine kleine Korrektur.

'Original
"select name jahr tid from lenz_turnier order by jahr DESC"
'Korrektur
"select name, jahr, tid from lenz_turnier order by jahr DESC"

Vielleicht wars dies schon.

Gruß ANI