日期查询问题

Question

前台delphi,数据库用sql，怎样用datetimepicker1和datetimepicker2来查询一个表中(table中有字段riqi)某一段时间到某一段时间的所有记录。希望能写出代码，小弟谢谢了！

Answer 1

adoQuery1.close;
adoquery1.sql.clear;
adoquery1.sql.add('select * from table where riqi between :Begintime and :Endtime');
adoquery1.parameters.parambyname('BeginTime').Value := datetimepicker1.datetime;
adoquery1.parameters.parambyname('EndTime').Value := datetimepicker2.datetime;
adoQuery1.open;

Answer 2

如果你还要定义时间的格式的话就是这个样子：FormatDateTime('yyyy-mm-dd',Datetimepicker.datetime);
这样你的日期格式就是yyyy-mm-dd的格式了

Answer 3

'select * from table where begintime>'+quotedstr(datetimetostr(begintime))+' and endtime<'+quotedstr(datetimetostr(endtime))

Answer 4

adoquery1.sql.add('select * from table where riqi between :Begintime and :Endtime');

Answer 5

http://expert.csdn.net/Expert/topic/2381/2381608.xml?temp=.6714441

Answer 6

with query1 do
begin
             close;
             sql.Clear;
             sql.Add('select * from table where sj >=:cc and sj <=:dd ');
             parambyname('cc').AsString :=datetostr(datetimepicker1.date);
             parambyname('dd').AsString :=datetostr(datetimepicker2.date);                 open;
 end;

Answer 7

把上面的SQL中的sj 改成riqi

Answer 8

Query1.close;
query1.sql.clear;
query1.sql.add('select * from table1 where 日期>=:Abegintime ');
query1.sql.add('and 日期<=:Aendtime');
query1.parambyname('AbeginTime').asdatetime:= datetimepicker1.datetime;
query1.parambyname('AendTime').asdatetime := datetimepicker2.datetime;
Query1.open;