السلام عليكم عندى مشكلة بخصوص قراءة الصورة من على الهارد ديسك استخدمت built in procedure READ_IMAGE_FILE

واديته الامتداد صحيح لانى اخدته كوبى باست وبعدين الامتداد بتاع الصورة وبعدين اسم image_item اللى هتظهر عليها الصورة

وعملت كونكات مع employee_id وغيرت اسماء الصور عندى بارقام الموظفين بس بتظهرلى الرسالة frm_47109

بالاضافة الى مشكلة اخرى ايضا متعلقة بالمسار وهى استدعاء فورم اخرى بيظهرلى رسالة خطا ايضا

شكرا

كمان شوفت ال help بيقول راجع المسار وشوف الصورة موجودة ولا لا وعملت كده وكله تمام

السلام عليكم ورحمة الله وبركاته

 

اخي العزيز يوجد في المرفقات فورم مستخدم فيه طريقة استدعاء الصور

 

ويوجد ايضا انشاء جدول لهذا الفورم وهذه صورة عن الفورم

 

 

 

 

Pic.rar

عندك فى البارامتر اللى حضرتك عامله بيقرا الصورة من المسار على انه اسمها
employees.employee_id.jpg
فى حين انه حضرتك عايز تخلى الصورة برقم الموظف
شيل السينجل كوتيشن من على رقم الموظف فى الكود

read_image_file('D:\'||employees.employee_id||'.jpg','any','employees.emp_photo'); 

الكود يبقى كده

تم تعديل 24 ديسمبر 201312 سنة بواسطة ميسم الكرام

declare
  V_FileName varchar2(200) := null;
begin
    if :system.mode <> 'ENTER-QUERY' then
        V_FileName := Get_File_Name('C:\pic','','All Files (*.*)|*.*|',Open_File);
        if V_FileName is not null then
         Read_Image_File(V_FileName, 'any', 'PAT_FILE1.pic');
        end if;  
    end if;    
end;

السلام عليكم استاذ موسى معلش فى حاجات مش واضحة فى الكود

انا فهمت ان get_file_name بروسيدر بس مش فاهم البارمترز بتاعته دى اول نقطة

ثانيا read_image_file اخر بارمتر ده ايه pat_file.pic ده المكان اللى

هترجع فيه الصورة اسم الايتم يعنى ولا ده اسم الصورة بالامتداد

الاجزاء البارزة هى اللى مش مفهومة

الف شكر لحضرتك

تم تعديل 24 ديسمبر 201312 سنة بواسطة ميسم الكرام

استاذ احمد لما بشيل السنجل كوتيشن بيرجع ايرور

شكرا لحضرتك

بيطلع ايرور فين عند التريجر ولا عند تشغيل الفورمة

لما بعمل combile trigger

declare
  V_FileName varchar2(200) := null;
begin
    if :system.mode <> 'ENTER-QUERY' then
        V_FileName := Get_File_Name('C:\pic','','All Files (*.*)|*.*|',Open_File);
        if V_FileName is not null then
         Read_Image_File(V_FileName, 'any', 'PAT_FILE1.pic');
        end if;  
    end if;    
end;

السلام عليكم استاذ موسى معلش فى حاجات مش واضحة فى الكود

انا فهمت ان get_file_name بروسيدر بس مش فاهم البارمترز بتاعته دى اول نقطة

ثانيا read_image_file اخر بارمتر ده ايه pat_file.pic ده المكان اللى

هترجع فيه الصورة اسم الايتم يعنى ولا ده اسم الصورة بالامتداد

الاجزاء البارزة هى اللى مش مفهومة

الف شكر لحضرتك

 

 

get_file_name  جاهزة من اوراكل لاستدعاء ملفات مثل الصور

 

 V_FileName  تحديد مكان تخزين ملف الصور على الجهاز

 

PAT_FILE1  اسم البلوك الموجود عليه الصور

 

PIC اسم الحقل الموجد عليه الصورة

تم تعديل 24 ديسمبر 201312 سنة بواسطة miash80

انا اسف يا استاذ حسين ممكن الكود بيتكتب كده

read_image_file('e:\'||:employees.employee_id||'.jpg','any','employees.emp_photo');

يعنى حط نقطتين فوق بعض عند ال employees.employee_id

اخي الفاضل حسين انا مش فاهم 

 

هو الكود ما اشتغل ...؟

 

ولا انتا مش فاهم الكود  ...؟

انا خدت الكود اللى حضرتك بعته وحاولت اعدل فيه بس اتلخبطت فسالت حضرتك على البارمترز بتاعت البروسيدر وهجربه ان شاء الله وارد على حضرتك

بانتظارك اخي العزيز

السلام عليكم استاذ موسى انا جربت الكود ده واشتغل الحمدلله بس فى حاجة غريبة حصلت انا غيرت الاسم الخاص بخمس صور منهم صورة واخدها بالتليفون

والباقى الصور الخاصة بالويندوز صور الويندوز اشتغلت تمام الحمدلله بس الصورة التانية لم تعمل مع انهم نفس الصيغة jpg

والف شكر ياباشا تعبتك معايا

DECLARE
image_path varchar2(200):='C:\images\';
photo_name varchar2(100);
BEGIN
 :system.message_level:='25';
 photo_name:= image_path||:employees.employee_id||'.jpg';
 READ_IMAGE_FILE (photo_name,'jpeg','EMPLOYEES.emp');
 if not FORM_SUCCESS then
     message('this employee not have photo');
     message('this employee not have photo');
     end if;
END;

تم تعديل 29 ديسمبر 201312 سنة بواسطة Ahmad.Hasan