erreur syntaxe between dans constructeur requete

[varik]

Bonjour tout le monde

j'ai un petit soucis avec un constructeur de requete je pense , mais c'est pas sur !!

j''essaie de construire une requete qui récupére des champs date dans zone texte dans mon formulaire afin de créer une liste de résultat que j'affiche ensuite.

quand je fais un test avec des dates et sans variables cela me donne une erreur de syntaxe.

je vous remercie d'avance car j'ai fait pas mal de recherche mais je ne trouve pas des postes similaires ou autres infos qui puisse m'aider à avancer

Private Sub RefreshQuery()
Dim SQL As String
Dim SQLWhere As String
Dim DateD, DateF As Date

Me.txtDateD.Value = DateD
Me.txtDateF.Value = DateF

SQL = "SELECT ID_CLIENT, NOM_CLIENT ,CODE_ARTICLE, FAMILLE_PRODUIT, SECTEUR_ACTIVITE,MONTANT,QUANTITE_LIVREE,DATE_FACTURATION  FROM T_VENTES Where ((T_VENTES!DATE_FACTURATION) Between [02/06/2009] And [02/09/2010])"

If Not Me.chkCode Then
    SQL = SQL & "And T_VENTES!ID_CLIENT like '*" & Me.cmbRechCode & "*' "
End If
If Not Me.chkNom Then
    SQL = SQL & "And T_VENTES!NOM_CLIENT like '*" & Me.cmbRechNom & "*' "
End If
If Not Me.chkArticle Then
    SQL = SQL & "And T_VENTES!CODE_ARTICLE = '*" & Me.cmbRechArticle & "*' "
End If
If Not Me.chkFamille Then
    SQL = SQL & "And T_VENTES!FAMILLE_PRODUIT = '*" & Me.cmbRechFamille & "*' "
End If
If Not Me.chkActivite Then
    SQL = SQL & "And T_VENTES!SECTEUR_ACTIVITE = '*" & Me.cmbRechActivite & "*' "
End If

SQLWhere = Trim(Right(SQL, Len(SQL) - InStr(SQL, "Where ") - Len("Where ") + 1))

SQL = SQL & ";"
Debug.Print SQL

Me.lblStats.Caption = DCount("*", "T_VENTES", SQLWhere) & " / " & DCount("*", "T_VENTES")
Me.lblSqte.Caption = DSum("QUANTITE_LIVREE", "T_VENTES", SQLWhere)
Me.lblSmontant.Caption = DSum("MONTANT", "T_VENTES", SQLWhere)
Me.lstResults.RowSource = SQL
Me.lstResults.Requery

End Sub

 

[tototiti2008]

Re : erreur syntaxe between dans constructeur requete

Bonjour Varik,

pas sûr, mais essaye peut-être

Between #02/06/2009# And #02/09/2010#

avec les dates au format #MM/DD/YYYY#