將圖片檔案儲存到Oracle的儲存過程

一個儲存圖片檔案的過程，任何開發工具都可以通過呼叫過程把圖片文儲存到資料庫中。

　　詳細步驟：

　　Microsoft Windows 2000 [Version 5.00.2195]

　　(C) 版權所有 1985-2000 Microsoft Corp.

　　C:Documents and Settingschanet>cd

　　C:>sqlplus /nolog

　　SQL*Plus: Release 9.2.0.1.0 - Production on 星期三 1月 19 14:46:21 2005

　　Copyright (c) 1982, 2002, Oracle Corporation. All rights reserved.

　　SQL> connect chanet/chanet@oradb;

　　已連線。

　　SQL> CREATE TABLE IMAGE_LOB (T_ID VARCHAR2 (5) NOT NULL,T_IMAGE BLOB NOT NULL);

　　表已建立。

　　SQL> CREATE OR REPLACE DIRECTORY IMAGES AS 'C:Oracle'; --圖片目錄

　　目錄已建立。

　　SQL> CREATE OR REPLACE PROCEDURE IMG_INSERT (TID VARCHAR2,FILENAME VARCHAR2) AS

　　2 F_LOB BFILE;

　　3 B_LOB BLOB;

　　4 BEGIN

　　5 INSERT INTO IMAGE_LOB (T_ID, T_IMAGE)

　　6 VALUES (TID,EMPTY_BLOB ()) RETURN T_IMAGE INTO B_LOB;

　　7 F_LOB:= BFILENAME ('IMAGES', FILENAME);

　　8 DBMS_LOB.FILEOPEN (F_LOB, DBMS_LOB.FILE_READONLY);

　　9 DBMS_LOB.LOADFROMFILE (B_LOB, F_LOB,

　　10 DBMS_LOB.GETLENGTH (F_LOB));

　　11 DBMS_LOB.FILECLOSE (F_LOB);

　　12 COMMIT;

　　13 END;

　　14 /

　　過程已建立。

　　SQL>-- 示例

　　SQL> EXEC IMG_INSERT('1','f_TEST.jpg');

　　PL/SQL 過程已成功完成。

來自 “ ITPUB部落格 ” ，連結：http://blog.itpub.net/11536986/viewspace-623668/，如需轉載，請註明出處，否則將追究法律責任。