Oracle技术：批量插入测试数据

会计考友

一、Test Windos方式 　　declare
　　maxrecords constant int:=100000;
　　i int :=1;
6 _1 _3 D/ Q5 P$ s! K5 `　　begin
　　for i in 1..maxrecords loop
　　insert into test2
　　(id, name)
　　values
　　(test2_seq.nextval, to_char(9999+i));
  l7 u/ A6 S! f  M6 f( s- F　　end loop;
( e! g  r+ w5 A2 L6 r8 \　　dbms_output.put_line(' 成功录入数据！');
/ W4 d: g5 U) U  ?" F　　commit;
　　end;
　　二、从已有表中往入另一张表导数据
9 k3 P. Z# j9 T7 N$ ~2 v" }　　create or replace procedure TestProc is
5 ~$ X/ M! o* \" |, q! T　　begin
　　for c in(select id, name from test2) loop
　　insert into test
* B6 `1 q  A0 d% t. V" G# J　　(id,
% R( o+ T. V5 M5 ^9 [5 t　　name)
　　values
+ H4 L1 b) r. v! \$ q5 Y6 F; I5 O　　(test_seq.nextval, c.name);
　　end loop;
　　end TestProc;