OVH Cloud OVH Cloud

requête et formulaire

10 réponses
Avatar
Patrick
Salut

Est-ce possible de créer une requête à partir d'un formulaire.

Merci

Patrick

10 réponses

Avatar
3stone
Salut,

"Patrick" a écrit:
| Est-ce possible de créer une requête à partir d'un formulaire.


Regarde dans l'aide la fonction "CreateQueryDef"



--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Raymond
Bonsoir.

il est possible de créer une requête enregistrée à partir d'un formulaire:
Dim Rq As DAO.QueryDef
Set Rq = CurrentDb.CreateQueryDef("requête1", "select * from table1")
Rq.Close
Set Rq = Nothing
RefreshDatabaseWindow
(hors gestion des erreurs)
le texte sql peut être créé dans une variable et ensuite chargé dans la
requête par:
Set Rq = CurrentDb.CreateQueryDef("requête1")
Rq.SQL = "le texte de la requête"
Rq.Close


--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patrick" a écrit dans le message de
news:
Salut

Est-ce possible de créer une requête à partir d'un formulaire.

Merci

Patrick




Avatar
Patrick
Bonjour

Merci pour l'information, j'aimerais par contre, si c'est possible avoir un
peu plus d'information car je ne sais pas trop comment utiliser ce code.
Faut-il que jeme crée un formulaire avant, faut-il que j'écrive ce code dans
un nouveau module et l'attacher à un fomulaire???

Merci infiniement

Patrick

"Patrick" a écrit dans le message de
news:
Salut

Est-ce possible de créer une requête à partir d'un formulaire.

Merci

Patrick




Avatar
Raymond
Bonsoir.

il faut inclure ces fonctions dans ton formulaire à l'endroit où tu en a
besoin. dis-nous où et quand tu en as besoin (événement, bouton etc..)

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patrick" a écrit dans le message de
news:
Bonjour

Merci pour l'information, j'aimerais par contre, si c'est possible avoir
un

peu plus d'information car je ne sais pas trop comment utiliser ce code.
Faut-il que jeme crée un formulaire avant, faut-il que j'écrive ce code
dans

un nouveau module et l'attacher à un fomulaire???

Merci infiniement


Avatar
Patrick
Merci

"Raymond" a écrit dans le message de
news:%
Bonsoir.

il faut inclure ces fonctions dans ton formulaire à l'endroit où tu en a
besoin. dis-nous où et quand tu en as besoin (événement, bouton etc..)

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Patrick" a écrit dans le message de
news:
Bonjour

Merci pour l'information, j'aimerais par contre, si c'est possible avoir
un

peu plus d'information car je ne sais pas trop comment utiliser ce code.
Faut-il que jeme crée un formulaire avant, faut-il que j'écrive ce code
dans

un nouveau module et l'attacher à un fomulaire???

Merci infiniement





Avatar
lolo
Dim Rq As DAO.QueryDef
DAO.QueryDef est inconnu au bataillon, refus de déclaration, le

compilateur fait un léger bloquage


--
lolo
Pas plus con qu'un autre, mais bien servi quand même

Avatar
lolo
"lolo" avait soumis l'idée :
Dim Rq As DAO.QueryDef
DAO.QueryDef est inconnu au bataillon, refus de déclaration, le compilateur

fait un léger bloquage
bien le bonsoir (et veuiillez excuser mon impolitesse au passage)

au final, j'ai déclaré Rq en Variant et ça marche
le hic c'est que je ne voulais pas qu'access me fabrique une requête,
j'ai une palanquée de tables sur lesquelles je dois faire les mêmes
requêtes et j'aurais voulu les faire à la volée sans les inscrire en
dur, je ne sais pas comment faire


--
lolo
« Le travail est l’opium du peuple… Je ne veux pas mourir drogué. »
Boris VIAN


Avatar
3stone
Salut,

| le hic c'est que je ne voulais pas qu'access me fabrique une requête,
| j'ai une palanquée de tables sur lesquelles je dois faire les mêmes
| requêtes et j'aurais voulu les faire à la volée sans les inscrire en
| dur, je ne sais pas comment faire


Exemple pour créer une requête "temporaire"...

Extrait de l'aide :

Dim dbsNorthwind As Database
Dim qdfTemp As QueryDef

Set dbsNorthwind = OpenDatabase("Comptoir.mdb")

With dbsNorthwind
' Crée un objet QueryDef temporaire.
Set qdfTemp = .CreateQueryDef("", "SELECT * FROM Employés")
' Ouvre l'objet Recordset et imprime un état.
GetrstTemp qdfTemp
.Close
End With


--
A+
Pierre (3stone) Access MVP
-------------------------------------------------------
Bien démarrer ? c'est ici http://users.skynet.be/mpfa/
( Je ne réponds pas aux emails qui concernent Access )
-------------------------------------------------------
Avatar
Marc
Bonjour,

Quels types de requete veux-tu faire ?

Si ce sont des requete action (Req. Ajout,MiseAJour suppression) tu peux
utiliser la commande :

docmd.RunSQL "Ma requete"

cette commande execute directement la requete sans creer d'objet requete dans la
base de donnee

Sinon pour la requete selection la solution serait encore de passer par un
recordset

set rs = currentdb.OpenrecordSet("Ma requete")

Voila bonne chance,

A+ Marc



--
Ce message a ete poste via la plateforme Web club-Internet.fr
This message has been posted by the Web platform club-Internet.fr

http://forums.club-internet.fr/
Avatar
lolo
merci pour vos réponses
en fait, je souhaite faire plusieurs requêtes sélection que j'enverrais
dans excel pour traitement//rapprochement


--
lolo
« Il n'est pas d'individu plus fatalement malavisé que celui qui
consume la plus grande partie de sa vie à la gagner. »
Henry D. THOREAU : La vie sans principes.