ال .. BLOB يا اخوان .. وتشغيلها وش السالفه ؟

.......

مثال :

create table demo(photo_id number,photo blob)

create sequence blob_seq

create or replace procedure load_file(p_dir_name varchar2,p_file_name varchar2)
is
  v_blob blob;
  v_bfile bfile;
begin
/* First we must create a LOB in the database. 
   We need an empty BLOB created via the CREATE TEMPORARY API call to load into. */
   insert into demo values (blob_seq.nextval,empty_blob())
   returning photo into v_blob;
/* Next, we open the BFILE we will load it */
   v_bfile:=bfilename(p_dir_name,p_file_name);
   dbms_lob.fileopen(v_bfile);
-- load the opened file into the created empty BLOB
   dbms_lob.loadfromfile(v_blob,v_bfile,dbms_lob.getlength(v_bfile));
-- close the file
   dbms_lob.fileclose(v_bfile);
end;	  



create or replace procedure load_emp_photo(p_dir varchar2)
is
  v_blob blob;
  v_bfile bfile;
  cursor cur is select empno from emps;
begin
  for rec in cur loop
	v_bfile:=bfilename(p_dir,rec.empno||'.jpg');
	if dbms_lob.fileexists(v_bfile) = 1 then
	  update emps 
	  set photo = empty_blob() 
	  where empno=rec.empno
	  returning photo into v_blob;
	  dbms_lob.fileopen(v_bfile);
	  dbms_lob.loadfromfile(v_blob,v_bfile,dbms_lob.getlength(v_bfile));
	  dbms_lob.fileclose(v_bfile);
	end if;
  end loop;
  commit;
end;

الله يعطيك العافيه informat دائما متميز ومتمكن بخبرتك .. تسلم والف الف شكر لك .

السلام عليكم

الاستاذ مشرف القسم شكرا لاهتمامك فى هذا الموضوع الذى دائما ما يسئل عنه من قبل الاعضاء لذا نرجوا منك ان تكمل جميلك وترفق مثال جاهز على فورم فهو لن يستغرق منك الكثير من الوقت ولكنه سيفيد العشرات من الناس نرجوا ان تهتم بهذا الامر كثير اخى الفاضل

وشكرا

ميجا