導讀:1建站知識在oracle中utl_file包提供了一些操作文本文件的函數和過程，接下來和大家一起學習他的基本操作，感興趣的你可以參考網站seo優化軟件seo網站排名優化軟件。

在oracle中utl_file包提供了一些操作文本文件的函數和過程，學習了一下他的基本操作 1.創建directory，并給用戶授權

復制代碼 代碼如下:

--創建directory create or replace directory TESTFILE as '/home/oracle/zxx/test'; --給用戶授權 grant read, write on directory TESTFILE to zxx;

詳細介紹 2.寫入操作

復制代碼 代碼如下:

---測試寫入 DECLARE filehandle utl_file.file_type; --句柄 begin filehandle := utl_file.fopen('TESTFILE','hello.txt','w'); --打開文件 utl_file.put_line(filehandle,'Hello Oracle!');--寫入一行記錄 utl_file.put_line(filehandle,'Hello World!'); utl_file.put_line(filehandle,'你好，胖子！'); utl_file.fclose(filehandle);--關閉句柄 end;

備注： fopen有一個參數max_linesize，下面是原文解釋 Maximum number of characters for each line, including the newline character, for this file (minimum value 1, maximum value 32767). If unspecified, Oracle supplies a default value of 1024. 3.讀取操作

復制代碼 代碼如下:

--測試讀取 set serveroutput on; DECLARE filehandle utl_file.file_type; filebuffer varchar2(500); begin filehandle := utl_file.fopen('TESTFILE','hello.txt','R'); IF utl_file.is_open(filehandle) THEN dbms_output.put_line('file is open!'); END IF; loop begin utl_file.get_line(filehandle,filebuffer); dbms_output.put_line(filebuffer); EXCEPTION WHEN no_data_found THEN exit ; WHEN OTHERS THEN dbms_output.put_line('EXCEPTION1:'||SUBSTR(SQLERRM, 1, 100)) ; end; end loop;百度seo網站優化 utl_file.fclose(filehandle); IF utl_file.is_open(網站seo優化課程filehandle) THENseo網站優化 dbms_output.put_line('file is open!'); else dbms_output.put_line('file is close!'); END IF; utl_file.fcopy('TESTFILE', 'hello.txt', 'TESTFILE', 'hello.dat');--復制 utl_file.fcopy('TESTFILE', 'hello.txt', 'TESTFILE', 'hello2.dat'); utl_file.fcopy('TESTFILE', 'hello.txt', 'TESTFILE', 'hello.xls'); utl_file.frename('TESTFILE','hello.xls','TESTFILE','frenamehello.xls',TRUE);--重命名 utl_file.fremove('TESTFILE', 'hello2.dat');--刪除文件 EXCEPTION WHEN OTHERS THEN dbms_output.put_line('EXCEPTION2:'||SUBSTR(SQLERRM, 1, 100)) ; end;

4.判斷文件是否存在（讀，重命名，復制，刪除都要判斷文件是否存在）

復制代碼 代碼如下:

--判斷文件是否存在 DECLARE ex BOOLEAN;--文件是否存在 flen NUMBER;--文件長度？ 這個地方不知道怎么理 （原文 file_length The length of the file in bytes. NULL if file does not exist.） bsize NUMBER;--文件大小 BEGIN utl_file.fgetattr('TESTFILE', 'hello.txt', ex, flen, bsize); IF ex THEN dbms_output.put_line('File Exists'); ELSE dbms_output.put_line('File Does Not Exist'); END IF; dbms_output.put_line('File Length: ' || TO_CHAR(flen)); dbms_output.put_line('Block Size: ' || TO_CHAR(bsize)); END fgetattr;

關鍵詞標簽: 實例 標簽