adoquery2.close;
   ADOQuery2.SQL.Clear;
   adoquery2.SQL.Add('select 月人平均业绩,站月工资,提成系数 from 工资计算 where 月份=''一月''' );
    adoquery2.open;
   s2:=adoquery2.fieldbyname('月人平均业绩').asCurrency;
   a:=adoquery2.fieldbyname('站月工资').asCurrency;
   b:=strtofloat(adoquery2.fieldbyname('提成系数').asstring);

  adoquery1.close;
  ADOQuery1.SQL.Clear;
  adoquery1.SQL.Add('select * from 工作表 where 月份=''一月''' );
   adoquery1.open;
    ADOTable2.first;
    s4:=adoquery1.fieldbyname('姓名').asstring;
    s3:=adoquery1.fieldbyname('月份').asstring;
    s1:=adoquery1.fieldbyname('业绩量').asCurrency;
   
    c:=c+b+0.4;
    d:=s1*c+d;
    e:=a+d+e;
    adoquery3.Close;
    adoquery3.SQL.Clear;
    adoquery3.SQL.Add('insert into ADOTable1(姓名,月份,业绩量,月工资,提成比例,提成量,工资');
    adoquery3.SQL.Add('values (s4,s3,s1,a,c,d,e)');
    adoquery3.open;
    ADOTable1.first;
     while not ADOTable2.Eof  do
      begin
      ADOTable2.next;

      ADOTable1.insert;
      ADOTable1.next;
   这样可以吗???
我觉得好象错   但咋改呢