ADOQuery不能frist的有关问题

ADOQuery不能frist的问题。
不知道为什么只要一frist就报错：cannot   perform   this   operation   on   a   closed   dataset
希望大家能帮忙看看！！~
以下是代码！谢谢大家了


function   FBatchLeadTel():integer;
begin
        adoyingyong.DataModule2.conn.Open;
        adoyingyong.DataModule2.query1.Connection:=adoyingyong.DataModule2.conn;
        adoyingyong.DataModule2.daoruconn.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data   Source=D:\ceshi.mdb;Persist   Security   Info=False ';
        adoyingyong.DataModule2.daoruconn.Open;

        with   adoyingyong.DataModule2.query1   do
          begin
          first;
          While   not   eof   do
              begin
              adoyingyong.DataModule2.daoruconn.Execute( 'Insert   Into   telp(tel)   values( ' ' '+FieldByName( 'ttel ').Asstring+ ' ' ') ');
              end;
          next;
          end;
        result:=0;
        adoyingyong.DataModule2.conn.Close;

end;


[解决办法]
................
with adoyingyong.DataModule2.query1 do
begin
if Active = false then
Open; //必先打开才能访问
first;
While not eof do
begin
adoyingyong.DataModule2.daoruconn.Execute( 'Insert Into telp(tel) values( ' ' '+FieldByName( 'ttel ').Asstring+ ' ' ') ');
end;
next;
end;
result:=0;
adoyingyong.DataModule2.conn.Close;
......
[解决办法]
adoyingyong.DataModule2.query1.SQL.text ---里面SQL内容是什么？
[解决办法]
SQL語的問題啦 兄弟