je veux faire une recherche par date dans une BD Interbase2009 en utilisant TIBDataset mais j'y arrive pas; j'ai un messsage d'erreur : conversion error from string "19/02/2009"
voici le code
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 procedure TfProvisoire.dtpChange(Sender: TObject); var sDate, sSql : string; begin sDate := FormatDatetime('dd/mm/yyyy',dtp.Date); sSql :='SELECT * FROM POST WHERE DATEIMP = ' +QuotedStr(sDate)+ ' and TYPEPOST = ' +QuotedStr('Provisoire')+ ' ORDER BY DATEIMP'; if rgRech.ItemIndex = 3 then begin qPost.Active := false; qPost.SelectSQL.Clear; qPost.SelectSQL.Add(sSql); qPost.Active := true; end; end;
Partager