OVH Cloud OVH Cloud

Problème de date

2 réponses
Avatar
Alain Scatizzi
Bonsoir,
J'ai un probl=E8me avec ce code:
DateMaxAchat As Date
'R=E9cuperer la date du denier BL
DateMaxAchat =3D Nz(DMax("[DateBL]", "RqRecherche_BL"))
'R=E9cup=E9rer le prix d'achat du denier BL
VPrixAchatBL =3D Nz(DLookup
("[PrixAchatBL]", "TabBL", "[AppareilBL]=3D'" & Me!
ReferenceProdCondense & "' AND [DateBL] =3D" & "#" &=20
DateMaxAchat & "#"))
Pourquoi quand la date commence par un z=E9ro genre=20
09/10/2004 =E7a ne fonctionne pas alors que toutes les=20
autres dates commencent par 1,2 ou 3 genre 10/10/2004=20
fonctionne
Merci pour vos =E9claircissements
Salutations
Alain

2 réponses

Avatar
Raymond [mvp]
Bonsoir.

il faut indiquer la date en format US:

"' AND [DateBL] =" & "#" & Format(DateMaxAchat, "mm/dd/yyyy") & "#"))


--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain Scatizzi" a écrit dans le message de news:
31e101c4aee9$33c184f0$
Bonsoir,
J'ai un problème avec ce code:
DateMaxAchat As Date
'Récuperer la date du denier BL
DateMaxAchat = Nz(DMax("[DateBL]", "RqRecherche_BL"))
'Récupérer le prix d'achat du denier BL
VPrixAchatBL = Nz(DLookup
("[PrixAchatBL]", "TabBL", "[AppareilBL]='" & Me!
ReferenceProdCondense & "' AND [DateBL] =" & "#" &
DateMaxAchat & "#"))
Pourquoi quand la date commence par un zéro genre
09/10/2004 ça ne fonctionne pas alors que toutes les
autres dates commencent par 1,2 ou 3 genre 10/10/2004
fonctionne
Merci pour vos éclaircissements
Salutations
Alain
Avatar
alain Scatizzi
Merci beaucoup Raymond, ca marche.
Merci aussi pour vos sites qui sont des mines d'or pour
nous les "Bricoleurs"
Bonne soirée
Salutations
Alain

-----Message d'origine-----
Bonsoir.

il faut indiquer la date en format US:

"' AND [DateBL] =" & "#" & Format
(DateMaxAchat, "mm/dd/yyyy") & "#"))



--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Alain Scatizzi" a écrit dans le
message de news:

31e101c4aee9$33c184f0$
Bonsoir,
J'ai un problème avec ce code:
DateMaxAchat As Date
'Récuperer la date du denier BL
DateMaxAchat = Nz(DMax("[DateBL]", "RqRecherche_BL"))
'Récupérer le prix d'achat du denier BL
VPrixAchatBL = Nz(DLookup
("[PrixAchatBL]", "TabBL", "[AppareilBL]='" & Me!
ReferenceProdCondense & "' AND [DateBL] =" & "#" &
DateMaxAchat & "#"))
Pourquoi quand la date commence par un zéro genre
09/10/2004 ça ne fonctionne pas alors que toutes les
autres dates commencent par 1,2 ou 3 genre 10/10/2004
fonctionne
Merci pour vos éclaircissements
Salutations
Alain


.