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 : Sélectionner tout - Visualiser dans une fenêtre à part
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