Discussion :

[Ronaldinho]

Bonjour,
j'ai un formulaire qui me permet de selectionner des critère pour effectuer une requête SELECT, j'ai vérifié la requète et elle fonctionne, le problème à l'air de venir de l'execution de ma requête et pourtant j'ai essayé différentes techniques mais toujours la même erreur, voici mon code:

Code :

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

1
2
3
4
5
 
Set db = CurrentDb
 
requete = "SELECT * FROM SAFIG WHERE Code_Fonction='" & Controls("txt_codefct1") & "'"
Set rcdst = db.OpenRecordset(requete, dbOpenDynaset)

Je crée bien mes deux objet db et rcdst et il m'affiche l'erreur:

"Erreur d'éxecution '3061':
Trop peu de paramètres. 1 attendu."
et ce sur la ligne "Set rcdst=db.Open......"

Please help me!
Merci

[Oleff]

Bonjour,

A priori, code_fonction est un champ texte, le quote ', ne permet d'encadrer que le texte simple, si tu passes par exemple des guillemets, ça te provoque un erreur.

Pour vérifier la requête passée, je te conseille de rajouter

Code :

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

1
2
3
requete = "SELECT * FROM SAFIG WHERE Code_Fonction='" & Controls("txt_codefct1") & "'"
Debug.print requete
Set rcdst = db.OpenRecordset(requete, dbOpenDynaset)

à ton code.
Aprèes éxécution tu pourras contrôler dans la fenêtre de débogage (Ctrl + G) le texte exact de la requête transmise au moteur SQL et de détecter les erreurs.

[Ronaldinho]

Merci beaucoup pour ta réponse, maintenant ça fonctionne
Ce n'est pas ta solution qui m'a aidée mais rien que le fait de lire sur ton message le nom de mon champ, m'a fait prendre conscience que je n'avais pas renommé mon champ mais juste l'affichage du champ et du coup il ne le reconnaissait pas.

Merci à toi!