Discussion :

[Talies]

Bonjour,
j ai un petit probléme sous access 2000.
J'utilise un formulaire pour faire des stats, avec notament une 30aine de requétes utilisant deux variables ( les memes pour toutes mes requetes) datedebut et datefin.
A l'ouverture de mon formulaire l'application me demande 60 fois ( la valeur de datedebut et datefin ) , je souhaiterai qu elle me le demande une seule fois pour chacune des variables ( à louverture du formulaire) , en mémorisant donc les valeurs.
Si quelqu un a une idée pour un débutant access merci d avance.

[ben_skywalker]

je vais me faire tapper dessus, mais pourquoi ne pas utiliser des variables globale

en dessous des option compare database et option explicit(facultatif mais conseiller

tu fait :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
dim datedebut as date ou integer selon le cas
dim datefin as date ou integer selon le cas

private sub Form_load()

'ici tu demande à l'utilisateur les valeur à attribuer à datedebut et datefin et c'est partit...

'InputBox("texte du message" , "titre")

datedebut = InputBox("donnée la date de début", "date de début")
datefin = InputBox("donnée la date de fin", "date de Fin")

end sub

dans une requete ou tu les utilise pour une selection dans le code

Code :

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

1
2
3
4
5
6
7
8
9
10
Sql = "SELECT CeQueTuVeux " & _
        "FROM taTable " & _
        "WHERE NomDeLaDateDeDebut = " & datedebut & _ si la date est un entier
        " And NomDeLaDateDeFin = #" &  datefin & ";" si la date est un entier

Sinon

 "WHERE NomDeLaDateDeDebut = #" & datedebut "# " & _ si la date est une date
        "And NomDeLaDateDeFin = " &  datefin & "# ;"

[Talies]

merci pour ta réponse je vais déja essayer cela ( je t ai envoyé un mp d ailleurs)

[Talies]

j avais essayé de mettre deux champs indépendant date1 et date2 dans un premier formulaire que l utilisateur devait remplir , puis dans la procédure d ouverture de mon formulaire de requétes le code me.date1=debutdate et me.date2=findate
En ayant déclaré debutdate et findate en variable générale.
Mais bon il y a surement quelquechose que je ne saisis pas

[ben_skywalker]

j'ai édité mon 1er post, je te donerais une syntaxe meilleur vers 13h30

[Talies]

merci je progresse grâce à toi.
il me reste un probléme de format sur les requetes apparement.
Elles fonctionnent normalement et sans la variable globale ( logique vu la syntaxe ) .

Exemple :

SELECT Sum([Frais_1]) AS "Frais en cours"
FROM DOSSIER
WHERE ((([DOSSIER].[Dossier_traité])=-1) And (([DOSSIER].[Honoraire_réglé])=-1) And (([DOSSIER].[Date])>=[DateDebut] And ([DOSSIER].[Date])<=[DateFin]));

quand je mets ta syntaxe ( + declaration globale) ca me met une incompatibilité. ( mes dates sont definies comme date abrégée avec format __/__/____ et je suis sous access2000)