Oracle中有多種方法可以向數據庫或服務器文件系統上載文件，這裡主要介紹如下三種：Oracle HTTP Server（OHS）的mod_plsql模塊提供通過web頁面向數據庫上載文件的功能；Oracle 9iAS的標簽庫和Bean提供的文件上載功能；通過JDBC程序上載文件。
一、Oracle HTTP Server（OHS）的mod_plsql模塊提供通過web頁面向數據庫上載文件的功能
1．在文件上載的目標模式中建立文檔訪問表
CREATE TABLE [table_name] (
NAME VARCHAR2(256) UNIQUE NOT NULL,
MIME_TYPE VARCHAR2(128),
DOC_SIZE NUMBER,
DAD_CHARSET VARCHAR2(128),
LAST_UPDATED DATE,
CONTENT_TYPE VARCHAR2(128),
[content_column_name] [content_column_type]
[ , [content_column_name] [content_column_type]]
);
表中CONTENT_TYPE列為BLOB或long raw，但只能有一列。每個上載文件在表中單獨占有一行，不能同時把多個文件上載到表中的同一行內，這是mod_plsql模塊功能有限的地方。用下面和列建立文檔表：Content_table。
NAME VARCHAR(128) UNIQUE NOT NULL,
MIME_TYPE VARCHAR(128),
DOC_SIZE NUMBER,
DAD_CHARSET VARCHAR(128),
LAST_UPDATED DATE,
CONTENT_TYPE VARCHAR(128),
CONTENT LONG RAW,
BLOB_CONTENT BLOB ;
2．配置DAD的文檔訪問表
啟動數據庫和OHS後，創建空白的數據庫訪問描述符。在"數據庫訪問描述符"頁面的"網關使用文檔表"信息向與此數據庫訪問描述符關聯的數據庫上載/下載文檔。缺省情況下所有文檔都將以 BLOB 上載。通過在 Long Raw 字段中指定以逗號分隔的文件擴展名，可以覆蓋此缺省設置。此字段的*值將使所有文檔以 Long Raw 上載。"文檔訪問過程"指定用於訪問文檔的虛擬路徑。"文檔訪問過程"字段指定網關處理文檔請求所調用的過程。這裡指定缺省的文檔表為content_table。
3．提供文件上載頁面，這裡使用存儲過程的形式上載和浏覽、下載文件。
CREATE OR REPLACE PROCEDURE "ZYFILEUP"."IN_FILE" is
begin
htp.prn('
＜html＞
＜head＞
＜title＞File upload＜/title＞
＜/head＞
＜body bgcolor="#C0C0C0"＞
＜form enctype="multipart/form-data" action="/pls/upfile/write_infos" method="POST"＞
＜p＞＜b＞＜font size="5" color="#800080"＞指定上載文件＜/font＞＜/b＞＜/p＞
＜hr＞
＜p＞
＜b＞標題:＜textarea rows="3" name="filetitle" cols="100" ＞＜/textarea＞ ＜br＞
＜b＞類別:＜input type="text" name="filesort" size="130" ＞ ＜br＞
＜b＞作者:＜input type="text" name="author" size="130" ＞ ＜br＞
＜b＞小類:＜input type="text" name="localsort" size="130" ＞ ＜br＞
＜b＞摘要:＜textarea rows="5" name="abstract" cols="130" ＞＜/textarea＞ ＜br＞
＜b＞文章1:＜input type="file" name="up_file" size="110" ＞ ＜br＞
＜b＞文章2:＜input type="file" name="up_file" size="110" ＞ ＜br＞
＜b＞文章3:＜input type="file" name="up_file" size="110" ＞ ＜br＞
＜b＞文章4:＜input type="file" name="up_file" size="110" ＞ ＜br＞
＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞＜/b＞ ＜/p＞＜hr＞＜p＞＜b＞
＜line＞
＜input type="submit" value="提交"＞
＜input type="reset" value="全部重寫"＞
＜/p＞
＜/form＞
＜/body＞
＜/html＞
');
end;
4．提供上載文件浏覽頁面
第3步提交的文件自動上載到文檔表中，下面由存儲過程WRITE_INFOS來記錄上載的文件信息，實際上完全沒必要，但這裡做一比較。
CREATE OR REPLACE PROCEDURE "ZYFILEUP"."WRITE_INFOS" (
filetitle in varchar2,
up_file in owa.vc_arr,
filesort in varchar2,
author in varchar2,
abstract in varchar2,
localsort in varchar2
) is
i number:=1;
begin
htp.htmlopen;
htp.headopen;
htp.title('File Uploaded');
htp.headclose;
htp.bodyopen;
htp.header(1, 'Upload Status');
while true loop
begin
htp.prn('Uploaded '|| up_file(i) ||' successfully !');
htp.prn('＜br＞');
htp.prn('＜a href="/pls/upfile/downfile？upfilename=');
htp.prn(utl_url.escape(up_file(i),true,'GBK'));
htp.prn('" target="_blank"＞Open this file !＜/a＞');
htp.prn('＜br＞');
INSERT INTO "ZYFILEUP"."FILE_TABLE"
values(filetitle,up_file(i),filesort,author,sysdate(),abstract,localsort);
commit;
i:=i+1;
exception
when no_data_found then exit;
end;
end loop;
htp.line;
htp.print('Uploaded successfully !');
htp.bodyclose;
htp.htmlclose;
end;
查閱文檔表後會發現，文件已經上載了，但文檔表的上載時間有錯誤，與上載記錄中的系統時間不符，這可能是該功能的一個BUG，如果誰有解決此問題的辦法或軟件補丁，請告訴我。
5．為上載文件提供頁面浏覽功能
CREATE OR REPLACE PROCEDURE "ZYFILEUP"."DOWNFILE" (upfilename
in varchar2)
is
mimetype varchar2(100);
myblob blob;
begin
select mime_type,blob_content into mimetype,myblob
from zyfileup.content_table where name = upfilename;
owa_util.mime_header(mimetype, true);
sys.wpg_docload.download_file(myblob);
end;
這樣可以通過Web浏覽器根據上載文件的mime_type類型浏覽文件了。
這種上載文件的辦法最為簡單，可以支持中文文件名，支持客戶端文件上載和下載，可以自動識別文件類型和計算文件大小。
