Discussion :

[Velcor]

Bonjour,
je n'arrive pas à filtrer mes enregistrements en fonction des dates et je ne comprend pas pourquoi.
Voici le code que j'écris :

Code :

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

1
2
3
4
  Dim cnc As New ADODB.Connection
    Dim IP As New ADODB.Recordset
    Set cnc = CurrentProject.Connection
    IP.Open "SELECT * FROM Intervention_Programmee WHERE Date_Intervention_Programmee BETWEEN 2019-06-25 AND 2019-06-29", cnc, adOpenKeyset, adLockReadOnly

Quand je fais un test sur IP.EOF(), il est toujours vrai, alors que j'ai bien des enregistrements entre le 25 juin 2019 et le 29 juin 2019.

Du coup, je lis tous les enregistrements de la table et ne retien que ceux qui sont dans la bonne période. Ca marche, mais forcément c'est lent ...

Tout ce que j'ai trouvé sur SQL m'indique que j'ai bon. Alors il est où le problème ? Quelqu'un voit le truc qui ne va pas ?

Robin

[User]

Bonsoir,

Code :

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

1
2
3
4
    Dim cnc As New ADODB.Connection
    Dim IP As New ADODB.Recordset
    Set cnc = CurrentProject.Connection
    IP.Open "SELECT * FROM Intervention_Programmee WHERE Date_Intervention_Programmee BETWEEN 2019-06-25 AND 2019-06-29", cnc, adOpenKeyset, adLockReadOnly

A première vue dans le SQL, il faudrait encadrer vos dates avec des # :

Code :

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

IP.Open "SELECT * FROM Intervention_Programmee WHERE Date_Intervention_Programmee BETWEEN #2019-06-25# AND #2019-06-29#", cnc, adOpenKeyset, adLockReadOnly

Maintenant sans les # ça devrait il me semble générer une erreur

Autre point, habituellement sous Access on utilise plutôt DAO, c'est plus simple à mettre en oeuvre

Cdlt,