[SQL] [VBA] UPDATE nombre à virgule

Bonsoir,

J'exécute en VBA, une requête sql de type mise à jour.

En raccourci, la voila :

Code:

---

1 2 3 4 5

Dim curTotalHt As Currency Dim curTotalTtc As Currency Dim strSQL As String strSQL = "UPDATE [commande] SET [total_HT] = " & curTotalHt & ", [total_TTC] = " & curTotalTtc _ & " WHERE [id_commande]=49;"

---

Elle fonctionne bien tant que les valeurs des variables sont des nombres entiers,
mais bugge dès qu'une valeur est un nombre à virgule.

Comment faire?

Je pourrais faire ma mise à jour par DAO, mais si possible, je préfère trouver comment faire en SQL.

Merci

Bonsoir,

Le séparateur décimal d'une valeur numérique littérale doit être le point dans une instruction SQL.
L'utilisation de Str(..) pour convertir les valeurs numériques en texte, devrait solutionner le problème.

Code:

---

1 2	strSQL = "UPDATE [commande] SET [total_HT] = " & Str(curTotalHt) & ", [total_TTC] = " & Str(curTotalTtc) _ & " WHERE [id_commande]=49;"

---

A+

Merci LedZeppII,

c'est vraiment pratique que Str() remplace automatiquement la virgule par un point, du coup mon code sera vite corrigé.

D'ailleurs votre tuto est très clair :ccool:

A+,