如何在oracle数据库上自动存储图像？

-- 创建存储图像的表
CREATE TABLE images (
    image_id NUMBER PRIMARY KEY,
    image_name VARCHAR2(100),
    image_type VARCHAR2(50),
    image_data BLOB
);

-- 创建存储图像的存储过程
CREATE OR REPLACE PROCEDURE insert_image (
    p_image_id NUMBER,
    p_image_name VARCHAR2,
    p_image_type VARCHAR2,
    p_file_path VARCHAR2
) AS
    l_bfile BFILE;
    l_blob BLOB;
BEGIN
    -- 将图像文件读取为BFILE
    l_bfile := BFILENAME('DIRECTORY', p_file_path);
    
    -- 打开BFILE
    DBMS_LOB.OPEN(l_bfile, DBMS_LOB.LOB_READONLY);
    
    -- 创建空的BLOB
    DBMS_LOB.CREATETEMPORARY(l_blob, TRUE);
    
    -- 将BFILE的内容复制到BLOB中
    DBMS_LOB.LOADCLOBFROMFILE(l_blob, l_bfile, DBMS_LOB.LOBMAXSIZE);
    
    -- 插入图像数据到数据库表中
    INSERT INTO images (image_id, image_name, image_type, image_data)
    VALUES (p_image_id, p_image_name, p_image_type, l_blob);
    
    -- 关闭BFILE和BLOB
    DBMS_LOB.CLOSE(l_bfile);
    DBMS_LOB.FREETEMPORARY(l_blob);
END;