Discussion :

[marco62118]

Bonjour

j'ai une table avec la date_certificat_médical
je veux vérifier si un adhérent X a son certificat entre deux dates .
lorsque je fait la requête avec access ça fonctionne bien mais lorsque je fait la requete en sql en vba ça ne fonctionne pas.

Code :

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

1
2
3
4
5
6
 
'code requete dans access
SELECT  *
FROM Adherents
WHERE (((Adherents.date_certificat_medical) Between #3/31/2018# And #3/31/2020#) AND ((Adherents.ID)=341));
'cette requete fonctionne parfaitement j'ai adherents.id=341 et la date du certificat 7/9/2018

Code :

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

1
2
3
4
 
 date_an = CDate("31/3/" & Year(Now())) '6 mois avant le début de saison pour un nouveau certificat
 limite = CDate([Forms]![Menu]![date_medical])
 requete = "SELECT  * FROM Adherents WHERE (((Adherents.date_certificat_medical) Between " & date_an & " And " & limite & ") AND ((Adherents.ID)=341))"

Code :

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

1
2
3
 
'jai essayé ceci mais idem 
requete = "SELECT * FROM Adherents WHERE (Adherents.date_certificat_medical > " & limite & ") AND (Adherents.date_certificat_medical < " & date_an & ") AND (Adherents.ID = " & id_adherent & ")"

[tee_grandbois]

bonsoir,
et que donnerait l'instruction Debug.Print requete ? je suppose que cela montrerait les dates sans délimiteurs ...
essaie en ajoutant les #:

Code :

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

1
2
3
 date_an = CDate("31/3/" & Year(Now())) '6 mois avant le début de saison pour un nouveau certificat
 limite = CDate([Forms]![Menu]![date_medical])
 requete = "SELECT  * FROM Adherents WHERE (((Adherents.date_certificat_medical) Between #" & date_an & "# And #" & limite & "#) AND ((Adherents.ID)=341))"