Bonsoir,
Envoyé par
Velcor
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 # :
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,
Partager