求救,关于汇总的问题(100分)

  • 主题发起人 3897113blueappl
  • 开始时间
3

3897113blueappl

Unregistered / Unconfirmed
GUEST, unregistred user!
大家帮帮我,我愿给全部分,以后我挣分也给你 [:(][:(][:(]
代码:
[:(]我想汇总数据结构如下
表1
养老手册号 待保手册号 姓名 单位代码 应发工资 岗位工资 效益工资 当前日期
1200001 200021 丁 203 12.00 13.00 10.00 2002-4-5
1200005 200026 王 206 12.00 10.00 10.00 2002-4-5
表2
养老手册号 待保手册号 姓名 单位代码 应发工资 岗位工资 效益工资 当前日期
1200001 200021 丁 203 18.00 17.00 10.00 2002-5-5
1200005 200026 王 206 18.00 10.00 10.00 2002-5-5
按时间生成汇总表3,在dbgrid中显示出来,并打印,表3的结构如下
养老手册号 待保手册号 姓名 单位代码 应发工资 岗位工资 效益工资 当前日期
1200001 200021 丁 203 30.00 30.00 20.00 2002-8-5
1200005 200026 王 206 30.00 20.00 20.00 2002-8-5


 
Select 养老手册号,
待保手册号,
姓名,
单位代码,
Sum(应发工资),
Sum(岗位工资),
Sum(效益工资),
当前日期
From (Select 养老手册号,待保手册号,姓名,单位代码,应发工资,岗位工资,效益工资,NOW As 当前日期 From 表1
Union All
Select 养老手册号,待保手册号,姓名,单位代码,应发工资,岗位工资,效益工资,NOW As 当前日期 From 表2) AA
Group by 养老手册号,
待保手册号,
姓名,
单位代码,
当前日期

试试,代码未验证
 
我是用delphi6 ado连结到access库中我的几个需要汇总表的都在这里面,怎么样让它汇总
结果显示到 dggrid中,有代码吗有没有具体的汇总的例子,大哥帮帮我,鼓励鼓励新手
 
樓上的回答很對了
在窗體上放一個TAdoQuery控件,然後在控件的SQL屬性裡輸入樓上的所寫代碼
放一個TDataSource與TDBGrid控件,將TDataSource.Dataset屬性設為ADOQuery控件的名稱
將TDBGrid控件的DataSource屬性設為TDataSource控件的名稱
然後配置為TADOQuery控件的連接屬性
要打開數據源時ADOQuery.Active:=True; 應可以了
 
query1.close;
query1.sql.clear;
query1.databasename := extractfilepath(application.exename);
query1.sql.add('Select 养老手册号, 待保手册号, 姓名, 单位代码,(表1.应发工资 + 表2.应发工资) As 应发工资, (表1.岗位工资 + 表2.岗位工资) As 岗位工资, (表1.效益工资 + 表2.效益工资) As 效益工资, GetDate() As 当前日期 from 表1,表2'
+ ' Where 表1.养老手册号 =表2.养老手册号');
Query1.Prepare;
query1.Open;
***********************************
再测试一下GetDate() 函数,我没有用过~~~~~~~~~~~~~~~
将 GetDate() As 去掉,调试通过!!
 
我也在学习sql参考呵呵呵
 
顶部