我的本意是将查询的结果into一个临时表中,在对这个临时表进行循环操作。
这是我的代码,为什么会错呢????
sqlstr:='if exists (select * from sysobjects where id = object_id(''lj_01'') and OBJECTPROPERTY(id, ''IsUserTable'') = 1) drop table lj_01 ';
sqlstr:=sqlstr+'select tf_sgmx2.*,mf_sgmx.scrq into lj_01 from tf_sgmx2 left join mf_sgmx on tf_sgmx2.sgdh=mf_sgmx.sgdh where tf_sgmx2.em_no='''+zgdm+''' and mf_sgmx.scrq>=:rq1 and mf_sgmx.scrq<=:rq2';with TADOQuery.Create(nil) do
begin
         try
         Close;
         Connection:=frm_dm.con1;
         SQL.Clear;
         SQL.Add(sqlstr);
         Parameters.ParamByName('rq1').Value:=begin2.Value;
         Parameters.ParamByName('rq2').Value:=begin1.Value;
        try
        ExecSQL;
       DispInfo('成功!',3);
        except
       DispInfo('数据库执行错误!',3);
         Exit;
         end;
         finally
         Free;
         end;
end;