[access/vba]

Résolu
choubaka71 Messages postés 14 Statut Membre -  
blux Messages postés 27813 Statut Modérateur -
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 27813 Statut Modérateur 3 363
 
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