كود عرض الصورة

أخذت هذا الكود من أحد الواقع مو عارفة ممكن الموقع هذا ولا بعمل ما ادري ماالسبب

لازم تعمل directory

CODE
CREATE OR REPLACE DIRECTORY LOGSS AS 'c:\logss'

هذا هو الامتداد للصور الي موجوده عندك عالهارد دسك
CODE
create or replace procedure load_emp_bfile
(p_file_loc in varchar2) is
v_file bfile;
v_filename varchar2(16);
cursor emp_cursor is
select ename from emp
--WHERE ENAME ='SMITH'
for update;
begin
for emp_record in emp_cursor loop
v_filename:=emp_record.ename||'.bmp';
v_file:=bfilename(p_file_loc,v_filename);
IF DBMS_LOB.FILEEXISTS(V_FILE)=1 THEN
dbms_lob.fileopen(v_file);
update emp set vidio =v_file
where current of emp_cursor;
dbms_output.put_line('load file '||v_filename
||' size '||dbms_lob.getlength(v_file));
dbms_lob.fileclose(v_file);
ELSE
dbms_output.put_line('CONNT load file '||v_filename);
END IF;
end loop;
end load_emp_bfile;

EXECUTE LOAD_EMP_BFILE('LOGSS');


هذا الجراء سيقوم على تحميل صور الموظفين ولكن كل من الاسماء له صورة باسمه بالإمتداد BMP
للإستفسار