找错

Question

with adoquery2 do
 begin
  close;
  sql.Clear;
  sql.Add('Insert Into cjwsdbf(qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd) select (qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd) from cjwsd');  open;

Answer 1

open///'---change to;;;
executesql;

Answer 2

没有返回结果用ADOQuery1.ExecSQL;

Answer 3

你这个是Insert，用ADOCommand简单多了。with ADOCommand1 do
 begin
  CommandText:= 'Insert Into cjwsdbf(qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd)
                 select (qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd) from cjwsd';
  DmObj.AddStoreCmd.Execute;
end;

Answer 4

with ADOCommand1 do
 begin
  CommandText:= 'Insert Into cjwsdbf(qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd)
                 select (qy,gx,cssj,bb,csrq,bmmc,gqsd,sqsd,xdsd) from cjwsd';
  Execute;//刚才这里拷过来的时候忘改了，不好意思。
end;

Answer 5

select :返回结果集用open
insert update 不返回结果集用Execute;

Answer 6

select :返回结果集用open
insert update 不返回结果集用Execute;