Bonjour,

J'ai fait une connexion en ADO et je récupère les données mais je
n'arrive pas à les intégrer dans ma ListBox.

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
Sub ADOOpenRecordset()
    Dim cnn As New ADODB.Connection, rst As New ADODB.Recordset, fld As ADODB.Field
    ' Ouverture de la connexion
 
    strSQL = "SELECT * FROM LeTest"
    Set cnn = CurrentProject.Connection
 
    ' Ouverture du Recordset en défilement en avant, et en lecture seule
    rst.Open "SELECT * FROM LeTest", cnn, adOpenForwardOnly, adLockReadOnly
    While (rst.EOF = False)
         Liste2.AddItem (rst.Fields.Item(0).Value)
         rst.MoveNext
    Wend
 
 
    ' Fermeture du Recordset
    rst.Close
End Sub
J'ai l'erreur Objet Requis sur la ligne AddItem, alos qu'en propriété le nom de ma listeBox est bien Liste2" Y aurait il un moyen de récupèrer la liste de mes objets crées pour pouvoir y accéder ?
Merci de votre retour.

cdlt