recuperer un enregistrement de la base

bonsoir
je veux savoir comment je peux récupérer un enregistrement de la table dans un listbox (la base est faite avec ACCESS 2007)

voilà le code que j'ai écrit :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 Dim cn As New OleDbConnection
        cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\G.accdb"
        Try
            cn.Open()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 
        Dim dr As OleDbDataReader
        Dim cmd As New OleDbCommand
 
        cmd.CommandText = "select * from p"
        cmd.Connection = cn
        dr = cmd.ExecuteReader
'récupération des données
        Dim i As Integer = 0
        While dr.Read
            liste_p.Items.Add(dr.GetValue(i))
            i = i + 1
        End While

il me récupère que la première colonne de l'enregistrement
je sais que getvalue(i) récupère la valeur du colonne ....mais j'ai pas trouvé une autre méthode pour recupérer tout l'enregistrement

while dr.read sert à parcourir les lignes retournées par la requete
sur chaque ligne pour parcourir les colonnes il faut une boucle for

Code:

1
2
3
While dr.Read
      liste_p.Items.Add(dr("nom_du_champ_dans_la_base"))
End While

bonjour,
je peux vous donnez une autre solution:

Code:

1
2
3
4
 
 While dr.Read
            liste_p.Items.Add(dr.Item("numéro_du_champ_dans_la_base"))
        End While