Syntaxe de Dates dans Sql
Bonjour !
Je sais que de nombreux post en font mention mais... je ne trouve pas ce qui ne joue pas dans mon code.
Afin d'être le plus clair possible, je mets en attaché une image du message d'erreur et ci-dessous, le code le provoquant...
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
| Private Sub Calendrier_Click()
Dim Frm As Form
Dim sql As String
Dim DateChoisie As Date
Dim DateUS As Date
Set Frm = Forms!F_TicketGlobalFind!Detail.Form
DateChoisie = Me!Calendrier
DateUS = Format(DateChoisie, "mm/dd/yyyy")
sql = "SELECT tblTicketDétail.* " & _
"FROM tblTicketDétail " & _
"WHERE (((tblTicketDétail.DateTicket)=#" & DateUS & "#));"
With Frm
.RecordSource = sql
.Requery
End With
Me!ChoixDate = Me!Calendrier
Me.Repaint
End Sub |
Je suppose que c'est une erreur stupide mais cela fait bien 1 heure que je me casse les dents là-dessus alors... je pars acheter un dentier puis à mon retour, je me réjouis de vous lire :mouarf:
Merci d'avance !