Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Date dans critere de recherche

Date dans critere de recherche

2 réponses
Avatar
Titi
Bonjour,
Un probl=E9me bizarre. j'ai un crit=E9re de recherche sur un=20
recordset. Je forme le critere de la maniere suivante :

Dim DateRecherche As String
Dim DateDebut As Date
Dim DateFin As Date

Set Bd =3D CurrentDb()
Set RstArticle =3D Bd.OpenRecordset("TblArticles")

DateDebut =3D "01/" & Me.TxtMoisDemande & "/" & Me.TxtAnnee
DateFin (format=E9e de la m=EAme maniere en fonction du mois =E0=20
28,30 ou 31 jours)

DateRecherche =3D "DateDeVente >=3D #" & DateDebut & "# And "=20
& "DateDeVente <=3D #" & DateFin & "#"

Ensuite je teste :
RstArticle.FindFirst DateRecherche
If RstArticle.NoMatch Then
Traitement
Else
Traitement
End If

Tout se passe bien pour les mois de Janvier =E0 Ao=FBt et le=20
mois de Novembre mais pour les mois de :
Septembre, Octobre et Decembre je passe dans le Else car=20
la valeur de NoMatch est =E0 False. ELLE DEVRAIT ETRE A TRUE=20
CAR IL N'Y A PAS D'ENREGISTREMENT A CETTE DATE !!
Cela ne se produit que pour ces 3 mois ??

UNE IDEE , MERCI D'AVANCE

PS : Au fait, Merci =E0 Pierre (3stone) Access MVP pour sa=20
reponse sur l'impression des etiquettes.
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
3stone
Salut,

"Titi"
[...]
DateRecherche = "DateDeVente >= #" & DateDebut & "# And "
& "DateDeVente <= #" & DateFin & "#"



Comme tu utilise le "#" comme délimiteur de date,
il faut que tu la présente au format US.


"DateDeVente >= #" & Format(DateDebut,"mm/dd/yyyy") & "# AND DateDeVente <= #" &
Format(DateFin,"mm/dd/yyyy") & "#"



--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
Avatar
Titi
Merci encore une fois. Effectivement c'était dans l'aide
mais je n'avais pas fait la bonne syntaxe
A +
-----Message d'origine-----
Salut,

"Titi"
[...]
DateRecherche = "DateDeVente >= #" & DateDebut & "# And "
& "DateDeVente <= #" & DateFin & "#"



Comme tu utilise le "#" comme délimiteur de date,
il faut que tu la présente au format US.


"DateDeVente >= #" & Format(DateDebut,"mm/dd/yyyy")
& "# AND DateDeVente <= #" &

Format(DateFin,"mm/dd/yyyy") & "#"



--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------




.