paradox数据库中类型为D的日期字段怎么查询呢? 比如查询该日期字段为2004-2-1到2004-12-31之间的记录怎么查呢?
解决方案 »
- DELPHI如何隐藏运行外部程序
- 请教个问题,在程序里面如何实现Acess数据库的备份和恢复。
- ADOQUERY操作問題3
- webbrowser 中一个比较麻烦的问题 ???
- 为什么每次最高只能100分啊,我有11700多分啊,怎么用得完
- 求一表达式?
- Dbgrid能实现换行吗?
- 急,急,急,关于CHART用法,如何设置CHART横轴为时间,如何控制更改横轴时间,谢谢
- 将数据库中的记录写到Excel中居然要15分钟,邪门!数据库有100个字段,1500条记录左右,各位有何高见?
- 关于stringgrid的小问题
- 急!在线等。高分求TidSoapServer, TIdSOAPServerHTTP等组件的使用说明。
- delphi 编译出现问题 请教!!!
参数
二.
EXTRACT函数
比如:
SELECT EXTRACT(YEAR FROM HIRE_DATE)
FROM EMPLOYEE
form [table]
where [date] between '2004-2-1' and '2004-12-31'
begin
datamodule5.Query2.Close;
datamodule5.Query2.SQL.Clear;
datamodule5.Query2.SQL.add('select distinct ky_lb,count(ky_lb) as ky_zs,count(ky_lb) as ky_cfs from table2 where ky_fb>:A and ky_fb<:B group by ky_lb');
datamodule5.Query2.Params.ParamByName('A').AsDateTime:=datetimepicker1.DateTime;
datamodule5.Query2.Params.ParamByName('B').AsDateTime:=datetimepicker2.DateTime;
datamodule5.Query2.Prepare;
datamodule5.Query2.Open;
datamodule5.Query2.Refresh;
end;
Clear;
Add(' SELECT * ');
Add(' FROM "Table1.DB" ');
Add(' WHERE (日期 >= "2004-2-1") AND (日期 < "2004-12-31")');
end;説明:日期字段用""括起来
DecodeDate(EndDate.Date,ESyear,ESMonth,ESDay);
with query1 do
begin
close;
sql.clear;
sql.add('select * form [table]');
sql.add('where StopDate>=:BeginDate and StopDate<=:EndDate');
Query.ParamByName('BeginDate').AsDateTime:=EncodeDate(BSYear,BSMonth,BSDay);
Query.ParamByName('EndDate').AsDateTime:=EncodeDate(ESYear,ESMonth,ESDay)
open;
end;
Clear;
Add(' SELECT * '+' FROM "Table1.DB" '+' WHERE (日期 >= "2004-2-1") AND (日期 < "2004-12-31")');
end;