إذا سمحتم ياجماعة الخير حد منكم يتفضل ويتكرم ويشرح لي الكود هذا هو مشاركة من احد الاخوان الي في المنتدى بس لما اعمل رن بتظهر رقم المسج 40105

Declare
Pic_Name      
Varchar2(1000);
Begin
Pic_Name:=Get_File_Name('d:\ex_6i\image',Null,'ALLFILES','IMAGEFILE',Open_File,True);  

Read_Image_File(Pic_Name,'save_foto','foto');
If Not Form_Success Then  
      :System.Message_Level:=25;                        
  Message('Image Not Loaded . . . .');
:System.Message_Level:=0;      
End If;
End;

السلام عليكم
بصفة عامة يقوم هذا الكود باستدعاء صورة من مسار معين ووضعها فى متغير Pic_Name
وفى حالة عدم الحصول عليها يقوم باعطاء رسالة تنبيه بان الصورة غير موجودة
معكم ولكم نتواصل