[VB + ADO]Probléme de lecture d'une table
Salut, voici le code
Code:
1
2
3
4
5
6
7
8
9
10
| Private Sub Form_Load()
Dim s As String
Do
s = Adoclient.Recordset.Fields("code_postal")
Combocp.AddItem s
Adoclient.Recordset.MoveNext
Loop While (Not Adoclient.Recordset.EOF)
End Sub |
J'ai une base de donné access avec une table client qui contient 3 champs Nom prenom et code postal et ce que je veux faire pour l instant c'est charger au démarrage les codes postaux dans une combobox du form sous visualbasic.
pour faire la connexion avec la base de donné j'utilise un ADOdc.
le pb c'est que quand j'exécute la premier fois ça marche j'ouvre la liste il ya tous les codes postaux mais ensuite quand j'éxécute une deuxiéme fois la liste est vide et je me rend compte que tous les codes postaux se sont effacer de la table :cry: .
Cela signifie que lor de la premiére exécution les codes postaux ont été effacer.
Donc j'ai paramétré le composant ADOdc pour que la connection à la table ne se fais qu'en mode lecture et alors l'exécution s'arréte au moment ou elle arrive à la ligne
Adoclient.Recordset.MoveNext
ca qui signifie que c'est à ce moment que le code postal va etre suprimé.
on tient le coupable c'est cette instruction qui efface à chaque fois le code postal .
Comment faire pour déplacer le curseur sur l'enregistrement suivant sans effacer le code postal ?
Esc ce normal que MoveNext efface Le code postal avant de positionner le curseur sur l'enregistrement suivant?
Merci d'avance
