要插入圖片的表不是固定的，而且是批量插入很多張，還要考慮到因?yàn)閳D片的文件名錯(cuò)誤，修改后要再次插入，此時(shí)應(yīng)避免已經(jīng)插入的重復(fù)執(zhí)行操作， 浪費(fèi)時(shí)間。
目前創(chuàng)新互聯(lián)公司已為上1000家的企業(yè)提供了網(wǎng)站建設(shè)、域名、雅安服務(wù)器托管、網(wǎng)站托管維護(hù)、企業(yè)網(wǎng)站設(shè)計(jì)、北辰網(wǎng)站維護(hù)等服務(wù)，公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略，正道將秉承"和諧、參與、激情"的文化，與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng)，共同發(fā)展。
所以就選擇先用一張臨時(shí)表來(lái)暫時(shí)保存從文件系統(tǒng)讀取的照片，用DBMS_LOB的方法來(lái)處理。
第一步：創(chuàng)建一個(gè)數(shù)據(jù)庫(kù)可以訪問(wèn)的目錄（注意：這個(gè)目錄是數(shù)據(jù)庫(kù)服務(wù)器上的目錄，不是客戶機(jī)上的）
-- Create directory create or replace directory 圖片目錄 as 'E:\照片';
第二步：將圖片文件放入剛建好的目錄下面，不要在新建文件夾，就放在這個(gè)根目錄
第三步：根據(jù)自己的具體需求，編寫(xiě)存儲(chǔ)過(guò)程，在做之前，我也在網(wǎng)上找了很多，但基本都只是大概說(shuō)一下，沒(méi)有找到比較完整的，這里就把自己的項(xiàng)目源碼貼出來(lái)，供大家學(xué)習(xí)交流。
重慶分公司
重慶分公司
CREATE OR REPLACE PROCEDURE PRO_插入圖片(V_表名 IN VARCHAR2) IS
P_FILENAME VARCHAR2(50); --照片名，動(dòng)態(tài)拼接得到
P_證件號(hào)碼 VARCHAR2(50);
P_姓名 VARCHAR2(50);--這個(gè)照片名是通過(guò)姓名+證件號(hào)拼接得到的，因?yàn)榛A(chǔ)測(cè)試數(shù)據(jù)沒(méi)有提供真實(shí)的證件號(hào)碼，就選擇用手機(jī)號(hào)來(lái)代替
P_查詢SQL VARCHAR2(500);
P_更新SQL VARCHAR2(5000);
P_LOB BLOB;
P_FILE BFILE;
TYPE P_REF_CURSOR IS REF CURSOR; --定義動(dòng)態(tài)游標(biāo)變量類型
P_CURSOR P_REF_CURSOR; --定義動(dòng)態(tài)游標(biāo)變量，因?yàn)橐淮我迦肴淼恼掌?，所以選擇用游標(biāo)來(lái)處理
TYPE P_ROW_RECORD IS RECORD(
證件號(hào)碼 VARCHAR2(50),
姓名 VARCHAR2(50));
C_ROW P_ROW_RECORD;
V_ERR VARCHAR2(300);
BEGIN
P_更新SQL := 'update ' || V_表名 || ' set 證件號(hào)碼=手機(jī)號(hào)碼 WHERE 證件號(hào)碼 IS NULL';
--用手機(jī)號(hào)來(lái)代替證件號(hào)碼為空的數(shù)據(jù)
EXECUTE IMMEDIATE P_更新SQL;
COMMIT;
P_查詢SQL := 'SELECT 證件號(hào)碼,姓名 FROM ' || V_表名 ||
' WHERE 證件號(hào)碼 IS NOT NULL and 照片 IS NULL order by 證件號(hào)碼';
OPEN P_CURSOR FOR P_查詢SQL;
LOOP
begin
FETCH P_CURSOR
INTO C_ROW;
EXIT WHEN P_CURSOR%NOTFOUND;
--獲取證件號(hào)碼和姓名，先排除空格等臟數(shù)據(jù)，然后拼接成文件名；
P_證件號(hào)碼 := C_ROW.證件號(hào)碼;
P_姓名 := C_ROW.姓名;
SELECT REPLACE(P_證件號(hào)碼, ' ', '') INTO P_證件號(hào)碼 FROM DUAL;
SELECT substr(P_證件號(hào)碼, 1, 11) INTO P_證件號(hào)碼 FROM DUAL;
SELECT REPLACE(P_姓名, ' ', '') INTO P_姓名 FROM DUAL;
P_FILENAME := P_證件號(hào)碼 || P_姓名 || '.jpg';
SELECT REPLACE(P_FILENAME, ' ', '') INTO P_FILENAME FROM DUAL;
--以下便是插入圖片的核心代碼
INSERT INTO TA_照片總表_TEMP
(證件號(hào)碼, 姓名, 照片)
VALUES
(P_證件號(hào)碼, P_姓名, EMPTY_BLOB()) RETURN 照片 INTO P_LOB;
--獲取指定目錄下的文件
P_FILE := BFILENAME('圖片目錄', P_FILENAME);
--以只讀的方式打開(kāi)文件
DBMS_LOB.FILEOPEN(P_FILE, DBMS_LOB.FILE_READONLY);
--傳遞對(duì)象
DBMS_LOB.LOADFROMFILE(P_LOB, P_FILE, DBMS_LOB.GETLENGTH(P_FILE));
--關(guān)閉原始文件
DBMS_LOB.FILECLOSE(P_FILE);
COMMIT;
--通過(guò)更新語(yǔ)句來(lái)向目標(biāo)表插入圖片
P_更新SQL := 'UPDATE ' || V_表名 ||
' A SET a.照片=(SELECT 照片 FROM TA_照片總表_TEMP b
WHERE A.證件號(hào)碼 = B.證件號(hào)碼 and a.姓名=b.姓名 AND ROWNUM=1)
WHERE EXISTS (SELECT 1 FROM TA_照片總表_TEMP B WHERE A.證件號(hào)碼 = B.證件號(hào)碼 and a.姓名=b.姓名)';
EXECUTE IMMEDIATE P_更新SQL;
COMMIT;
EXCEPTION
--處理異常情況，這個(gè)可以在出現(xiàn)異常時(shí)跳過(guò)異常繼續(xù)跑。正常數(shù)據(jù)依然可以插入，并且記錄異常信息，方便異常處理。這個(gè)是因?yàn)榈谝淮螌?xiě)的過(guò)程一報(bào)錯(cuò)就斷掉了，本來(lái)可以插入的圖片也無(wú)法繼續(xù)，然后就做了這個(gè)優(yōu)化。
WHEN OTHERS THEN
rollback;
V_ERR := SUBSTR(SQLERRM, 1, 150) || '照片名:' || P_FILENAME;
--定義一張異常信息記錄表，是一個(gè)非常好的習(xí)慣
INSERT INTO TA_程序運(yùn)行異常記錄
VALUES
(SQ_異常序列.NEXTVAL, 'PRO_插入圖片', V_ERR, SYSDATE);
COMMIT;
end;
END LOOP;
CLOSE P_CURSOR;
COMMIT;
DELETE TA_照片總表_TEMP;
COMMIT;
END PRO_插入圖片;
總結(jié)
然后測(cè)試、運(yùn)行，基本都沒(méi)問(wèn)題，不過(guò)圖片的大小，很影響實(shí)際插入的時(shí)間，這個(gè)時(shí)間的優(yōu)化目前還沒(méi)有好的對(duì)策。
以上就是本文關(guān)于ORACLE批量導(dǎo)入圖片到BLOB字段代碼示例的全部?jī)?nèi)容，希望對(duì)大家有所幫助。感興趣的朋友可以參閱：oracle 數(shù)據(jù)庫(kù)啟動(dòng)階段分析 、ORACLE SQL語(yǔ)句優(yōu)化技術(shù)要點(diǎn)解析 、oracle中l(wèi)ength、lengthb、substr、substrb函數(shù)用法介紹 等，有什么問(wèn)題可以隨時(shí)留言，小編會(huì)及時(shí)回復(fù)大家的。也希望朋友們對(duì)創(chuàng)新互聯(lián)網(wǎng)站多多支持！
