將圖片文件存儲到Oracle的存儲過程

一個存儲圖片文件的過程，任何開發工具都可以通過調用過程把圖片文存儲到數據庫中。

詳細步驟：

Microsoft Windows 2000 [Version 5.00.2195]

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

C:\Documents and Settings\chanet>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 過程已成功完成。