通过调用过程把图片文存储到数据

测试环境: Win2000 + Oracle92
　　 一个存储图片文件的过程，任何开发工具都可以通过调用过程把图片文存储到数据库中。
　　详细步骤：
　　
　　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 过程已成功完成。

 

注意：1.IMAGES 所指向的目录必须是与数据库所在的服务器

          2.BFILENAME ('IMAGES', FILENAME);其中“IMAGES”必须是大写