Différence entre Integer et double?

Dans l'instruction SQL suivante :
"

Code:

---

1 2	UPDATE MaTable SET Champs =" & Calcul " WHERE etc....

---

Si Calcul est déclaré Integer il n'y a pas de problème, par contre s'il est déclaré Double, je récupère une erreur de syntaxe. Pourquoi cela?
Ma zone de calcul peut souvent dépasser la capacité d'une zone déclarée Integer.
Merci

:tagcode: :merci:
FRANK

Bonjour,

Ce n'est pas le type Long qui conviendrait ?

Si le champ déclaré "double" contient une valeur sans décimale ça marche par contre s'il contient des décimales je récupère une erreur de syntaxe

Re,

Problème de séparateur :

point <=> virgule

Citation:

---

Envoyé par Michel DELAVAL

Dans l'instruction SQL suivante :

Code:

---

UPDATE MaTable SET Champs =" & Calcul & WHERE etc....

---

Si Calcul est déclaré Integer il n'y a pas de problème, par contre s'il est déclaré Double, je récupère une erreur de syntaxe. Pourquoi cela?

---

Parce que VBA produit une représentation de la valeur contenue dans Calcul en utilisant la syntaxe définie dans les paramétrages régionaux de Windows. Donc le séparateur décimal est très certainement une virgule alors que SQL accepte seulement le point comme séparateur décimal.

Pourquoi ne pas laisser faire Access en faisant appel à une fonction intégrée qui génère les expression SQL (en général pour des critères) en respectant la syntaxe:

Code:

---

UPDATE MaTable SET " & BuildCriteria("Champs", dbDouble, Calcul) & " WHERE etc....

---

Même problème avec BuidCriteria

Citation:

---

Envoyé par Michel DELAVAL

Même problème avec BuidCriteria

---

Bon :? , vive le débogage :wink: :

Code:

---

1 2 3 4

Dim SQL As String   SQL="UPDATE MaTable SET " & BuildCriteria("Champs", dbDouble, Calcul) & " WHERE <à compléter>;" Debug.Print SQL

---

Dis nous ce qui s'affiche dans la fenêtre d'exécution.

Il n'y a pas de bug, l'instruction Debug ne fait rien.
Acces retourne seulement le message : Erreur de syntaxe dans l'instruction UPDATE.

Re,

Avant de construire ta requête SQL, as-tu essayé de faire ça ?

Code:

---

1 2	Calcul = Replace(Calcul, ",", ".")

---

Citation:

---

Envoyé par Michel DELAVAL

Il n'y a pas de bug, l'instruction Debug ne fait rien.
Acces retourne seulement le message : Erreur de syntaxe dans l'instruction UPDATE.

---

Connais-tu la fenêtre d'exécution ?
On utilise Debug.Print dans le code VBA pour afficher du texte dans cette fenêtre d'exécution. C'est un outil de débogage.

Reporte-toi au chapitre III du tutoriel:
http://cafeine.developpez.com/access...el/debugprint/

Sinon, à la place mets un MsgBox:

Code:

---

1 2 3 4

Dim SQL As String   SQL="UPDATE MaTable SET " & BuildCriteria("Champs", dbDouble, Calcul) & " WHERE <à compléter>;" MsgBox SQL

---

UPDATE MaTable SET Champs

je serais toi je vérifierais le type de champs

J'ai essayé avec Replace. J'ai du définir une zone Calculbis comme variant
Relace a fonctionné sur Calculbis, mais je récupere du texte (par exemple "312.123". Calculbis n'est pas accepté comme numérique.
Comment "traduire" ce texte en ciffre?

N'y a-t-il pas quelques choses de plus simple pour mettre à jour un enregistrement spécifique d'une table?

Re,

As-tu essayé d'éxécuter cette requête ?

Code:

---

1 2 3 4 5

Dim SQL As String   CalculBis = Replace(Calcul, ",", ".") SQL="UPDATE MaTable SET " & BuildCriteria("Champs", dbDouble, CalculBis) & " WHERE <à compléter>;"

---

Cette nouvelle requete ne marche pas.

Re,

Et ça ?

Code:

---

1 2 3

CalculBis = Replace(Calcul, ",", ".") UPDATE MaTable SET Champs =" & CalculBis & WHERE etc....

---

A première vue ça a marché, je vais pousser plus loin les tests.
En tout cas merci pour votre aide.

Cependant n'y a-t-il pas dans acces une autre méthode que UPDATE...SET pour mettre à jour un enregidtrement spécifique d'une table?