[access/vba]

Résolu
choubaka71 Messages postés 14 Statut Membre -  
blux Messages postés 27838 Date d'inscription   Statut Modérateur Dernière intervention   -
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 27838 Date d'inscription   Statut Modérateur Dernière intervention   3 364
 
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