OVH Cloud OVH Cloud

ouverture de requete

4 réponses
Avatar
Laurent Rigaux
Bonjour,

Je cherche à parcourir les resultats d'une requete en VBA. Ma requete existe
et je l'ouvre en utilisant ce code:

Set qdf = bds.QueryDefs("Bilan microarret")
Set rst = qdf.OpenRecordset(dbOpenDynaset)

Mais j'ai un message sur la ligne openrecordset disant "trop peu de
parametres - 2 attendu".

Quelqu'un peut m'éclairer?

Merci d'avance

Laurent

4 réponses

Avatar
Raymond
Bonsoir.

cette erreur apparait lorsque la requête est paramétrée (dans ce cas 2
paramètres), soit directement dans paramètres soit dans les critères.
ta requête devrait être de ce modèle:
Dim Qdf As QueryDef
Dim Rst As Recordset
Dim Bds As Database
Set Bds = CurrentDb
Set Qdf = Bds.QueryDefs("Bilan microarret")
Qdf.Parameters("année") = "2003"
Qdf.Parameters("année1") = "2004"
Set Rst = Qdf.OpenRecordset(dbOpenDynaset)
.............
Set Bds = Nothing
Set Qdf = Nothing
Set Rst = Nothing

--
@+
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.


"Laurent Rigaux" a écrit dans le message de
news:u$wsP$
Bonjour,

Je cherche à parcourir les resultats d'une requete en VBA. Ma requete
existe

et je l'ouvre en utilisant ce code:

Set qdf = bds.QueryDefs("Bilan microarret")
Set rst = qdf.OpenRecordset(dbOpenDynaset)

Mais j'ai un message sur la ligne openrecordset disant "trop peu de
parametres - 2 attendu".

Quelqu'un peut m'éclairer?

Merci d'avance

Laurent




Avatar
Jean
Il te manque une donnée.
Exemple : tu cible 4 champs et tu envoi 3 champs de
données.
Avatar
Laurent Rigaux
Merci ,

Il s'agissait en fait de valeurs que je venait reprendre dans un formulaire
pourtant ouvert (je pensait que c'était faissable??)

Mais par contre je rencontre un autre soucis maintenant l'affectation du
recordset me donne une erreur incompatibilité de type.

Aurais tu une piste

Merci d'avance

Laurent


"Raymond" a écrit dans le message de news:

Bonsoir.

cette erreur apparait lorsque la requête est paramétrée (dans ce cas 2
paramètres), soit directement dans paramètres soit dans les critères.
ta requête devrait être de ce modèle:
Dim Qdf As QueryDef
Dim Rst As Recordset
Dim Bds As Database
Set Bds = CurrentDb
Set Qdf = Bds.QueryDefs("Bilan microarret")
Qdf.Parameters("année") = "2003"
Qdf.Parameters("année1") = "2004"
Set Rst = Qdf.OpenRecordset(dbOpenDynaset)
.............
Set Bds = Nothing
Set Qdf = Nothing
Set Rst = Nothing

--
@+
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.


"Laurent Rigaux" a écrit dans le message de
news:u$wsP$
Bonjour,

Je cherche à parcourir les resultats d'une requete en VBA. Ma requete
existe

et je l'ouvre en utilisant ce code:

Set qdf = bds.QueryDefs("Bilan microarret")
Set rst = qdf.OpenRecordset(dbOpenDynaset)

Mais j'ai un message sur la ligne openrecordset disant "trop peu de
parametres - 2 attendu".

Quelqu'un peut m'éclairer?

Merci d'avance

Laurent







Avatar
Raymond
Bonjour.

dans le modèle que je t'ai donné, c'est une procèdure qui fonctionne bien,
vérifie si tu as bien les bonnes définitions d'objets.

--
@+
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.


"Laurent Rigaux" a écrit dans le message de
news:%
Merci ,

Il s'agissait en fait de valeurs que je venait reprendre dans un
formulaire

pourtant ouvert (je pensait que c'était faissable??)

Mais par contre je rencontre un autre soucis maintenant l'affectation du
recordset me donne une erreur incompatibilité de type.

Aurais tu une piste

Merci d'avance

Laurent