eygle.com   eygle.com
eygle.com eygle
eygle.com  
 

« 支持一下玉米-转贴《李宇春 夏日里最后一场高烧》 | Blog首页 | Where Are The Controlfile 'Max' Parameters Stored? »

如何使用DBMS_LOB从文件中加载CLOB数据

最近被人批评BLOG有娱乐化倾向,赶紧写点技术文章.
此文用以回答留言板上1224号问题。
BFILE包含二进制数据,所以当通过BFILE方式加载数据到CLOB/NCLOB时,Oracle不进行字符集转化。
如果字符集是可变长的,例如UTF-8或ZHS16GBK,Oracle使用UCS2存储LOB数据。所以如果想BFILE文件数据能够正确加载入数据库,那么文件需要以USC2字符集存储。
那么还有一点需要注意的是,如果以Unicode模式存储文件,那么文件会增加两个字节:
'FF FE'.
在加载文件时我们需要跳过这两个字节。
在Windows上我们存储文件时选择Unicode方式,我输入的字符为:
test测试
Oracle BFile数据加载问题
研究
Unicode.File.Save 然后我们可以加载这个文件的内容,注意比较前后两个过程不同之处:
SQL> create table t (
  2  name       varchar2(30),
  3  content clob
  4  )
  5  /

Table created.

SQL> 
SQL> 
SQL> create or replace directory dir1 as '/opt/oracle';

Directory created.

SQL> 
SQL> declare
  2          l_bfile bfile;
  3          l_clob  clob;
  4          l_str   varchar2(1000);
  5  begin
  6          insert into t (name,content)
  7          values ('b.txt',empty_clob())
  8          returning content into l_clob;
  9  
 10          l_bfile := bfilename('DIR1','b.txt');
 11  
 12          dbms_lob.fileopen(l_bfile);
 13          dbms_lob.loadfromfile(l_clob,l_bfile,dbms_lob.getlength(l_bfile));
 14          dbms_lob.fileclose(l_bfile);
 15          commit;
 16          exception when others then
 17          l_str:=sqlerrm(sqlcode);
 18          dbms_output.put_line(l_str);
 19  end;
 20  /

PL/SQL procedure successfully completed.

SQL> select * from t;  

NAME                           CONTENT
------------------------------ ----------------------------------------------
b.txt                          ?test测试
                               Oracle BFile数据加载问题
                               研究


SQL> 
SQL> declare
  2          l_bfile bfile;
  3          l_clob  clob;
  4          l_str   varchar2(1000);
  5  begin
  6          insert into t (name,content)
  7          values ('b.txt',empty_clob())
  8          returning content into l_clob;
  9  
 10          l_bfile := bfilename('DIR1','b.txt');
 11  
 12          dbms_lob.fileopen(l_bfile);
 13          dbms_lob.loadfromfile(l_clob,l_bfile,dbms_lob.getlength(l_bfile)-2,
 14                            src_offset => 3);
 15          dbms_lob.fileclose(l_bfile);
 16          commit;
 17          exception when others then
 18          l_str:=sqlerrm(sqlcode);
 19          dbms_output.put_line(l_str);
 20  end;
 21  /

PL/SQL procedure successfully completed.

SQL> select * from t;

NAME                           CONTENT
------------------------------ --------------------------------------
b.txt                          ?test测试
                               Oracle BFile数据加载问题
                               研究

b.txt                          test测试
                               Oracle BFile数据加载问题
                               研究



以上内容,仅供参考。
历史上的今天...

无觅

By eygle on 2005-08-16 11:13 | Comments (12) | SQL.PLSQL | 390 |

12 Comments

非常感谢!!
非常佩服!!
醍醐灌顶!!
激动中....

嘿嘿,有效就好!

其实,我更关心你第一个截图
把那些窗口给我关了-我要看后面美女!
:-D

那个不是免费项目:D

你又让别人醍醐灌顶了?总拿东西浇别人,真是的^_^

我也想看后面那个若隐若现的东西是啥?桌面吗?非的要看个全貌不可!

不好意思,打扰一下,我安装的是ORACLE 10G RELEASE 2,把您的上面的程序照做下来,最后的显示结果是如下:怎么办呢?
NAME
------------------------------
CONTENT
----------------------------------------------------------------
b.txt
?琀攀猀琀????伀爀愀挀氀攀???椀氀攀灥湣?綏?题???発?

b.txt
琀攀猀琀????伀爀愀挀氀攀???椀氀攀灥湣?綏?题???発??

我也碰到了楼上的问题.
估计是字符集的问题.
但不知道如何解决

那还是用我的lobs工具比较好.

我用的数据库是10g 在9i中这种方法是有效的,但在10g 中是不行的,郁闷中

database:10.1.0.2.0
os:windows xp
创建的表结构:
test_load_clob(name varchar2(40), content clob)
创建目录
create or replace directory DIR1 as 'c:\clob';
根据eygle的方法,创建了一个procedure,如下:
create or replace procedure test_clob (pfname varchar2)
IS
l_bfile bfile;
l_clob clob;
l_str varchar2(1000);
begin
insert into test_load_clob (id,name,content)
values (pfname,empty_clob())
returning content into l_clob;

l_bfile := bfilename('DIR1',pfname);

dbms_lob.fileopen(l_bfile);
dbms_lob.loadfromfile(l_clob,l_bfile,dbms_lob.getlength(l_bfile));
dbms_lob.fileclose(l_bfile);
commit;
exception when others then
l_str:=sqlerrm(sqlcode);
dbms_output.put_line(l_str);
end;
存储过程是创建成功了,执行存储过程也成功了,
exec test_clob('123.trc')
返回是成功的

但是执行
select * from test_load_clob;
content 列是没有值的。
然后我换了一个环境,
database:10.2.0
os:windows xp
执行相同的步骤和方法,在表test_load_clob中的content列中是有数据的,请问这是为什么??

我的
database:10.2.0.1.0
os:windows xp

表test_load_clob中的content列中有数据

database:10.1.0.1.0
表test_load_clob中的content列中没有数据
这是什么原因,郁闷呀

to 呆呆木
用loadclobfromfile代替loadfromfile可解决乱码问题
http://download-uk.oracle.com/docs/cd/B19306_01/appdev.102/b14258/d_lob.htm#i998978


CopyRight © 2004~2020 云和恩墨,成就未来!, All rights reserved.
数据恢复·紧急救援·性能优化 云和恩墨 24x7 热线电话:400-600-8755 业务咨询:010-59007017-7040 or 7037 业务合作: marketing@enmotech.com