Discussion :

[francis-a]

Bonsoir à tous

voilà mon problème

j'ai un champ valeur à qui je donne

Valeur = Calendrier.Value

Calendrier étant la valeur du composant Microsoft Calendar Control 12.0

j'entre valeur dans ma base de donnée

jusque là tout va bien

voilà où se pose mon problème j'essaye de vérifier si la date ne se trouve pas déjà dans ma table en faisant

Code :

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

Set rsTable = BD.OpenRecordset("SELECT Id, Date_Reservation FROM Reservation WHERE (DateDiff(DateInterval.Day, Date_Reservation, Valeur)) = 0", dbOpenSnapshot)

Mais ça ne marche pas j'ai déjà essayé d'autres solutions

Code :

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

Set rsTable = BD.OpenRecordset("SELECT Id, Date_Reservation FROM Reservation WHERE DatedIff(""dd/mm/yyyy"",Date_Reservation, Valeur) = 0", dbOpenSnapshot)

Code :

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

Set rsTable = BD.OpenRecordset("SELECT Id, Date_Reservation FROM Reservation WHERE  'Date_Reservation' = " & Trim(Calendrier.Value), dbOpenSnapshot)

mais rien ne marche

Quelqu'un peut-il me dire où se trouve mon problème svp?

[francis-a]

c'est bon je viens de trouver

je met le code si ça interesse quelqu'un

Code :

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

 Set rsTable = BD.OpenRecordset("SELECT Id, Date_Reservation FROM Reservation WHERE Date_Reservation = #" & Valeur & "#", dbOpenSnapshot)