Discussion :

[dominux80]

Bonjour,

Je fais une requete SQL dans laquelle je voulais reformater le prix_ttc en mode monetaire avec 2 chiffres apres la virgule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
requete_stats = "SELECT  mouvement.date_mouvement, mouvement.code_produit, mouvement.Libelle_produit, mouvement.categorie, mouvement.quantite, format((mouvement.prix_ttc),"" # ##0,00 €""), mouvement.code_utilisateur, mouvement.groupe, mouvement.service, mouvement.Nom_fournisseur, Year([date_mouvement]) AS annee_mvt From mouvement WHERE (((mouvement.date_mouvement)>=#" & Format(Me.CB_DTPicker1.Value, "YYYY/MM/DD") & "#"
    requete_stats = requete_stats & ") AND ((mouvement.date_mouvement)<=#" & Format(Me.CB_DTPicker2.Value, "YYYY/MM/DD") & "#) AND ((mouvement.code_produit) LIKE '" & tmp_CB_code_produit & "') AND ((mouvement.code_utilisateur) LIKE '" & Tmp_CB_Nom & "') AND ((mouvement.categorie) LIKE '" & Tmp_CB_categorie & "') AND ((Year([date_mouvement])) LIKE '" & Tmp_CB_annee & "') AND ((mouvement.groupe) LIKE '" & Tmp_CB_groupe & "') AND ((mouvement.service) LIKE '" & Tmp_CB_service & "'))"

et là erreur :
rsMaDb.Open requete_stats, cnMaDb, adOpenKeyset, adLockBatchOptimistic

'trop peu de parametre, 1 attendu'

je ne vois pas d'ou ça vient

Merci a tous


ma requete marche très bien sous access

marche très bien sous VB si l'enlève l'option de format de ma requete SQL, mais je me trouve avec 4 chiffres apres la virgule.

[Pierre Fauconnier]

Bonjour

Tu ne peux pas utiliser Format(...) pour passer une valeur numérique à un champ de la table, en plus du fait que ce n'est pas utile.

Si tu veux passer une valeur décimale arrondie au centième, tu dois utiliser Round(), mais cela n'a pas de sens de vouloir formater en monétaire.

C'est à l'affichage des données que tu vas formater, jamais à la sauvegarde de la valeur numérique

[dominux80]

Merci déjà de ta piste, mais ma requète remplis un MSHFlexGrid donc je ne vois pas comment faire, il faudrai que je fasse un format juste avant le refresh ?

et une piste pour le format

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

rsMaDb!prix_ttc = format((prix_ttc)," # ##0,00 €")

suis-je dans le bon ?

merci encore

[Delbeke]

Je sais pas comment tu arrives a t'y retrouver dans des requetes aussi mal présentées

On peut utiliser (si tu utilise le moteur jet) l'instruction format dans une requete Sql, mais attention a l'emploi des guillemets, la c'est vb qui rique de na pas bien comprrendre. Utilise plutot les quotes simples dans la requete et les doubles quotes tu les reserve à Vb

D'autre part, dans la base sql le format des dates est américain mm/dd/yyyy

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
requete_stats = "SELECT  " & _
                  "date_mouvement, " & _
                  "code_produit, " & _
                  "Libelle_produit, " & _
                  "categorie, " & _
                  "quantite, " & _
                  "format(prix_ttc,' # ##0,00 €'), " & _
                  "code_utilisateur, " & _
                  "groupe, " & _
                  "service, " & _
                  "Nom_fournisseur, " & _
                  "Year([date_mouvement]) AS annee_mvt " & _
              "FROM mouvement " & _
              "WHERE " & _
                "(((date_mouvement)>=#" & Format(Me.CB_DTPicker1.Value, "MM/DD/YYYY") & "#"

[ThierryAIM]

On peut utiliser (si tu utilise le moteur jet) l'instruction format dans une requete Sql, ...

Dans la clause SELECT ???

pour le reste je suis d'accord

[Pierre Fauconnier]

J'ai des doutes pour le Format dans du sql (et même si cela fonctionne, je préfère concaténer la chaîne avec le format à l'extérieur que de l'utiliser à l'intérieur), cela permet une meilleure vérification de la chaîne sql...
Mais de toute façon, il ne sert à rien d'utiliser Format avec un champ numérique. La façon dont est stockée la valeur dans la table n'est en rien influencée par la fonction Format...

Pour ce qui est des dates, je préfère personnellement passer les dates en tant que variables de type long, cela me pose bien moins de problèmes de conversion.

[dominux80]

Merci pour ta réponse Delbeke,

j'ai appris plusieurs choses d'un coup je ne savais pas le '" & _" pour aller a la ligne. et le formatage est bon sauf que c'est '# ##0.00' c'est un point pas une virgule.

Et ma requéte était plus longue, ça donnait ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
'requete_stats = "SELECT  " & _
    '              "date_mouvement, " & _
    '              "code_produit, " & _
    '              "Libelle_produit, " & _
    '              "categorie, " & _
    '              "quantite, " & _
    '              "format(prix_ttc,' # ##0,00 €'), " & _
    '              "code_utilisateur, " & _
    '              "groupe, " & _
    '              "service, " & _
    '              "Nom_fournisseur, " & _
    '              "Year([date_mouvement]) AS annee_mvt " & _
    '          "FROM mouvement " & _
    '          "WHERE " & _
    '            "(((mouvement.date_mouvement)>=#" & Format(Me.CB_DTPicker1.Value, "YYYY/MM/DD") & "#" & _
    '            "AND ((mouvement.date_mouvement)<=#" & Format(Me.CB_DTPicker2.Value, "YYYY/MM/DD") & "#) " & _
    '            "AND ((mouvement.code_produit) LIKE '" & tmp_CB_code_produit & "') " & _
    '            "AND ((mouvement.code_utilisateur) LIKE '" & Tmp_CB_Nom & "') " & _
    '            "AND ((mouvement.categorie) LIKE '" & Tmp_CB_categorie & "') " & _
    '            "AND ((Year([date_mouvement]) LIKE '" & Tmp_CB_annee & "') " & _
    '            "AND ((mouvement.groupe) LIKE '" & Tmp_CB_groupe & "') " & _
    '            "AND ((mouvement.service) LIKE '" & Tmp_CB_service & "'))"

mais merci beaucoup

[Delbeke]

Dans la clause SELECT ???

pour le reste je suis d'accord

Sisi, Avec le moteur jet, on peut utiliser toutes les fonctions contenues dans la bibliothèque VBA