listbox vullen met datareader

Status
Niet open voor verdere reacties.

robluttge

Nieuwe gebruiker
Lid geworden
7 okt 2012
Berichten
1
Goedemorgen!

Ik probeer zoals de titel aangeeft een listbox te vullen met gegevens uit een database en heb verschillende codes geprobeerd. Zie hieronder de laatste poging. Ik krijg alleen niets te zien in de listbox (geen errors oid). In debug mode lijkt het wel of de hele while end while loop overgeslagen wordt. Weet iemand wat ik over het hoofd zie?

Alvast bedankt!

Rob


Code:
    Private Sub Btn_Detail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btn_Detail.Click

        Dim conn As New SqlCeConnection(My.Settings.cs_kookclub)
        conn.Open()
        Dim sql As String = "SELECT * FROM leden ORDER BY Achternaam ASC"
        Dim cmd = New SqlCeCommand(sql, conn)
        Dim dr As SqlCeDataReader = cmd.ExecuteReader

        While (dr.Read())
            LB_Ledenlijst.Items.Add(dr("Achternaam").ToString)
        End While

    End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan