Remplir un combobox a partir d'une table access [Résolu]

Signaler
Messages postés
10
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
1 janvier 2009
-
Messages postés
10
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
1 janvier 2009
-
salut a vous tous, j'ai besoin de votre aide.
je dois remplir un combobox à partir d'une colonne donnée d'une table access, voici mon code :

Set rsMachines = db.OpenRecordset("SELECT Machine FROM Machines")
If rsMachines.RecordCount > 0 Then
   
    rsMachines.MoveFirst
    
     Do While rsMachines.BOF = False
     LMach.AddItem rsMachines!Machine
     rsMachines.MoveNext
     Loop


Else
MsgBox ("Plus d'enregistrement")
End If

le bleme c'est en recordcount me donne 11 enregistrement, et en execustion ca me donne l'erreur : 3021 pas d'enregistrement en cours

qui peut me sortir de cette impasse
Merci d'avance

4 réponses

Messages postés
48
Date d'inscription
samedi 5 août 2006
Statut
Membre
Dernière intervention
9 novembre 2009

Salut;
pour quoi tu a met :
Do While rsMachines.BOF = False
et non :
Do While not rsMachines.EOF
Messages postés
10
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
1 janvier 2009

t'a effectivement raison l'ami,


tn code marche, mais est ce que ca ne revient pas a dire la meme chose ?!!!
Messages postés
48
Date d'inscription
samedi 5 août 2006
Statut
Membre
Dernière intervention
9 novembre 2009

Salut;
BOF = Begin Of File   ' debut du fichier
EOF = End Of File      ' fin du fichier
Not rsMachines.EOF equivalent a   rsMachines.EOF = False
tu remarque la deference :
rsMachines.EOF = False
rsMachines.BOF = False
Bon codage @+
Messages postés
10
Date d'inscription
jeudi 30 novembre 2000
Statut
Membre
Dernière intervention
1 janvier 2009

Merci l'ami de l'explication