[AC-2007] Comparaison date et now() [Résolu]

[DUCKY_]

Hello à tous,

J'ai effectué une petite recherche sur le forum mais rien qui ait été concluant ...

Ci-dessous ma petite requete SQL ... tout me semble pourtant correcte :/

Le message d'erreur se trouve en dessous le code ...

Code :

1
2
3
4
5
6
7
8
 
SELECT FAC_OUT.Nom, FAC_OUT.Prénom, FAC_OUT.Date_sortie
FROM FAC_OUT, [04 - Entree_recente], FAC_OUT_Historique
WHERE FAC_OUT.Nom = [04 - Entree_recente].Nom
AND FAC_OUT.Nom= FAC_OUT_Historique.Nom
AND FAC_OUT.Date_sortie > [04 - Entree_recente].[Date_e]
AND FAC_OUT.Date_sortie< Now()
AND FAC_OUT_Historique.Traite=No;

merci d'avance,

[alassanediakite]

Salut
Je pense que le problème viens du nom de ta table ou requête

Code :

[04 - Entree_recente]

[DUCKY_]

Hello,

Merci de ta réponse,

C'est ce que j'ai pensé également mais dès que j'enlève la condition avec le < Now()

ça fonctionne parfaitement ...

[hariman]

Bonjour,

As-tu déjà essayé ça :

Code :

FAC_OUT.Date_sortie < #Now()#

?

[DUCKY_]

Hello,

Yep j'avais testé et le problème reste entier ...

Merci tout de même !

A savoir que dans ma table FAC_OUT, Le champ Date_sortie est au format "Date/Heure", la fonction Now() retourne quant à elle un "Variant (Date)" peut-être n'arrive-t-il par à comparer les deux ...

Quand je remplace le Now() par : #01/01/2012# ça fonctionne correctement ...

J'ai tenté avec les fonction date(), ou ce type de chose DateSerial(Year(Now()),Month(Now()),Day(Now())

Mais rien de concluant ... ça ne doit quand même pas être sorcier de comparer une date à la date système ...

Je pense donc finalement passer par le VBA.

Je vais tenter de stocker ma sysdate dans une variable, et utiliser cette variable dans ma requete sql

je vous tiens au courant

[DUCKY_]

Hello à vous,

J'ai donc procédé comme expliqué ci-dessus.

Je suis passé par le VBA avec lequel j'ai récupéré la Date Système dans une variable et j'ai ensuite utilisé cette variable dans ma requête SQL.

Le VBA ne me permettant pas d'afficher mon SELECT et n'ayant pas envie de passer par de la DAO, je remplis donc une table que je vide au préalable pour avoir la liste des gens que je vais devoir supprimer.

Code :

1
2
3
4
5
6
7
8
9
10
sys_date = Date
 
DoCmd.RunSQL ("INSERT INTO FAC_Gestion_license(Nom,Prénom,Date_sortie) " _
            & "SELECT FAC_OUT.Nom, FAC_OUT.Prénom, FAC_OUT.Date_sortie " _
            & "FROM FAC_OUT, [04 - Entree_recente], FAC_OUT_Historique " _
            & "WHERE FAC_OUT.Nom = [04 - Entree_recente].Nom " _
            & "AND FAC_OUT.Nom= FAC_OUT_Historique.Nom " _
            & "AND FAC_OUT.Date_sortie > [04 - Entree_recente].[Date_e] " _
            & "AND FAC_OUT.Date_sortie < #" & sys_date & "# " _
            & "AND FAC_OUT_Historique.Traite=No ")

Merci de votre aide !

Ciao

[zoom61]

Autre solution : Le problème provient du format de la date, donc il suffit de faire un CDate(Now()), et normalement cela fonctionne.

@+.