remplir un combobox par des donnes d'un champs accessRésolu

Question

bonjour tout le monde
j'ai fait la requette suivante 

requete = "select Nom fournisseur from Fournisseur "
Set rs = DTB.Execute(requete)
txtNomFrs.Clear 'on le vide au cas ou.
For I = 0 To rs.RecordCount
txtNomFrs.AddItem rs(1)
Next

mais j'ai trouvé le problème suivant au niveau d&#8217;exécution
Set rs = DTB.Execute(requete)

 erreur d&#8217;exécution "424" - objet requis

et j'ai rien compris comment résoudre ce problème

cs_Jack · Accepted Answer

Il te faut insérer chaque data dans ta ComboBox ?
Bah tu fais pareil que ce que tu écris en premier, en supposant que txtNomFrs soit une ComboBox (nom très mal choisi)
Choix de la syntaxe :
rs![Nom fournisseur]
rs.Fields("[Nom fournisseur]").Value
rs.Fields(1).Value

Mais tout ça, ça se trouve parmi les codes qui parlent de base de données - cherche un peu aussi ;-)

cs_Jack · Answer

Salut

Comment sont déclarés DTB et rs, de quels objets s'agit-il ?

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
[img]http://allproj

batmannet · Answer

salut
rs:
**partie dans un module
Public rs As ADODB.Recordset
et j'ai tous réglé.

DTB
j'ai pris 
-----requete = "select Nom fournisseur from Fournisseur "
Set rs = DTB.Execute(requete)
txtNomFrs.Clear 'on le vide au cas ou.
For I = 0 To rs.RecordCount
txtNomFrs.AddItem rs(1)
Next -----------
d&#8217;après notre site code-source.mais lorsque j&#8217;exécute il m'affiche le problème que j'ai deja lancé.
si vous avez une idée concernant mon problème je vous en pris de m'aider
                                MES SALUTATIONS DISTINGUÉES

cs_Jack · Answer

Normalement, le .Execute est réservé aux commandes ne renvoyant pas de données, comme les Insert Into ou les Delete
Pour charger une sélection, utiliser :
rs.Open LaRequete, LaConnexion, adOpenStatic, adLockReadOnly
D'autre part, si le nom du fournisseur est un seul et unique champ nommé "nom<espace>fournisseur", il faut encadrer ce nom par des crochets, sinon SQL ne saura pas interpréter cet espace
requete = "select [Nom fournisseur] from Fournisseur " De même pour tous les champs comportant des acents.
Les noms des champs doivent être scrupuleusement identiques à ceux déclarés dans la table.

batmannet · Answer

salut
oui tu as raison mais c'est au niveau d'ouverture de la connexion 
pour moi j'ai déjà fait ça ,

mon problème c'est comment prendre les infos dedans le [Nom fournisseur] et l'affecter au combobox lors de l'ouverture

on considère que dans load de la feuille la connexion sera ouverte

                                et merci beaucoup

batmannet · Answer

merci pour votre réponse votre parole m'a donné un ésprit de changer la façon de realiser ce projet (gestion de stock) .

                      merci de votre aide

Remplir un combobox par des donnes d'un champs access

6 réponses

Votre réponse