Access et ado
Tomsower
Messages postés
25
Date d'inscription
lundi 27 janvier 2003
Statut
Membre
Dernière intervention
5 mai 2006
-
29 avril 2003 à 17:30
neo3015 Messages postés 35 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 19 mai 2003 - 29 avril 2003 à 18:00
neo3015 Messages postés 35 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 19 mai 2003 - 29 avril 2003 à 18:00
1 réponse
neo3015
Messages postés
35
Date d'inscription
mercredi 5 février 2003
Statut
Membre
Dernière intervention
19 mai 2003
29 avril 2003 à 18:00
29 avril 2003 à 18:00
ajouter la référence dao 3.6 je crois
dim rst as recordset
dim qry as querydef
dim db as database
set db = opendatabase ("le path de ta base de donnée")
' ou application.currentdb.pathset qry db.createquerydef ("","select * from LeNomDeLaTable where NomDeClase "" NomDeClasseATrouver"")
set rst = qry.openrecordser
set NomCombo.recordsource = rst
tout ca si tu travail en programmation,
sinon il suffit de mettre dans la propriété recordsource (source de controle je crois en francais)
select * from LeNomDeLaTable where NomDeClase = ""
NomDeClasseATrouver""
je ne suis pas sur exactement, mais ca doit ressembler a ca....
bon courage ;)
dim rst as recordset
dim qry as querydef
dim db as database
set db = opendatabase ("le path de ta base de donnée")
' ou application.currentdb.pathset qry db.createquerydef ("","select * from LeNomDeLaTable where NomDeClase "" NomDeClasseATrouver"")
set rst = qry.openrecordser
set NomCombo.recordsource = rst
tout ca si tu travail en programmation,
sinon il suffit de mettre dans la propriété recordsource (source de controle je crois en francais)
select * from LeNomDeLaTable where NomDeClase = ""
NomDeClasseATrouver""
je ne suis pas sur exactement, mais ca doit ressembler a ca....
bon courage ;)
