1、SQL*Plus中 SQL> create table t_photo1(photo1 long raw); SQL> create table t_photo2(photo2 long raw); 2、硬碟上c:/下有一個圖象檔案tmp.bmp 3、開啟FORM 建立兩個塊：t_photo1、t_photo2 t_photo1塊是資料庫塊，串連的表是資料庫中的一個表t_photo1 t_photo2塊也是資料庫塊，串連的表是資料庫中的另一個表t_photo2（備份表） t_photo1塊上建立一個圖象項，名為photo1，對應的是即表t_photo1中的photo1列 t_photo2塊上也建立一個圖象項，名為photo2，對應的是即表t_photo2中的photo2列 建立一按鈕1，輸入以下程式，這個按鈕實現讀入圖象到表裡，即錄入圖象到表裡 BEGIN GO_BLOCK('t_photo1');--到塊1 READ_IMAGE_FILE('c:/tmp.bmp','bmp','t_photo1.photo1'); --讀入外部圖象檔案tmp.bmp（圖象類型為BMP）到t_photo1塊的photo1項，也就是到了t_photo1表裡 COMMIT;--存檔 END; 建立一按鈕2，輸入以下程式，這個按鈕實現圖象的倒表（t_photo1到t_photo2） BEGIN GO_BLOCK('t_photo1');--到塊1 execute_query; --查詢出表中的圖象，這時，表中的圖象到了FORM中的圖象項上 WRITE_IMAGE_FILE('c:/tmp.bmp','bmp','t_photo1.photo1'); --把圖象項中圖象寫入外部圖象檔案tmp.bmp GO_BLOCK('t_photo2');--到塊2 READ_IMAGE_FILE('c:/tmp.bmp','bmp','t_photo2.photo2'); --把外部圖象檔案tmp.bmp讀入到t_photo2塊的photo2項，也就是到了t_photo2表裡 COMMIT;--存檔 END; 注釋：t_photo1.photo1是正式圖片表中的圖象項（資料庫項）（t_photo1塊photo項1） t_photo2.photo2是備份圖片表中的圖象項（資料庫項）（t_photo2塊photo項2）
另附：一個有“開啟”對話方塊的儲存圖象到資料庫的按鈕例子
declare str_filename varchar2(200); str_filetype varchar2(3);beginstr_filename:=get_file_name('c:/','圖形檔案','BMP_FILE(*.bmp)|*.bmp|'||'JPG_FILE(*.jpg)|*.jpg|'||'GIF_FILE(*.gif)|*.gif|'||'TIF_FILE(*.tif)|*.tif|','請選擇要存入資料庫的圖形檔案：',OPEN_FILE,TRUE); str_filetype:=substr(str_filename,length(str_filename)-2,3); go_block('PHOTO_TEST'); execute_query; last_record; --移動到最後一條記錄 next_record; --移動到下一條記錄，即一條新記錄上 read_image_file(str_filename,str_filetype,'PHOTO_TEST.PHOTO'); if str_filename is not null then commit; end if;end;註：PHOTO_TEST為資料區塊，PHOTO_TEST.PHOTO為資料區塊中對應資料庫中lang raw欄位的資料項目。
