请教:怎样使下面的程序运行效率更高?本人开发一个程序,用Accesss数据库,有两个表是一对多个的关系,要把明细表的分组求和然后修改主表的数据。用如下方法(4000个记录运行8分钟)效率不理想,请高手指点:
while not table1.nof do
begin
table1.edit;
.......
table2fieldx.Asinteger := Table1fieldx.Asinteger;
tabl21.next;
end;
...全文
1816打赏收藏
求助高手:
请教:怎样使下面的程序运行效率更高?本人开发一个程序,用Accesss数据库,有两个表是一对多个的关系,要把明细表的分组求和然后修改主表的数据。用如下方法(4000个记录运行8分钟)效率不理想,请高手指点: while not table1.nof do begin table1.edit; ....... table2fieldx.Asinteger := Table1fieldx.Asinteger; tabl21.next; end;
I think you can use a TQuery Component instead of a TTable Component,and then you can use a UPDATE SQL statement to complete this task. Just like this:
TQuery.sql.add 'Update table2,table1 set table2.fieldX=sum(table1.fieldY) where table1.X=table2.X'
or similar statement.