可能是datetime的格式不对试试adodataset2.CommandText:='select sum(cashcount) 结果 from cashmanage where inoutflag=''out'' and datetime  =‘'02-12-31''';
报错的话,再试试别的格式!

解决方案 »

  1.   

    老兄,看看我的代码,成功通过哦
    begin
                 Timeyear:=flatcombobox5.text;
         //对query10 ,query11操作
                 Tstr:='select htnumber,housenm,name,sex,shenfenhao,jobposit,peoplenumber,uses,entertime,memo from zhuser where (entertime>=:Timebegin)and(entertime<=:Timeend)';
                 TTstr:='select count(*) as recordcounts from zhuser where (entertime>=:Timebegin)and(entertime<=:Timeend)';
                 if Query10.Active then
                    Query10.Active:=false;
                    Query10.sql.clear;
                    Query10.sql.SetText(pchar(Tstr));
                    Query10.ParamByName('timebegin').AsDatetime := strtodate(timeyear+'-1-1');
                    Query10.ParamByName('timeend').AsDatetime := strtodate(timeyear+'-12-31');
                    query10.active:=true;
                 if Query11.Active then
                    Query11.Active:=false;
                    Query11.sql.clear;
                    Query11.sql.SetText(pchar(TTstr));
                    Query11.ParamByName('timebegin').AsDatetime := strtodate(timeyear+'-1-1');
                    Query11.ParamByName('timeend').AsDatetime := strtodate(timeyear+'-12-31');
                    query11.active:=true;
              end;