表tbl,有这3个字段:add_date, point, description.这个表是用来记录点数充值记录
我想实现这样的效果
1.让程序打开的时候只显示当月的充值记录,用adoquery来查询,sql要怎么写?
2.我想用两个edit来控制查询其他月份,edit1填年(比如2004,2005...),edit2填月份(1,2,3...12)
然后查询,sql怎么写?
请帮帮忙,谢谢~
我想实现这样的效果
1.让程序打开的时候只显示当月的充值记录,用adoquery来查询,sql要怎么写?
2.我想用两个edit来控制查询其他月份,edit1填年(比如2004,2005...),edit2填月份(1,2,3...12)
然后查询,sql怎么写?
请帮帮忙,谢谢~
解决方案 »
- 初学delphi,有个问题占用问题请教.
- 【Delphi技术讨论群欢迎大家加入】
- 请问winexec?
- 怎么改变paradox表ab.db一个字段的长度?
- 请问哪里有 Delphi 程序调试参考手册 下载
- @@@@@@@@@@谁有在DELPHI里的XP风格的按钮控件下载阿?◎◎◎◎◎◎
- 哎,本人用QUERY连DBGRID,本来可以,但是ORDER BY后就不行了。
- 急!!学校里考pascal,有什么书可以帮助我啊?谢谢了!
- 我该怎么办???????
- 为什么不能想库中增加记录?
- Rave报表,那里能下载到 Nevrona Rave V5.1.2 BEX Full Sources For Delphi BCB 这个!!急~~
- 谁能说说Tlist,进来的都有分
1、SQL语句 select add_date, point, description
from tbl where Year(add_date)=YEAR(GetDate()) and Month(add_date)=Month(GetDate())2、
adoquery.close;
adoquery.sql.text :=' select select add_date, point, description '
+' from tbl where Year(add_date)=:Y and Month(add_date)=:M ';
adoquery.Parameters[0].Value = StrToInt(edit1.text);
adoquery.Parameters[1].Value = StrToInt(edit2.text);
adoquery.open;
strEdit:string
begin
strEdit:=Edit1.Text '+' Edit2.Text;
ADOQuery1.Close;
ADOQuery1.SQL.Add('select * from tb1 where Tdate=:v1');
ADOQuery1.Parameters.ParamByName('v1').value:=FormatdateTime('yyyy-mm-dd',strtodate(strEdit));