[SQL]Problème requete sql sous access avec vba

Voilà, je voudrais executer une requete sous access, mais cela ne fonctionne pas sur le update, voila le code :

Code:

---

1 2 3 4 5 6 7 8 9 10

Fichier = "'" & Fichier & "'"     sql = "select trig from utilisateur where nom=" & Var Set rs = db.OpenRecordset(sql) Var = rs.Fields("trig") Var = "'" & Var & "'" sql = "update fiche set trig_dem = " & Var & " where titre = " & Fichier db.Execute sql db.Close

---

Merci d'avance.

Bonjour,

Code:

---

Debug.print sql

---

te permettra de voir ce que tu essaies d'éxécuter à chaque appel et te permettras d'y voir un peu plus clair.

Ou faut-il que je le place?

Personne n'est un pro du VBA?

Citation:

---

Fichier = "'" & Fichier & "'"
Var = "'" & Var & "'"

---

Affectation bizard !
Que contient tes variable?

Mes variables contient du texte, mais pour les mettre dans du sql il faut qu'il y ait des cotes simple au debut et a la fin.

Alors en les déclarant comme des String cela devrait suffir.
Essai de mettre les affectations en commentaires pour voir ce que ca donne!

Par ailleurs ta requête devrait pouvoir s'écrire plus simplement.

Code:

---

1 2 3 4 5

sql = "update fiche set trig_dem = " & Var & " where titre = (select trig from utilisateur where nom="' & Var & '")"   'Tu peux mettre ici un Debug.Print(sql)

---

En affichant la fenetre d'exécution tu verras la valeur de la variable sql.

La requête est bonne. J'ai toujours mon message d'objet requis.

a première vu comme ca je dirais qu'il manque l'initialisation de Var avec les guillemet avant la requete.

Code:

---

1 2	Var = "'" & Var & "'" sql = "select trig from utilisateur where nom=" & Var

---

s'il y a erreur:

Citation:

---

J'ai toujours mon message d'objet requis.

---

je pense qu'il est là. pas dans le update.