OVH Cloud OVH Cloud

[VBA] URGENT: Problème avec la méthode OpenRcordset

2 réponses
Avatar
Hpnimes
Bonsoir à tous,
Je souhaite ouvrir une requete afin d'utiliser certaines valeurs mais pas
toutes.
J'utilise pour cela le code suivant:
Dim db as Database
Dim req_recap_temps_total as QueryDef
Dim requete1 as Recorset

Set db = CurrentDb
Set req_recap_temps_total = db.QueryDefs("Req_Recap_Temps_Total")
Set requete1 = req_recap_temps_total.OpenRecordset(dbOpenDynaset)

or quand j'exécute cette démarche J'ai une erreur d'exécution '3061' qui dit
qu'il y a trop peu de paramètre (2 attendu)
Est-ce que quelqu'un pourrais me dire pourquoi j'obtiens une erreur ? Et
pourrait-il me dire quoi faire pour y remédier.
Encore merci à vous tous.

2 réponses

Avatar
3stone
Salut,

"Hpnimes" a écrit :
Je souhaite ouvrir une requete afin d'utiliser certaines valeurs mais pas
toutes.



Et qu'est ce qui t'empêche de ne PAS les utiliser toutes ?


J'utilise pour cela le code suivant:
Dim db as Database
Dim requete1 as Recorset

Set db = CurrentDb
Set req1 = db.OpenRecordset("Req_Recap_Temps_Total")




Debug.Print req1!Champ1
Debug.Print req1!Champ4
...


PS: Pour l'urgence, regarde dans l'aide en ligne, comment utiliser
un "openrecordset" !


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/charte.htm
--------------------------------------
Avatar
JJF
Hello,

Tu obtiens ce message parce que dans ta requête tu fais appel à des champs
d'un formulaire.
Tu peux remplacer ces variables par une fonction ou pour lancer ta requête
faire un docmd.runsql si tu ne fais pas de traitement spéciaux.
Ciao
"3stone" a écrit dans le message de news:
3fd85c20$0$299$
Salut,

"Hpnimes" a écrit :
> Je souhaite ouvrir une requete afin d'utiliser certaines valeurs mais


pas
> toutes.

Et qu'est ce qui t'empêche de ne PAS les utiliser toutes ?


> J'utilise pour cela le code suivant:
> Dim db as Database
> Dim requete1 as Recorset
>
> Set db = CurrentDb
> Set req1 = db.OpenRecordset("Req_Recap_Temps_Total")
>

Debug.Print req1!Champ1
Debug.Print req1!Champ4
...


PS: Pour l'urgence, regarde dans l'aide en ligne, comment utiliser
un "openrecordset" !


--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/charte.htm
--------------------------------------