ADOQuery不能frist的问题。

Question

不知道为什么只要一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;

Answer 1

................
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;
......

Answer 2

一OPEN就提示错误！！！~Missing SQL property

Answer 3

adoyingyong.DataModule2.query1.SQL.text ---里面SQL内容是什么？