小弟菜,麻烦大家帮忙了
with adoquery1 do
begin
close;
sql.clear;
sql.text:='select 客房等级,sum(收入金额) as 客房等级收入 from jiezhang group by 客房等级';
execsql;
if not eof then
close;
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) values ( //这后面我就不知道该怎么写,我只是想实现这样,先查询出客房等级的收入,然后在添加到另外一个表。
with adoquery1 do
begin
close;
sql.clear;
sql.text:='select 客房等级,sum(收入金额) as 客房等级收入 from jiezhang group by 客房等级';
execsql;
if not eof then
close;
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) values ( //这后面我就不知道该怎么写,我只是想实现这样,先查询出客房等级的收入,然后在添加到另外一个表。
解决方案 »
- 既有32位也有64位系统的delphi软件怎么升级啊
- 问几个DElphi的问题,看多少人知道
- 注册自定义组件出现访问错误
- 没面见人了...
- DbGridEh为什么点击列标题的时候提示关键字order附近有语法错误?
- OnCalFields计算域事件在什么情况下触发的??急,在线
- 请问有没有可以替换TRichEdit的控件,我发现TRichEdit有问题!!!
- 考!!为什么我说:“我回来了”,散点分大家高兴一下。不但不欢迎,还扣除我的信誉分!!
- 如何做闪现窗体
- 我在安装控件的时候,第一次什么问题也没有出现就搞定了,可是我把这个控件删除后在从新安装时总出现已下错!请问怎么解决?
- 难题,高手请进
- 请问,如何克隆TADOQUERY?
這樣寫比較快:with adoquery1 do
begin
close;
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) select 客房等级,sum(收入金额) from jiezhang group by 客房等级';
execsql;end;
with adoquery1 do
begin
close;
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) select 客房等级,sum(收入金额) from jiezhang group by 客房等级';
execsql;//not open
close;
**********************
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) select 客房等级,sum(收入金额) from jiezhang group by 客房等级';end;
如果用循环,必须用query2
with query2 do
begin
sql.clear;
sql.text:='insert into biao (客房等级,收入金额)values(query1.fieldsbyname(' ').asstring;,...........)
end,
只要保证客房等级,收入金额所在的表与select 的字段对应就行了
with adoquery1 do
begin
close;
sql.clear;
sql.text:='insert into biao (客房等级,收入金额) select 客房等级,sum(收入金额) from jiezhang group by 客房等级';
execsql;
这样我试过了,好象不行呀。