在一个表中，如何将某一记录复制若干条，只改变编号，比较简单的？

Question

有比较简单的方法吗？

Answer 1

insert into tablexxx(ID,...) select newID,... from tablexxx where id=oldid;
重复执行几次即可！

Answer 2

循环插入,只改变编号,或用sql语句也行，执行前改变要递增的ID值

Answer 3

能告诉我sql语句吗？具体的。

Answer 4

我使用了，但是有错误提示：
当前提供程序不提供从单一执行返回多个记录集
'AdoDataSet：Command Text does not return a result set'为啥啊？？？？？

Answer 5

对了，俺的Sql语句是：而且实际上也插入了这个记录，不过为啥出错呢？？？？？？望知道者多多指点迷津，谢谢了。Insert into gongzibiao (编号,部门,姓名,岗位工资)  select 编号,部门,姓名,岗位工资 from gongzibiao where 索引=8'

Answer 6

with dm1.AdoDataSet do begin
  close;
  CommandType := cmdText;
  CommandText:=InCir;
  Open;
end;
其中InCir＝Insert into gongzibiao (编号,部门,姓名,岗位工资)  select 编号,部门,姓名,岗位工资 from gongzibiao where 索引=8'

Answer 7

with dm1.AdoDataSet do begin
  close;
  CommandType := cmdText;
  CommandText:=InCir;
  execsql;
end;

Answer 8

只有Select语句用Open;Insert,Update,Delete要用ExecSQL;

Answer 9

insert into tablexxx(ID,...) select newID,... from tablexxx where id=oldid;

Answer 10

to ohsee(静静) 
我使用了，但是有错误提示：
当前提供程序不提供从单一执行返回多个记录集
'AdoDataSet：Command Text does not return a result set'为啥啊？？？？？
在执行SQL语句的时候有好几种执行方式，但是还是有区别的，错误的意思是你的执行结果并不返回一个记录集，我估计是你使用adoquery1.active:=true来执行的，但你的执行结果是不返回结果集的，应该用adoquery1.execsql来执行，一般select语句才使用adoquery1.active:=true

Answer 11

谢谢 ADWARDS00(大拇指) ，我明白了，其实n年前我来过本坛，但是提问了个问题没人理我；也就是这几天来的，发现了一些问题的解决方法和大家的热心帮助，很希望我也能为其他人帮忙，真的。因为当我解决了问题后就特感激热心助人者，在这里我们都很融洽。
祝愿大家永远幸福，本坛越来越好！