原文地址;http://www.cnblogs.com/whylaughing/p/6037938.html
背景:无论在开发调试或者软件测试中,测试数据的准备是调试/测试执行前重要和必要的一个环节,因此以下几种方式可以快速插入大量数据:
declare -- Local variables here m integer; begin -- Test statements here
--输出开始时间 dbms_output.put_line('start:'||sysdate); m:=0;
--循环插入的数据量 for i in 1..1000000 loop m:=m+1; --插入语句,其中'admintest'||m, 为admintest后面加数字,以便标识每条记录都不一样
insert into KF_SEC_USER (USER_ID, GROUP_ID, EXTSYS_USER_ID, USER_NAME, USER_CNAME, PWD, MOBILE, PHONE, EMAIL, DESCRIPTION, ENABLED, HIS_ID, ROLES, TERMINAL_ID) values (sys_guid(), '001', null,'admintest'||m, 'admin', '96E79218965EB72C92A549DD5A330112', '13560316185', null, null, null, null, null, null, null);
commit; end loop; --输出结束时间 dbms_output.put_line('end:'||sysdate); end;
--创建存储过程语句 CREATE OR REPLACE PROCEDURE p_insert IS
--批量提交参数 num NUMBER; BEGIN FOR i IN 1..10000000 LOOP
--插入语句 insert into USERINFO (ID, NAME, AGE, ADDRESS, OCCUPATION_NAME) values (1, 'ouhy', 25, '广东省佛山市南海区XXXX公司', '测试工程师); --执行插入 num:=num+1;
--5000笔提交一次,分批量提交,及时释放redo log buffer IF Mod(num,5000)=0 THEN COMMIT; END IF; END LOOP; END;
--执行语句
begin p_insert; commit; end;
Best Regards, --------------------------------------------------------------- 作者:whylaughing 博客地址:http://www.cnblogs.com/whylaughing/ 注意事项:本文版权归作者和博客园共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接,否则保留追究法律责任的权利。 我个人测试一下,插入15000条记录,一共花了140+分钟。