日本综合一区二区|亚洲中文天堂综合|日韩欧美自拍一区|男女精品天堂一区|欧美自拍第6页亚洲成人精品一区|亚洲黄色天堂一区二区成人|超碰91偷拍第一页|日韩av夜夜嗨中文字幕|久久蜜综合视频官网|精美人妻一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
Oracle存儲(chǔ)過程讀寫文件

Oracle存儲(chǔ)過程讀寫文件是實(shí)現(xiàn)文件與數(shù)據(jù)庫表之間交互的重要手段，下面就為您詳細(xì)介紹Oracle存儲(chǔ)過程讀寫文件方面的知識(shí)，希望對(duì)您能有所幫助。

成都創(chuàng)新互聯(lián)公司專注于平塘網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠為您提供平塘營銷型網(wǎng)站建設(shè)，平塘網(wǎng)站制作、平塘網(wǎng)頁設(shè)計(jì)、平塘網(wǎng)站官網(wǎng)定制、微信小程序開發(fā)服務(wù)，打造平塘網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供平塘網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。

有時(shí)候我們需要在文件與數(shù)據(jù)庫表之間利用程序來實(shí)現(xiàn)兩者的交互，這里可以利用UTL_FILE包實(shí)現(xiàn)對(duì)文件的I/O操作．下面就分別介紹文件寫表以及表數(shù)據(jù)寫文件．

[1]表信息導(dǎo)出到文件

在SUSE上建議一個(gè)文件夾/home/zxin10/file，然后對(duì)其chmod g+w file進(jìn)行授權(quán)(否則無法導(dǎo)出到文件)，再對(duì)您指定的路徑(/home/zxin10/file)向Oracle的系統(tǒng)表sys.dir$進(jìn)行注冊(cè)(否則也是無法成功將信息導(dǎo)出到文件),操作完后可以查詢sys.dir$可以看到表中的OS_PATH中有您指定的路徑位置．

注冊(cè)方式：執(zhí)行SQL語句create or replace directory BBB as '/home/zxin10/file';　即可

存儲(chǔ)過程如下：(寫文件時(shí),文件名可以不用先創(chuàng)建,程序中會(huì)自動(dòng)創(chuàng)建指定文件)

 
 
 
    
  
  
  
  1. CREATE OR REPLACE PROCEDURE V3_SUB_FETCH_TEST_2  
    2.   
  
  
  2. (  
    3.   
  
  
  3.    V_TEMP VARCHAR2,  
    4.   
  
  
  4.    --1為成功，0為失敗  
    5.   
  
  
  5.    v_retvalue   OUT NUMBER   
    6.   
  
  
  6.  )  
    7.   
  
  
  7. AS  
    8.   
  
  
  8.   --游標(biāo)定義  
    9.   
  
  
  9.   type ref_cursor_type is REF CURSOR;  
    10.   
  
  
  10.   cursor_select   ref_cursor_type;  
    11.   
  
  
  11.   select_cname    varchar2(1000);  
    12.   
  
  
  12.     
    13.   
  
  
  13.   v_file_handle   utl_file.file_type;  
    14.   
  
  
  14.     
    15.   
  
  
  15.   v_sql varchar2(1000);  
    16.   
  
  
  16.   v_filepath Varchar2(500);  
    17.   
  
  
  17.   v_filename Varchar2(500);  
    18.   
  
  
  18.   --緩沖區(qū)  
    19.   
  
  
  19.   v_results Varchar2(500);  
    20.   
  
  
  20.     
    21.   
  
  
  21.   v_pid varchar2(1000);  
    22.   
  
  
  22.   v_cpcnshortname Varchar2(500);  
    23.   
  
  
  23.    
    24.   
  
  
  24.   begin  
    25.   
  
  
  25.       v_filepath := V_TEMP;  
    26.   
  
  
  26.       if v_filepath is null then  
    27.   
  
  
  27.          v_filepath := '/home/zxin10/file3';  
    28.   
  
  
  28.       end if;  
    29.   
  
  
  29.       v_filename:='free_'|| substr(to_char(sysdate,'YYYYMMDDHH24MI'),1,10) ||'.all' ;  
    30.   
  
  
  30.       --游標(biāo)開始  
    31.   
  
  
  31.       select_cname:='select cpid,cpcnshortname from zxdbm_ismp.scp_basic';   
    32.   
  
  
  32.       --打開一個(gè)文件句柄 ,同時(shí)fopen的***個(gè)參數(shù)必須是大寫     
    33.   
  
  
  33.       v_file_handle:=utl_file.fopen('BBB',v_filename,'A');  
    34.   
  
  
  34.       Open cursor_select For select_cname;     
    35.   
  
  
  35.       Fetch  cursor_select into v_pid,v_cpcnshortname;  
    36.   
  
  
  36.       While  cursor_select%Found     
    37.   
  
  
  37.       Loop  
    38.   
  
  
  38.       v_results := v_pid||'|'||v_cpcnshortname;  
    39.   
  
  
  39.       --將v_results寫入文件  
    40.   
  
  
  40.       utl_file.put_line(v_file_handle,v_results);     
    41.   
  
  
  41.       Fetch  cursor_select into v_pid,v_cpcnshortname;        
    42.   
  
  
  42.       End Loop;  
    43.   
  
  
  43.         
    44.   
  
  
  44.       Close cursor_select;--關(guān)閉游標(biāo)  
    45.   
  
  
  45.       utl_file.fClose(v_file_handle);--關(guān)閉句柄  
    46.   
  
  
  46.       v_retvalue :=1;  
    47.   
  
  
  47.   exception when others then  
    48.   
  
  
  48.          v_retvalue :=0;   
    49.   
  
  
  49.   end V3_SUB_FETCH_TEST_2; 
    50.

[2]將文件信息導(dǎo)入到表中

和上面一樣，先對(duì)指定文件路徑進(jìn)行chmod,然后想Oracle的sys.dir$進(jìn)行路徑注冊(cè)．

文件zte.apsuic位于/home/zxin10/file下,其數(shù)據(jù)格式：
1|22|cheng
2|33|zhou
3|44|heng
4|55|yaya

表LOADDATA腳本：

 
 
 
    
  
  
  
  1. -- Create table  
    2.   
  
  
  2. create table LOADDATA  
    3.   
  
  
  3. (  
    4.   
  
  
  4.   ID   VARCHAR2(50),  
    5.   
  
  
  5.   AGE  VARCHAR2(50),  
    6.   
  
  
  6.   NAME VARCHAR2(50)  
    7.   
  
  
  7. )  
    8.   
  
  
  8.     / 
    9.

程序如下：(讀取文件時(shí),指定文件名一定要預(yù)先存在,否則程序會(huì)失敗)

 
 
 
    
  
  
  
  1. create or replace directory BBB as '/home/zxin10/file';  
    2.   
  
  
  2. /  
    3.   
  
  
  3. --作用法是將特定的文件路徑信息想Oracle注冊(cè)(注冊(cè)信息存放在sys.dir$表中)  
    4.   
  
  
  4.  
    5.   
  
  
  5. CREATE OR REPLACE PROCEDURE V3_SUB_FETCH_TEST_3  
    6.   
  
  
  6. (  
    7.   
  
  
  7.    --文件中的信息導(dǎo)入表中  
    8.   
  
  
  8.      V_TEMP VARCHAR2,  
    9.   
  
  
  9.      v_retvalue   OUT NUMBER --1 成功 ，0失敗  
    10.   
  
  
  10. AS   
    11.   
  
  
  11.   v_file_handle   utl_file.file_type;    
    12.   
  
  
  12.   v_sql varchar2(1000);  
    13.   
  
  
  13.   v_filepath Varchar2(500);  
    14.   
  
  
  14.   v_filename Varchar2(500);    
    15.   
  
  
  15.   --文件到表字段的映射  
    16.   
  
  
  16.   v_id varchar2(1000);  
    17.   
  
  
  17.   v_age varchar2(1000);  
    18.   
  
  
  18.   v_name varchar2(1000);  
    19.   
  
  
  19.   --緩沖區(qū)  
    20.   
  
  
  20.   v_str varchar2(1000);  
    21.   
  
  
  21.   --列指針  
    22.   
  
  
  22.   v_i number;  
    23.   
  
  
  23.   --字符串定位解析指針  
    24.   
  
  
  24.   v_sposition1 number;  
    25.   
  
  
  25.   v_sposition2 number;  
    26.   
  
  
  26.   begin  
    27.   
  
  
  27.       v_filepath := V_TEMP;  
    28.   
  
  
  28.       if v_filepath is null then  
    29.   
  
  
  29.          v_filepath := '/home/zxin10/file';  
    30.   
  
  
  30.       end if;  
    31.   
  
  
  31.       v_filename:='zte.apsuic';  
    32.   
  
  
  32.       --v_sql:= 'create or replace directory CCC as '''|| v_filepath || '''';  
    33.   
  
  
  33.       --execute immediate v_sql;   
    34.   
  
  
  34.         
    35.   
  
  
  35.       v_file_handle:=utl_file.fopen('CCC',v_filename,'r');         
    36.   
  
  
  36.       Loop  
    37.   
  
  
  37.              --將文件信息讀取到緩沖區(qū)v_str中,每次讀取一行  
    38.   
  
  
  38.              utl_file.get_line(v_file_handle,v_str);  
    39.   
  
  
  39.              --dbms_output.put_line(v_str);   
    40.   
  
  
  40.              --針對(duì)每行的列數(shù)  
    41.   
  
  
  41.              v_i := 1;  
    42.   
  
  
  42.              --針對(duì)字符串每次的移動(dòng)指針  
    43.   
  
  
  43.              v_sposition1 := 1;  
    44.   
  
  
  44.              --文件中每行信息3列,循環(huán)3次  
    45.   
  
  
  45.              FOR I IN 1..3 loop                 
    46.   
  
  
  46.              --當(dāng)instr(v_str, '|', 6)其中v_str為1|22|wuzhuocheng ，它返回0  
    47.   
  
  
  47.              v_sposition2 := instr(v_str, '|', v_sposition1);  
    48.   
  
  
  48.              --字符串解析正常情況  
    49.   
  
  
  49.              if v_sposition2 <> 0 then  
    50.   
  
  
  50.                if v_i=1     then  
    51.   
  
  
  51.                   v_id := substr(v_str, v_sposition1, v_sposition2 - v_sposition1);      --***列                 
    52.   
  
  
  52.                elsif  v_i=2 then  
    53.   
  
  
  53.                     v_age := substr(v_str, v_sposition1, v_sposition2 - v_sposition1); --第二列  
    54.   
  
  
  54.                elsif v_i=3  then  
    55.   
  
  
  55.                   v_name := substr(v_str, v_sposition1, v_sposition2 - v_sposition1);    --第三列   
    56.   
  
  
  56.                else  
    57.   
  
  
  57.                   return;  
    58.   
  
  
  58.                end if;                              
    59.   
  
  
  59.              --字符串解析異常情況  
    60.   
  
  
  60.              else   
    61.   
  
  
  61.                if v_i=1    then  
    62.   
  
  
  62.                 v_id := substr(v_str, v_sposition1);      --***列  
    63.   
  
  
  63.                elsif v_i=2 then  
    64.   
  
  
  64.                   v_age := substr(v_str, v_sposition1); --第二列  
    65.   
  
  
  65.                elsif v_i=3 then  
    66.   
  
  
  66.                 v_name := substr(v_str, v_sposition1);    --第三列   
    67.   
  
  
  67.                else  
    68.   
  
  
  68.                 return;  
    69.   
  
  
  69.                end if;    
    70.   
  
  
  70.              end if;     
    71.   
  
  
  71.              v_sposition1 := v_sposition2 + 1;  
    72.   
  
  
  72.              v_i := v_i+1;  
    73.   
  
  
  73.              end loop;   
    74.   
  
  
  74.              --每列循環(huán)完后將信息insert into表中  
    75.   
  
  
  75.              insert into zxdbm_ismp.loaddata values(v_id,v_age,v_name);                    
    76.   
  
  
  76.       End Loop;  
    77.   
  
  
  77.       --關(guān)閉句柄  
    78.   
  
  
  78.       utl_file.fClose(v_file_handle);  
    79.   
  
  
  79.       v_retvalue :=1;  
    80.   
  
  
  80.   exception when others then  
    81.   
  
  
  81.          v_retvalue :=0;   
    82.   
  
  
  82.   end V3_SUB_FETCH_TEST_3;  
    83.

【編輯推薦】

Oracle讀寫文件bfilename的實(shí)例

Oracle XE自帶數(shù)據(jù)庫創(chuàng)建的過程

Oracle物化視圖創(chuàng)建全過程

ORACLE創(chuàng)建實(shí)例的過程

oracle時(shí)間加減的語句寫法


網(wǎng)頁名稱：Oracle存儲(chǔ)過程讀寫文件
標(biāo)題URL：http://www.dlmjj.cn/article/dhdihij.html