j'ai un problème entres les date française et us

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
......
       ' conversion des dates
        du = ConversionDate(Me.du1)   'me.du1 = 20/04/08 du = 04/20/2008
        au = ConversionDate(Me.au1)   'me.du2 = 26/04/08 au = 04/26/2008
 
 
        SQL = "select * from Déchargement where [date déchargement] Between #"
        SQL = SQL & "" & du & ""
        SQL = SQL & "# And #"
        SQL = SQL & "" & au & ""
        SQL = SQL & "#;"
        MsgBox "" & SQL, vbExclamation, "test" ' select * from T_Devis where T_Devis.date devis] Between 04/20/2008 and 04/26/2008 
'mais cela ne fonctionne pas c'est comme si je n'avais pas changé de format
        Forms.form1.[liste déchargement sous-formulaire].Form.RecordSource = SQL
        'reconversion pour remettre dans la table
        Me.du1 = ConversionDate(du)
        Me.au1 = ConversionDate(Me.au1)
......
Function ConversionDate(dat As Date) As String
 ConversionDate= Format(dat, "mm/dd/yyyy")
End Function
merci de m'aider je trouve pas de solution dans mon cas sur les forum