recuperer les données access dans une listbox
Bonjour,
Je seche sur la récupération de données accès dans une listbox
Voici la portion de code écrite pour recuperer ces données.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
| Dim conn As New OleDb.OleDbConnection
Dim cmd As New OleDb.OleDbCommand
Try
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=h:\Projects\Gestion Inforlab\clients.mdb"
conn.Open()
cmd.Connection = conn
cmd.CommandText = "select * from clients"
Dim rd As OleDb.OleDbDataReader = cmd.ExecuteReader()
Do While rd.Read()
ListBox1.Items.Add(rd.GetString(0))
Loop
Catch ex As Exception
MessageBox.Show(ex.Message)
If conn IsNot Nothing Then
conn.Close() ''
End If
End Try |
Mais rien ne se passe et j'ai un message d'erreur
" Le cast spécifié n'est pas valide "
Est ce que ca vous parait normal ? sinon que dois je corriger ?
Merci
Olivier