AdoQuery + Date

Version imprimable

AdoQuery + Date

Bonjour,

je veux mettre dans un combobox des dates recuperées par sql dans la table anniversaire et dans le champ datedebut :
Code:

1 2 3 4 5 6 7 8 9 10 DM.ADOQueryAnniversaire.Close; DM.ADOQueryAnniversaire.SQL.Clear; DM.ADOQueryAnniversaire.SQL.Add('SELECT DateDebut FROM Anniversaire where DateDebut between (#01/01/2006# and #02/11/2006#)'); DM.ADOQueryAnniversaire.Open; while not DM.ADOQueryAnniversaire.Eof do begin ComboBox1.Items.Add(DM.ADOQueryAnniversaire.FieldbyName('DateDebut').asString); DM.ADOQueryAnniversaire.Next; end;
J'ai mis des # car j'ai lu que # est la déclaration des dates sous access.

J'ai le message d'erreur suivant :
Classe d'exception EOleException avec le message 'Opérateur Between sans And dans l'expression DateDebut between (#01/01/2006# and #02/11/2006#)

Bonjour,

Passe tes dates en paramètre :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
DM.ADOQueryAnniversaire.Close;    
DM.ADOQueryAnniversaire.SQL.Clear;    DM.ADOQueryAnniversaire.SQL.Add('SELECT DateDebut FROM Anniversaire where DateDebut between (:DateDeb and :DateFin)');
DM.ADOQueryAnniversaire.prepare;

DM.ADOQueryAnniversaire.Parameters.parambyname('DateDeb').value := StrToDate('01/01/2006');
DM.ADOQueryAnniversaire.Parameters.parambyname('DateFin').value := StrToDate('02/11/2006');

 DM.ADOQueryAnniversaire.Open;    
while not DM.ADOQueryAnniversaire.Eof do      
begin          ComboBox1.Items.Add(DM.ADOQueryAnniversaire.FieldbyName('DateDebut').asString);      DM.ADOQueryAnniversaire.Next;
end;

enfin un truc comme ça je pense.

A voir.

09/11/2006, 19h50
yannba

C'est nouveau pour moi. Je m'en suis jamais servi de ces commandes. J'ai rajouté d à prepare (vu sur l'aide).
J'ai le meme message sauf "between (? and ?)"

Faut-il ajouter quelquechose dans use ?
09/11/2006, 20h49
qi130

La syntaxe de between est SANS accolade...