H
hellotao
Unregistered / Unconfirmed
GUEST, unregistred user!
with Adoquery1 do
begin
Close;
Sql.Clear;
Sql.Add('insert into table1(ID) values ID);
prepared := True;
end;
with adoquery2 do
begin
...
select * from adoquery2
while not eof do
begin
with Adoquery1.parameters do
begin
ParamByName('ID').Value := adoQuery2.FieldByName('ID').AsInteger;
ExecSql;
end;
adoquery2.next;
end;
end;
提示我field(ID) not found 为什么呢 ?
begin
Close;
Sql.Clear;
Sql.Add('insert into table1(ID) values ID);
prepared := True;
end;
with adoquery2 do
begin
...
select * from adoquery2
while not eof do
begin
with Adoquery1.parameters do
begin
ParamByName('ID').Value := adoQuery2.FieldByName('ID').AsInteger;
ExecSql;
end;
adoquery2.next;
end;
end;
提示我field(ID) not found 为什么呢 ?