把表中的blob字段导出，并且用一个唯一名称来命名导出的文件。

最新推荐文章于 2024-07-18 03:53:58 发布

cmodnsbs880547

最新推荐文章于 2024-07-18 03:53:58 发布

阅读量271

点赞数

文章标签：数据库

需求是发生在迁移数据的时候，
我们的源库，有一个字段设计的为blob类型，但是目标库，人家设计的是varchar2类型，然后这个varchar2，存放的只是相当于一个指针的东西。

思路是通过循环，给表中每一条记录要导出的blob文件赋值。

首先先创建一个目录，

create or replace directory BLOBDIR as 'D:\导出文件'

存储过程如下：

CREATE OR REPLACE PROCEDURE BLOB_EXPORT is
filename  varchar2(32);
NUM NUMBER;
l_file UTL_FILE.FILE_TYPE;
l_buffer RAW(32767);
l_amount BINARY_INTEGER := 32767;
l_pos INTEGER := 1;
l_blob BLOB;
l_blob_len INTEGER;
begin
  SELECT COUNT(1) INTO NUM FROM cjcgzl_cjcgtsjt;
    FOR I IN 1 .. NUM LOOP
  WITH TB AS(SELECT  cjsjt ,sjtid, ROW_NUMBER() OVER (ORDER BY sjtid ) RR FROM cjcgzl_cjcgtsjt
  )
SELECT cjsjt ,sjtid
INTO l_blob ,filename
FROM TB  WHERE RR=I;

l_blob_len := DBMS_LOB.GETLENGTH(l_blob);
l_file := UTL_FILE.FOPEN('BLOBDIR',filename,'wb', l_blob_len);
WHILE L_POS < l_blob_len LOOP
DBMS_LOB.READ (l_blob, l_amount, l_pos, l_buffer);
UTL_FILE.PUT_RAW(l_file, l_buffer, TRUE);
L_POS := L_POS + L_AMOUNT;
END LOOP;
UTL_FILE.FCLOSE(L_FILE);
END LOOP;

END BLOB_EXPORT;

学习，整理，修改过的，通过循环，就可以把每个blob字段都导出，并且可以与该条数据其他数据项对应，我们做的时候，是把这些文件放到另一台服务器上，说是为了提升oralce性能，但个人感觉没那么大的必要，因为我们的数据还没有达到T的级别，而且这些文件占用的只是磁盘空间。

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/30123160/viewspace-2061236/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/30123160/viewspace-2061236/