以前曾寫(xiě)過(guò)PL/SQL，當(dāng)時(shí)還是第一次接觸，什么都不明白
順手寫(xiě)了篇 《Oracle內(nèi)建包UTL_FILE使用說(shuō)明 》的博文，沒(méi)想到還被轉(zhuǎn)載（譬如百度搜索utl_file，第一篇就是，不過(guò)沒(méi)寫(xiě)我的出處，可惜……）
http://www.aygfsteel.com/liwei/archive/2007/01/10/92902.html
當(dāng)時(shí)項(xiàng)目做完就沒(méi)接觸PL/SQL了，時(shí)隔2年半，又要寫(xiě)PL/SQL了，而且遇到的問(wèn)題居然還是和UTL_FILE有關(guān)。
于是上網(wǎng)找了些資料
http://www.shift-the-oracle.com/plsql/utl_file/utl_file_dir.html
http://www.shift-the-oracle.com/plsql/utl_file/create-directory.html
日文的，不得不說(shuō)，日本人做事實(shí)在是認(rèn)真，資料非常詳細(xì)，看完之后，我就覺(jué)得我是高手了，可以整理點(diǎn)東西出來(lái)教別人了……哈哈
廢話(huà)少說(shuō)，開(kāi)始
現(xiàn)在一般跑UTL_FILE.FOPEN時(shí)會(huì)出現(xiàn)ORA-29280的錯(cuò)誤，出現(xiàn)這個(gè)錯(cuò)誤主要有2個(gè)原因
1.文件夾沒(méi)有讀寫(xiě)權(quán)限
2.文件夾沒(méi)有進(jìn)行Oracle讀寫(xiě)配置
注意：這里討論的Oracle是在Unix類(lèi)（包括linux，Solaris等）主機(jī)下安裝的。
對(duì)于第1個(gè)原因，直接設(shè)定文件夾權(quán)限即可，譬如
# chmod 700 /u05/file_storage/recv_dir
這個(gè)沒(méi)啥好說(shuō)，不是我要說(shuō)的重點(diǎn)。
第2個(gè)原因，可以好好說(shuō)說(shuō)。
Oracle進(jìn)行文件夾讀寫(xiě)配置有2種方式
1.設(shè)定UTL_FILE_DIR
2.使用DIRECTORY 對(duì)象
1.設(shè)定UTL_FILE_DIR
Oracle 8i之前，貌似沒(méi)有DIRECTORY這個(gè)概念，所以只有一種方式。
編輯 initORACLE_SID.ora 文件（ORACLE_SID是個(gè)變數(shù)，因DB設(shè)定有所不同），添加
UTL_FILE_DIR='/u05/file_storage/recv_dir','/u05/file_storage/send_dir'
即可。
Oracle 9i之后還可以利用ALTER SYSTEM 命令進(jìn)行設(shè)定
ALTER SYSTEM SET
UTL_FILE_DIR='/u05/file_storage/recv_dir','/u05/file_storage/send_dir'
SCOPE = SPFILE ;
也可以用命令來(lái)確認(rèn)設(shè)定是否正確
SELECT NAME, VALUE FROM V$PARAMETER2 WHERE NAME='utl_file_dir' ;
注意：Oracle 8i 之后的DB不推薦使用這種方式，主要是情報(bào)泄露方面，日本很在意這個(gè)。
另外，讓所有文件夾有效可使用('*')。
這種方法不方便的就是，設(shè)定了之后必須重啟Oracle才能使設(shè)定有效。
使用例
CREATE OR REPLACE PROCEDURE RIVUS.UTL_FILE_DIR_WRITE_SAMPLE
AS
vHandle UTL_FILE.FILE_TYPE;
vDirname VARCHAR2(250);
vFilename VARCHAR2(250);
vOutput VARCHAR2(32767);
BEGIN
vDirname := '/u05/file_storage/send_dir'; -- 絕對(duì)路徑
vFilename := 'test.txt';
vHandle := UTL_FILE.FOPEN(vDirname ,vFilename,'w', 32767);
vOutput := '利用 UTL_FILE_DIR 進(jìn)行的文件處理';
UTL_FILE.PUT_LINE(vHandle, vOutput);
UTL_FILE.FCLOSE(vHandle);
EXCEPTION WHEN OTHERS THEN
UTL_FILE.FCLOSE_ALL;
RAISE;
END;
2.使用DIRECTORY 對(duì)象
從Oracle 9i 開(kāi)始UTL_FILE就能使用CREATE DIRECTORY了。
首先文件夾必須存在，要有權(quán)限，我就不多說(shuō)了。
然后做成DIRECTORY 對(duì)象
CREATE DIRECTORY recv_area AS '/u05/file_storage/recv_dir';
CREATE DIRECTORY send_area AS '/u05/file_storage/send_dir';
當(dāng)recv_area已存在時(shí)，會(huì)出錯(cuò)，可使用下面這句
CREATE OR REPLACE DIRECTORY recv_area AS '/u05/file_storage/recv_dir';
接著，賦予用戶(hù)該DIRECTORY 對(duì)象的讀寫(xiě)權(quán)限
GRANT READ ON DIRECTORY recv_area TO user_name ;
GRANT WRITE ON DIRECTORY send_area TO user_name ;
同時(shí)讀寫(xiě)權(quán)限
GRANT READ，WRITE ON DIRECTORY recv_area TO user_name ;
做好這些就可以確認(rèn)了
SELECT * FROM ALL_DIRECTORIES ;
看到自己做成的DIRECTORY了吧
這里需要注意的是，當(dāng)初CREATE DIRECTORY的時(shí)候是小寫(xiě)recv_area，現(xiàn)在這里是大寫(xiě)RECV_AREA
之后利用該DIRECTORY 對(duì)象時(shí)必須用大寫(xiě)。
還有，該DIRECTORY對(duì)象不包括上層目錄（這個(gè)是當(dāng)然的），也不包括子目錄。
要利用子目錄需要再定義一個(gè)子目錄的DIRECTORY對(duì)象。
使用例
CREATE OR REPLACE PROCEDURE RIVUS.CREATE_DIR_WRITE_SAMPLE
AS
vHandle UTL_FILE.FILE_TYPE;
vDirname VARCHAR2(250);
vFilename VARCHAR2(250);
vOutput VARCHAR2(32767);
BEGIN
vDirname := 'SEND_AREA'; -- 必須用大寫(xiě)
vFilename := 'test.txt';
vHandle := UTL_FILE.FOPEN(vDirname ,vFilename,'w', 32767);
vOutput := '利用CREATE DIRECTORY進(jìn)行的文件處理';
UTL_FILE.PUT_LINE(vHandle, vOutput);
UTL_FILE.FCLOSE(vHandle);
EXCEPTION WHEN OTHERS THEN
UTL_FILE.FCLOSE_ALL;
RAISE;
END;
到此為止，問(wèn)題應(yīng)該解決了。