كود عرض الصورة عن طريق مسارها

[r79a]

عرض الصور عن طريق مسارها سيوفر في مساحة القاعدة

جمعت كل الصور في مجلد واحد

و اسميت كل صورة برقم الكود الخاص بها

والمطلوب كتابة كود وظيفته

أخذ رقم الكود من مربع النص

ثم عرض الصورة المناسبة في النموذج

و تخزين مسارها في الجدول

وفي المرفقات القاعدة مع 3 صور كمثال يحتاج التعديل

انتظر المساعدة .. جزاكم الله خيراً

reema.zip

[منتصر الانسي]

تفضلي اختي وادعي لي

كل المطلوب منك هو وضع الصور في مجلد اسمه Photos يوضع مع البرنامج في مكان واحد وتكون الصور امتداد JPG

تحياتي,,,

reema.rar

[r79a]

الله يعطيك العافية و يعطيك كل ما تتمنى

بس مسار الصور مو مسجل في الجدول

وفيه حقل جديد بإسم ModelPhoto فيه قيمة 1 او 0 اتوقع

بس لو شرح بسيط للخطوات اللي عملتها

لأني ضعت .. الاكواد كثيرة وأنا مبتدئة

هذه اكواد مفهومه

Sub hideImageFrame()
    Me![ImageFrame].Visible = False
End Sub

Sub showImageFrame()
    Me![ImageFrame].Visible = True
End Sub

لكن ImageFrame هل هو كائن معين؟ كيف ادرجته في النموذج؟ وهنا

Private Sub Model_Code_AfterUpdate()
    On Error Resume Next
JpgImg
End Sub

Private Sub Form_Current()
JpgImg
End Sub

JpgImg .. صورة نوعها Jpg بس وجودها في الكود ايش يعني؟

وسامحني على الازعاج

تم تعديل أغسطس 26, 2008 بواسطه r79a

[منتصر الانسي]

الجميل في الموضوع ما يحتاج حفظ مسار الصورة المهم انك تحطيها في مجلد اسمه Photos يكون جوار البرنامج اي في نفس المكان

اما الحقل المذكور ماله داعي ويمكن الاستغناء عنه بس جربت به حاجه ونسيت احذفه

[منتصر الانسي]

الشرح ممكن نأجله الان الوقت تاخر واخوك هلكاااااان

[r79a]

انتظر شرحك بكره

احلام سعيده

[naeleno]

ممكن مداخلة

لو اني لا اريد ان تكون صورة ، مثلا ملف PDF فما العمل .. هل اتبع نفس الخطوات وبتغيير الامتداد ام هناك شيء اخر