requete avec paramètre de date
Le
Txl
Bonjour à tous,
J'ai un form qui me permet d'entrée une date de début et une date de
fin
Ensuite je veux faire un graphique en ne prenant que les valeurs dont
la date est comprise entre celles définies dans le form
Tout marche bien, le form stocke bien les dates mais à chaque fois le
form graphique me balance 2 boites de dialogues qui me demandent la
date de début et de fin alors que je les ai déja indiquées
Voila le bout de code qui me stocke les valeurs de dates dans le form
sur le bouton "complet" du form qui affiche toutes les dates, j'ai
fait des boutons prédéfinis genre "année en cours" et 2 contrôles
indépendants que je peux remplir à la main
Private Sub Complet_Click()
Dim debut As Date
Dim fin As Date
debut = #1/1/2001#
fin = #1/1/2099#
Me!debut = debut
Me!fin = fin
DoCmd.SetWarnings False
DoCmd.RunMacro "macfrmgraph"
End Sub
Voila le texte de la requête
SELECT tblgraph.Montant, DSum("Montant","tblgraph","[refinsert] < " &
[refinsert]) AS Solde, tblgraph.ref, tblgraph.Echeance
FROM tblgraph
WHERE (((tblgraph.Echeance)>DateValue([frmgraphselect].[debut]) And
(tblgraph.Echeance)<DateValue([frmgraphselect].[fin])))
ORDER BY tblgraph.Echeance;
Je bute la dessus depuis ce matin, j'ai tenté avec des #, des (, des
"&, enfin bon bref.
Merci de votre aide
J'ai un form qui me permet d'entrée une date de début et une date de
fin
Ensuite je veux faire un graphique en ne prenant que les valeurs dont
la date est comprise entre celles définies dans le form
Tout marche bien, le form stocke bien les dates mais à chaque fois le
form graphique me balance 2 boites de dialogues qui me demandent la
date de début et de fin alors que je les ai déja indiquées
Voila le bout de code qui me stocke les valeurs de dates dans le form
sur le bouton "complet" du form qui affiche toutes les dates, j'ai
fait des boutons prédéfinis genre "année en cours" et 2 contrôles
indépendants que je peux remplir à la main
Private Sub Complet_Click()
Dim debut As Date
Dim fin As Date
debut = #1/1/2001#
fin = #1/1/2099#
Me!debut = debut
Me!fin = fin
DoCmd.SetWarnings False
DoCmd.RunMacro "macfrmgraph"
End Sub
Voila le texte de la requête
SELECT tblgraph.Montant, DSum("Montant","tblgraph","[refinsert] < " &
[refinsert]) AS Solde, tblgraph.ref, tblgraph.Echeance
FROM tblgraph
WHERE (((tblgraph.Echeance)>DateValue([frmgraphselect].[debut]) And
(tblgraph.Echeance)<DateValue([frmgraphselect].[fin])))
ORDER BY tblgraph.Echeance;
Je bute la dessus depuis ce matin, j'ai tenté avec des #, des (, des
"&, enfin bon bref.
Merci de votre aide
Poser une question
Bonjour,
Avec une condition de ce type ça devrait fonctionner (du moment que le
formulaire est ouvert et une date sélectionnée dans chaque contrôle
calendrier) :
WHERE
(((DateValue([DateEmission]))>ÚteValue([Forms].[frmSelDates].[Calenda r0]))
AND
((DateValue([DateEmission]))
Il est arrivé qu'on ait des soucis avec une version francophone qui a
tendance à traduire un peu trop vite Forms par Formulaires, mais en
insistant avec le terme en Anglais on finit par y arriver.
Bonjour,
EN fait, pour que ca marche, sous access 2007 avec unb format 2003 il
FAUT mettre des ! dans les formules de champs au lieu de .
Donc
[frmgraphselect].[debut]
Marche pas
[frmgraphselect]![debut]
Marche
Je sais que c'est un vieux rève mais si je tenais le génie qui a
défini la syntaxe il passerait un sale moment :)
En tout cas merci
C'est vrai que les . et les ! m'ont toujours posé des problèmes ( s'il n'y
avait que ça...).
Un article pour approfondir ( en anglais ) écrit par une pointure en
développement Access
http://rogersaccessblog.blogspot.co...forms.html
Bon courage.
TG
"Txl" a écrit dans le message de groupe de discussion :
On Oct 19, 8:22 pm, Gloops
Bonjour,
EN fait, pour que ca marche, sous access 2007 avec unb format 2003 il
FAUT mettre des ! dans les formules de champs au lieu de .
Donc
[frmgraphselect].[debut]
Marche pas
[frmgraphselect]![debut]
Marche
Je sais que c'est un vieux rève mais si je tenais le génie qui a
défini la syntaxe il passerait un sale moment :)
En tout cas merci