cs_ITALIA
Messages postés2169Date d'inscriptionvendredi 20 avril 2001StatutMembreDernière intervention30 juin 200910 17 janv. 2005 à 15:15
En D.A.O..
En Cochant Projet..Références : Microsoft DAO 3.51 Object Library
Le Code :
Set Db = OpenDatabase("C:\MaBase.mdb") ' Définition base de donnée
Set Req = Db.OpenRecordset("SELECT * FROM TaTable ")
If Req.RecordCount<>0 Then
Do Until Req.eof
ListEnreg.AddItem Req("TonChamp")
Req.MoveNext
Loop
End If
Set Db=Nothing
Set Req=Nothing