[AC-2003] Filtre sur date incorrect [Résolu]

[gilou08]

Bonjour,

je suis en train de créer une application sur Access 2003 et j'ai un soucis avec un filtre appliqué en VBA. J'obtient un résultat filtré, mais complètement faux...

Je rempli une variable filtre depuis 2 champs date, pour filtrer mon sous formulaire et obtenir les lignes dans les dates concernées :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
 
  filtre = filtre & "((T_LIVRABLE.DAT_" & Me.STATUT_SELECT_DATE & _
                          " between #" & dat_date_promotion_min & "# and #" & dat_date_promotion_max & "#)" & _
                          " and T_LIVRABLE.DAT_" & Me.STATUT_SELECT_DATE & " <> null)"
 
    'Appliquer le filtre si il n'est pas vide
    If filtre <> "" Then
        Me!F_LST_ELEMENT_LIVRABLE.Form.Filter = filtre
        Me!F_LST_ELEMENT_LIVRABLE.Form.FilterOn = True
    Else
        Me!F_LST_ELEMENT_LIVRABLE.Form.FilterOn = False
    End If

grâce à une ligne debug, je récupère le contenue de mon filtre qui me semble correct :
((T_LIVRABLE.DAT_MEP between #09/07/2011# and #13/07/2011#) and T_LIVRABLE.DAT_MEP <> null)

Quelqu'un peut-il me dire pourquoi le 18 est entre le 9 et le 13 pour Access ???

[Arkham46]

bjr,

ce test n'est pas bien écrit :

Code :

T_LIVRABLE.DAT_MEP <> null

essaye :

Code :

T_LIVRABLE.DAT_MEP is not null

sinon ça perturbe la requête

[gilou08]

Merci pour ta réponse Arkham46, mais c'est exactement le même résultat.

J'avais utilisé "IS NOT NULL", j'ai mis "<> null" au cours de mes différentes tentatives.

Là j'ai remis le "IS NOT NULL".

[Arkham46]

il y a aussi peut-être un soucis de format de date, le mois et le jour sont inversés pour le SQL :
http://access.developpez.com/faq/?page=dates#DateFormat

#09/07/2011# devient le 07 septembre 2011
#13/07/2011# devient le 13 juilllet 2011 (ne peut être inversé, 13 n'est pas un mois)

je ne sais pas si le Between tient compte de l'ordre des deux dates
si non, alors le 18 juillet est bien entre le 13 juilllet et le 07 septembre

il faut utiliser format(madate,"mm/dd/yyy") pour mettre la date dans le bon ordre

oui c'est tordu ...

[gilou08]

Je pensais avoir déjà essayé mais non, c'est bien là qu'était le problème.

Le DatePicker ne renvoie pas le même format que celui utilisé pour les requêtes

J'ai ajouté 1 jour pour que le beetween inclue la dernière valeur et ça fonctionne.

Code :

1
2
3
4
5
6
7
 
'date minimum au bon format
dat_date_promotion_min = Format(Me.DAT_MIN_SELECT, "mm/dd/yy")
'date max + 1 jour pour le between
dat_date_promotion_max = DateAdd("d", 1, (Format(DateValue(Me.DAT_MAX_SELECT))))
'changement du format
dat_date_promotion_max = Format(dat_date_promotion_max, "mm/dd/yy")

Merci, c'est résolu