[access/vba]

Résolu/Fermé
choubaka71 Messages postés 14 Date d'inscription vendredi 11 mai 2007 Statut Membre Dernière intervention 30 décembre 2008 - 14 mai 2007 à 08:51
blux Messages postés 26746 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 28 mars 2025 - 14 mai 2007 à 09:37
Bonjour a tous,

Dans mon code vba j'execute la requete suivante et renvoie le résultat dans une text box mais l'exception suivante est levé, je ne comprend pas. Pouvez vous m'aider?

Voici ma requete : Set oRst = oDb.OpenRecordset("SELECT Count(*) FROM production WHERE [Nom Machine] = " & Nom_Machine & "")

voici le message d'erreur : erreur d'execution "3061"
too fiew parameters. expected1

1 réponse

blux Messages postés 26746 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 28 mars 2025 3 332
14 mai 2007 à 09:37
Salut,

si nom_machine est de type chaine, alors il faut l'enquoter :
Set oRst = oDb.OpenRecordset("SELECT Count(*) FROM production WHERE [Nom Machine] = '" & Nom_Machine & "';") 
0