Oracle中LOB 处理(dbms_lob的一些用法)

最近做项目需要用到一些大对象数据,在网上淘了一阵子,发现了一些比较好的资料,记录了下来:

主要是用来存储大量数据的数据库字段,最大可以存储4G字节的非结构化数据。
主要介绍字符类型和二进制文件类型LOB数据的存储,单独介绍二进制类型LOB数据的存储。

一,Oracle中的LOB数据类型分类
1,按存储数据的类型分:
   ①字符类型:
    CLOB:存储大量 单字节 字符数据。
    NLOB:存储定宽 多字节 字符数据。
   ②二进制类型:
    BLOB:存储较大无结构的二进制数据。
   ③二进制文件类型:
    BFILE:将二进制文件存储在数据库外部的操作系统文件中。存放文件路径。

2,按存储方式分:
    ①存储在内部表空间:
     CLOB,NLOB和BLOB
    ②指向外部操作系统文件:
     BFILE
二,大对象数据的录入
1,声明LOB类型列
   /*
    conn scott/tiger;
    Create TableSpace ts5_21
       DataFile 'E:\Oracle\ts5_21.dbf'
    Size 5m;
   */
   Create Table tLob (
    no Number(4),
    name VarChar2(10),
    resume CLob,
    photo BLob,
    record BFile
   )
   Lob (resume,photo)Store As (
    Tablespace ts5_21 --指定存储的表空间
    Chunk 6k --指定数据块大小
    Disable Storage In Row
   );
2,插入大对象列
  ①先插入普通列数据
 
  ②遇到大对象列时,插入空白构造函数。
    字符型:empty_clob(),empty_nclob()
    二进制型:empty_blob()
    二进制文件类型:BFileName函数指向外部文件。
      BFileName函数:
       BFileName(‘逻辑目录名’,‘文件名’);
       逻辑目录名只能大写,因为数据词典是以大写方式存储。Oracle是区分大小写的。
       在创建时,无需将BFileName函数逻辑目录指向物理路径,使用时才做检查二者是否关联。
    例子:
    Insert Into tLob Values(1,'Gene',empty_clob(),empty_blob(),bfilename('MYDIR','IMG_0210.JPG'));
  
  ③将逻辑目录和物理目录关联。(如果是二进制文件类型)
    授予 CREATE ANY DIRECTORY 权限
     Grant CREATE ANY DIRECTORY TO 用户名 WITH ADMIN OPTION;
    关联逻辑目录和物理目录
     本地
     Create Directory 逻辑目录名 As ‘文件的物理目录’;
     网络:
     Create Directory 逻辑目录名 As ‘\\主机名(IP)\共享目录’;
    例子:
     Create Directory MYDIR As 'E:\Oracle';
 
   插入例子:
   insert into tlob values(1,'Gene','CLOB大对象列',empty_blob(),bfilename('MYDIR','IMG_0210.JPG'));

三,大对象数据的读取和操作:DBMS_LOB包
   DBMS_LOB包:包含处理大对象的过程和函数
   /*
   insert into tlob values(1,'Gene','CLOB大对象列',empty_blob(),bfilename('MYDIR','IMG_0210.JPG'));
   insert into tlob values(2,'Jack','CLOB大对象列',empty_blob(),bfilename('MYDIR','IMG_0210.JPG'));
   insert into tlob values(3,'Mary','大对象列CLOB',empty_blob(),bfilename('MYDIR','IMG_0210.JPG'));
   */
  1,读取大对象数据的过程和函数
   ①:DBMS_LOB.Read():从LOB数据中读取指定长度数据到缓冲区的过程。
      DBMS_LOB.Read(LOB数据,指定长度,起始位置,存储返回LOB类型值变量);
     例子:
     Declare
        varC clob;
     vRStr varchar2(1000);
        ln number(4);
        Strt number(4);
     Begin
        select resume into varC from tlob where no = 1;
        ln := DBMS_LOB.GetLength(varC);
        Strt := 1;
        DBMS_LOB.Read(varC, ln, Strt, vRStr);
        DBMS_output.put_line('Return: '||vRStr);
     End;
 
   ②:DBMS_LOB.SubStr():从LOB数据中提取子字符串的函数。
    DBMS_LOB.SubStr(LOB数据,指定提取长度,提取起始位置):
    例子:
     Declare
       varC clob;
      vRStr varchar2(1000);
      ln number(4);
      Strt number(4);
     Begin
      select resume into varC from tlob where no = 1;
      ln := 4;
      Strt := 1;
      vRStr := DBMS_LOB.SubStr(varC, ln, Strt);
      DBMS_output.put_line('结果为: '||vRStr);
     End;
  
   ③:DBMS_LOB.InStr():从LOB数据中查找子字符串位置的函数。
     DBMS_LOB.InStr(LOB数据, 子字符串);
     例子:
     Declare
      varC clob;
      vSubStr varchar2(1000);
      vRStr varchar2(1000);
      ln number(4);
     Begin
      select resume into varC from tlob where no = 1;
        vSubStr := '大对象';
      ln := DBMS_LOB.InStr(varC,vSubStr);
      DBMS_output.put_line('位置为: '||ln);
    
      vRStr := DBMS_LOB.SubStr(varC, Length(vSubStr), ln);
      DBMS_output.put_line('位置为'||ln||'长度为'||Length(vSubStr)||'的子字符串为:'||vRStr);
     End;
  
   ④:DBMS_LOB.GetLength():返回指定LOB数据的长度的函数。
     DBMS_LOB.GetLength(LOB数据);
  
   ⑤:DBMS_LOB.Compare():比较二个大对象是否相等。返回数值0为相等,-1为不相等。
     DBMS_LOB.Compare(LOB数据,LOB数据);
     例子:
     Declare
        varC1 clob;
      varC2 clob;
      varC3 clob;
      ln number(4);
     Begin
      select resume into varC1 from tlob where no = 1;
      select resume into varC2 from tlob where no = 2;
      select resume into varC3 from tlob where no = 3;
      ln := DBMS_LOB.Compare(varC1,varC1);
      DBMS_output.put_line('比较的结果为: '||ln);
      ln := DBMS_LOB.Compare(varC2,varC3);
      DBMS_output.put_line('比较的结果为: '||ln);
     End;
   2,操作大对象数据的过程
    操作会改变数据库中原有数据,需要加上Updata锁锁上指定数据列,修改完后提交事务。
  
   ①:DBMS_LOB.Write():将指定数量的数据写入LOB的过程。
     DBMS_LOB.Write(被写入LOB, 写入长度(指写入LOB数据),写入起始位置(指被写入LOB),写入LOB数据);
     例子:
     Declare
        varC clob;
        vWStr varchar2(1000);
        vStrt number(4);
      ln number(4);
     Begin
        vWStr := 'CLOB';
        ln := Length(vWStr);
        vStrt := 5;
        select resume into varC from tlob where no = 1 FOR UPDATE;
        DBMS_LOB.Write(varC, ln, vStrt, vWStr);
        DBMS_output.put_line('改写结果为: '||varC);
        Commit;
     End;
  
   ②:DBMS_LOB.Append():将指定的LOB数据追加到指定的LOB数据后的过程。
     DBMS_LOB.Append(LOB数据,LOB数据);
     例子:
     Declare
      varC clob;
      vAStr varchar2(1000);
     Begin
      vAStr := ',这是大对象列';
      select resume into varC from tlob where no = 1 FOR UPDATE;
      DBMS_LOB.Append(varC, vAStr);
      commit;
      DBMS_output.put_line('追加结果为: '||varC);
     End;
  
   ③:DBMS_LOB.Erase():删除LOB数据中指定位置的部分数据的过程;
     DBMS_LOB.Erase(LOB数据,指定删除长度, 开始删除位置);
     例子:
     Declare
      varC clob;
      ln number(4);
      strt number(4);
     Begin
      ln := 1;
      strt := 5;
      select resume into varC from tlob where no = 1 FOR UPDATE;
      DBMS_LOB.Erase(varC, ln, strt);
      commit;
      DBMS_output.put_line('擦除结果为: '||varC);
     End; 
  
   ④:DBMS_LOB.Trim():截断LOB数据中从第一位置开始指定长度的部分数据的过程;
     DBMS_LOB.Trim(LOB数据,截断长度);
     例子:
     Declare
     varC clob;
     ln number(4);
     Begin
      ln := 4;
      select resume into varC from tlob where no = 1 FOR UPDATE;
      DBMS_LOB.Trim(varC, ln);
      COMMIT;
      DBMS_output.put_line('截断结果为: '||varC);
     End;
  
   ⑤:DBMS_LOB.Copy():从指定位置开始将源LOB复制到目标LOB;
     DBMS_LOB.Copy(目标LOB,源LOB,复制源LOB长度,复制到目标LOB开始位置,复制源LOB开始位置)
     例子:
     Declare
      vDEST_LOB clob;
      vSRC_LOB clob;
      AMOUNT number;
      DEST_OFFSET number;
      SRC_OFFSET number;
     Begin
      select resume into vDEST_LOB from tlob where no = 1 FOR UPDATE;
      select resume into vSRC_LOB from tlob where no = 2 ;
     
      AMOUNT := DBMS_LOB.GetLength(vSRC_LOB);
      DEST_OFFSET := DBMS_LOB.GetLength(vDEST_LOB)+1;
      SRC_OFFSET := 1;
     
      DBMS_LOB.Copy(vDEST_LOB, vSRC_LOB, AMOUNT, DEST_OFFSET, SRC_OFFSET);
      DBMS_output.put_line('拷贝结果为: '||vDEST_LOB);
     End;

猜你喜欢

转载自blog.csdn.net/lj88811498/article/details/30478623
0条评论
添加一条新回复