Discussion :

[guen]

Bonjour

Comment se fait-il que la déclaration d'un recordse de la façon suivante ne fonctionne pas et me dise : 1 parmètre manquant (monParamètre...) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
dim rst as DAO.Recordset
dim SQL as string
 
SQL = "SELECT * FROM MaTable WHERE MonChamp=" & Forms![tartenpion].monParamètre
 
set rst = CurrentDb.OpenRecordset(SQL)

alors que le SQL s'affiche trés bien avec monParamètre si je fais un debug.print SQL...

merci

[Demco]

alors que le SQL s'affiche trés bien avec monParamètre si je fais un debug.print SQL...

Et as-tu essayé d'exécuter cette requête SQL voir si elle était correcte ?

Aussi, pensez à mentionner le numéro de l'erreur ainsi que le texte exacte de l'erreur dans ce genre de situation.

En espérant t'aider.

[faressam]

Bonjour

Comment se fait-il que la déclaration d'un recordse de la façon suivante ne fonctionne pas et me dise : 1 parmètre manquant (monParamètre...) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
dim rst as DAO.Recordset
dim SQL as string
 
SQL = "SELECT * FROM MaTable WHERE MonChamp=" & Forms![tartenpion].monParamètre
 
set rst = CurrentDb.OpenRecordset(SQL)

alors que le SQL s'affiche trés bien avec monParamètre si je fais un debug.print SQL...

merci

C'est Exactement le problème que j'avais, et je viens de le résoudre gràce à ça :

Alors pour commencer :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
SQL = "SELECT * FROM MaTable WHERE MonChamp= " & _ ' saut de Ligne -->& _  "Forms![tartenpion].monParamètre;"

Puis tu Rajoutes au lieu de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 set rst = CurrentDb.OpenRecordset(SQL)

Tu rajoute

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CurrentDb.Execute (SQL)

[guen]

le message d'erreur est : "Trop peu de paramètre : 1 attendu" erreur 3061
La requête s'exécute trés bien en SQL sous le requêteur ACCESS (appel classique à un paramètre d'un formulaire).
Si je remplace mon paramètre par la valeur en dur, mon recordset fonctionne trés bien...

Pour faressam : je ne comprends pas pourquoi le saut de ligne change qq chose mais je vais essayer mais ensuite, je ne veux pas exécuter ma requête (d'ailleur c'est une requête sélection et non action) mais déclarer un recordset qui alimente une liste listeview...

merci de votre aide à tous les 2

[guen]

Laissez tomber il n'y avait en fait aucune erreur dans mon code !!! mais une erreur dans ma requête source...désolé pour le temps perdu !

[faressam]

ça arrive

[Demco]

C'est Exactement le problème que j'avais, et je viens de le résoudre gràce à ça :

Alors pour commencer :

Code :

SQL = "SELECT * FROM MaTable WHERE MonChamp= " & _ ' saut de Ligne -->& _ "Forms![tartenpion].monParamètre;"



Puis tu Rajoutes au lieu de
Code :

set rst = CurrentDb.OpenRecordset(SQL)


Tu rajoute
Code :

CurrentDb.Execute (SQL)

Juste pour info car je viens de voir ça ... je ne pense pas vraiment que ton problème soit résolu. L'instruction CurrentDb.Execute, a ma connaissance, n'est absolument pas adapté à prendre en paramètre une requête de sélection, mais uniquement une requête d'action (UPDATE, INSERT ...).

[faressam]

oui tu as raison,
je pense que pour un Simple Select:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
 
Dim Req As QueryDef
Dim StrSql As String
 
 
Set Req = CurrentDb.CreateQueryDef("ReqCR", StrSql