要插入图片的表不是固定的,而且是批量插入很多张,还要考虑到因为图片的文件名错误,修改后要再次插入,此时应避免已经插入的重复执行操作, 浪费时间。
所以就选择先用一张临时表来暂时保存从文件系统读取的照片,用dbms_lob的方法来处理。
第一步:创建一个数据库可以访问的目录(注意:这个目录是数据库服务器上的目录,不是客户机上的)
-- create directory create or replace directory 图片目录 as 'e:\照片';
第二步:将图片文件放入刚建好的目录下面,不要在新建文件夹,就放在这个根目录
第三步:根据自己的具体需求,编写存储过程,在做之前,我也在网上找了很多,但基本都只是大概说一下,没有找到比较完整的,这里就把自己的项目源码贴出来,供大家学习交流。
create or replace procedure pro_插入图片(v_表名 in varchar2) is
p_filename varchar2(50); --照片名,动态拼接得到
p_证件号码 varchar2(50);
p_姓名 varchar2(50);--这个照片名是通过姓名+证件号拼接得到的,因为基础测试数据没有提供真实的证件号码,就选择用手机号来代替
p_查询sql varchar2(500);
p_更新sql varchar2(5000);
p_lob blob;
p_file bfile;
type p_ref_cursor is ref cursor; --定义动态游标变量类型
p_cursor p_ref_cursor; --定义动态游标变量,因为一次要插入全表的照片,所以选择用游标来处理
type p_row_record is record(
证件号码 varchar2(50),
姓名 varchar2(50));
c_row p_row_record;
v_err varchar2(300);
begin
p_更新sql := 'update ' || v_表名 || ' set 证件号码=手机号码 where 证件号码 is null';
--用手机号来代替证件号码为空的数据
execute immediate p_更新sql;
commit;
p_查询sql := 'select 证件号码,姓名 from ' || v_表名 ||
' where 证件号码 is not null and 照片 is null order by 证件号码';
open p_cursor for p_查询sql;
loop
begin
fetch p_cursor
into c_row;
exit when p_cursor%notfound;
–获取证件号码和姓名,先排除空格等脏数据,然后拼接成文件名;
p_证件号码 := c_row.证件号码;
p_姓名 := c_row.姓名;
select replace(p_证件号码, ' ', '') into p_证件号码 from dual;
select substr(p_证件号码, 1, 11) into p_证件号码 from dual;
select replace(p_姓名, ' ', '') into p_姓名 from dual;
p_filename := p_证件号码 || p_姓名 || '.jpg';
select replace(p_filename, ' ', '') into p_filename from dual;
--以下便是插入图片的核心代码
insert into ta_照片总表_temp
(证件号码, 姓名, 照片)
values
(p_证件号码, p_姓名, empty_blob()) return 照片 into p_lob;
--获取指定目录下的文件
p_file := bfilename('图片目录', p_filename);
--以只读的方式打开文件
dbms_lob.fileopen(p_file, dbms_lob.file_readonly);
--传递对象
dbms_lob.loadfromfile(p_lob, p_file, dbms_lob.getlength(p_file));
--关闭原始文件
dbms_lob.fileclose(p_file);
commit;
–通过更新语句来向目标表插入图片
p_更新sql := 'update ' || v_表名 ||
' a set a.照片=(select 照片 from ta_照片总表_temp b
where a.证件号码 = b.证件号码 and a.姓名=b.姓名 and rownum=1)
where exists (select 1 from ta_照片总表_temp b where a.证件号码 = b.证件号码 and a.姓名=b.姓名)';
execute immediate p_更新sql;
commit;
exception
–处理异常情况,这个可以在出现异常时跳过异常继续跑。正常数据依然可以插入,并且记录异常信息,方便异常处理。这个是因为第一次写的过程一报错就断掉了,本来可以插入的图片也无法继续,然后就做了这个优化。
when others then
rollback;
v_err := substr(sqlerrm, 1, 150) || '照片名:' || p_filename;
–定义一张异常信息记录表,是一个非常好的习惯
insert into ta_程序运行异常记录
values
(sq_异常序列.nextval, 'pro_插入图片', v_err, sysdate);
commit;
end;
end loop;
close p_cursor;
commit;
delete ta_照片总表_temp;
commit;
end pro_插入图片;
总结
然后测试、运行,基本都没问题,不过图片的大小,很影响实际插入的时间,这个时间的优化目前还没有好的对策。
以上就是本文关于oracle批量导入图片到blob字段代码示例的全部内容,希望对大家有所帮助。感兴趣的朋友可以参阅: 、oracle sql语句优化技术要点解析 、 等,有什么问题可以随时留言,www.887551.com会及时回复大家的。也希望朋友们对www.887551.com网站多多支持!