اضافة صور للنموذج

[khasem]

السلام عليكم اخوتي الكرام :
هل يمكن ظهور الصورة في النموذج بمجرد وضعها في فولد الصور بناء على رقم الطالب ( أي ارتباط الصورة برقم الطالب دون الحاجة الى وضع زر لاستدعائها )
 

صورة .rar

[ابو تراب]

هلا اخي

لسبب ما لم يعمل المثال الذي ارفقت

عملت لك المثال التالي

بالتوفيق

pictures.zip

[khasem]

الاخ الفاضل ابو تراب المحترم 

جزاك الله خير الجزاء وحفظك من كل مكروه 

تم تعديل أبريل 29, 2020 بواسطه khasem

[khasem]

اخي الفاضل أبو تراب 

السلام عليكم  : يوجد عندي حدث سابق في كل من ( في الحالي  ) وكذلك  ( عند عداد الوقت ) وايضا الفاصل الزمني لعداد الوقت  فكيف اضيف  ماعملته لي على برنامجي مع تقديري واحترامي .

 

[ابو تراب]

هلا اخي

ليس لدي فكرة عن التعارض لهذا ممكن احد الاعضاء الكرام يساعد في الحل

[khasem]

ننتظر من الاخوة ان يتكرمو علينا بالحل الامثل مع تقديري واحترامي

تم تعديل أبريل 29, 2020 بواسطه khasem

[أبوبسمله]

5 ساعات مضت, khasem said:

اخي الفاضل أبو تراب 

السلام عليكم  : يوجد عندي حدث سابق في كل من ( في الحالي  ) وكذلك  ( عند عداد الوقت ) وايضا الفاصل الزمني لعداد الوقت  فكيف اضيف  ماعملته لي على برنامجي مع تقديري واحترامي .

 

جزاك الله خيرا اخى واستاذى @ابو تراب

بعد محاولات لفتح مرفقك وساعه يعمل وساعه لا

لايوجد اى احداث فى نموذجك المرفق برجاء اضافه نموذج باحداثه كما لديك حتى نرى ان كان هناك تعارض مع الاحداث ام لا

وقبل الرفع والضغط بالوينرار اعمل له ضغط واصلاح

بالتوفيق اخى

تم تعديل أبريل 29, 2020 بواسطه أحمد الفلاحجى

[khasem]

حبيبي استاذ احمد الفلاحجي 

استاذي الفاضل مشكور جدا على اهتمامك بالموضوع 

ان الملف الموجود في الصفحة هو مجرد مثال 

قمت بنقل الاحداث الى برنامجي الاصلي وحصلت المشكلة  وطلبت حلا للموضوع مع تقديري واحترامي 

تم تعديل أبريل 29, 2020 بواسطه khasem

[أبوبسمله]

بارك الله فيك اخى واحبك الذى احببتنى فيه

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

لكن ع هذا الوضع لا نعلم ما المشكله الفعليه او الاكواد التى تعمل تعارض مع بعضها واليك تجربه قم بها

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

والا ظبط المثال كما برنامجك وارفقه

بالتوفيق اخى

[khasem]

استاذ احمد هل اضع بين الكودين عبارة معينة ام مباشرة اضع الكود الاول وبعده الثاني

وللعلم استاذ  بالنسبة لعداد الوقت عندي تايمر يعمل على 140 بينما كود الاستاذ ابو تراب يعمل على 1000

تم تعديل أبريل 29, 2020 بواسطه khasem

[أبوبسمله]

53 دقائق مضت, khasem said:

استاذ احمد هل اضع بين الكودين عبارة معينة ام مباشرة اضع الكود الاول وبعده الثاني

وللعلم استاذ  بالنسبة لعداد الوقت عندي تايمر يعمل على 140 بينما كود الاستاذ ابو تراب يعمل على 1000

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

نقوم بالتجربه لعدم وجود مرفقات الى ان نصل معك لحل باذن الله

والا سوف تضطر لعمل مثالك كما برنامجك باحداثه

بالتوفيق اخى

[khasem]

 

2 hours ago, أحمد الفلاحجى said:

بارك الله فيك اخى واحبك الذى احببتنى فيه

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

لكن ع هذا الوضع لا نعلم ما المشكله الفعليه او الاكواد التى تعمل تعارض مع بعضها واليك تجربه قم بها

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

والا ظبط المثال كما برنامجك وارفقه

بالتوفيق اخى

استاذ احمد حبيبي 

 مع اي احذث اضع هذا الكود 

Private Sub showPic()
On Error GoTo ErrorHandler
    Me.imgStudent.Picture = CurrentProject.Path & "\pic\" & Me.ID & ".jpg"
    Me.TimerInterval = 0
    Exit Sub
ErrorHandler:
    Me.imgStudent.Picture = ""
    Me.TimerInterval = 1000
End Sub

 

تم تعديل أبريل 29, 2020 بواسطه khasem

[أبوبسمله]

9 دقائق مضت, khasem said:

 

استاذ احمد حبيبي 

 مع اي احذث اضع هذا الكود 

Private Sub showPic()
On Error GoTo ErrorHandler
    Me.imgStudent.Picture = CurrentProject.Path & "\pic\" & Me.ID & ".jpg"
    Me.TimerInterval = 0
    Exit Sub
ErrorHandler:
    Me.imgStudent.Picture = ""
    Me.TimerInterval = 1000
End Sub

 

هذا الكود تضعه كما هو لوحده

انما نقصد كود استدعاء هذا الكود فى الحدثين الحالى وعند عداد الوقت

showPic هذا كود استدعاء الكود وهو اللذى تضعه فى الحدثين قبل اكوادك

[Barna]

أخي @khasem

احذف كود أخي ابا تراب الموجود تحت حدث التايمر showPic  فقط اترك الموجود في حدث الحالي 

[khasem]

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

رحم الله والديك وزادك الله من فائض علمه 

 

 

 

تم تعديل أبريل 29, 2020 بواسطه khasem

[khasem]

8 minutes ago, Barna said:

أخي @khasem

احذف كود أخي ابا تراب الموجود تحت حدث التايمر showPic  فقط اترك الموجود في حدث الحالي 

حبيبي استاذ محمد

تقصد المؤشر احذفه 

[Barna]

نعم

[khasem]

13 minutes ago, Barna said:

نعم

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

تمت العملية 

بارك الله بجهودك استاذي الفاضل

[Barna]

الحمد لله رب العالمين

[أبوبسمله]

36 دقائق مضت, khasem said:

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

رحم الله والديك وزادك الله من فائض علمه 

 

الفضل كله لله ثم لاخواننا واساتذتنا جزاهم الله خيرا

اللهم امين ورحم الله جميع امه سيد الخلق سيدنا محمد صل الله عليه وسلم

واياكم اخى

يارك الله فيكم اخوانى واساتذتى محمد @Barna واخى @ابو تراب وجزاكم الله خيرا

والحمدلله الذى بنعمته تتم الصالحات

[khasem]

20 minutes ago, Barna said:

الحمد لله رب العالمين

استاذ محمد 

كيف تظهر  الصورة في التقرير لنفس الطالب

[Barna]

2 ساعات مضت, khasem said:

استاذ محمد 

كيف تظهر  الصورة في التقرير لنفس الطالب

طيب أخي الكريم :

أولا :

لايجب أن تربط الصور برقم تلقائي ... لأنك لو حذفت اسم من السجلات الموجودة وسويت ضغط واصلاح للقاعدة سوف تفقد كل ارتباطات الصور 

لذلك الصحيح ربط الصور برقم فريد ( رقم هوية - رقم جواز - ...... الخ )

ثانيا :

قمت بحذف الكود الموجود لربط الصور الموجود وفقط وضعت هذا الكود في مصدر مربع النص الخاص بالصورة في النموذج والتقرير

=[CURRENTPROJECT].[PATH] & "\pic\" & [ID] & ".jpg"

انظر للمرفق .... ووافيني بالنتيجة !!!!!!

 

SA.rar

[khasem]

 

6 minutes ago, Barna said:

طيب أخي الكريم :

أولا :

لايجب أن تربط الصور برقم تلقائي ... لأنك لو حذفت اسم من السجلات الموجودة وسويت ضغط واصلاح للقاعدة سوف تفقد كل ارتباطات الصور 

لذلك الصحيح ربط الصور برقم فريد ( رقم هوية - رقم جواز - ...... الخ )

ثانيا :

قمت بحذف الكود الموجود لربط الصور الموجود وفقط وضعت هذا الكود في مصدر مربع النص الخاص بالصورة في النموذج والتقرير

=[CURRENTPROJECT].[PATH] & "\pic\" & [ID] & ".jpg"

انظر للمرفق .... ووافيني بالنتيجة !!!!!!

 

SA.rar 241.02 kB · 1 download

ممنون منك اخي محمد البرناوي

جزاك الله خير الجزاء ورحم الله والديك 

[Barna]

وايضا .... نسيت اقولك ابتعد عن الكلمات المحجوزة مثل ID وغير الكثير

حياك الله ..... بالتوفيق

[khasem]

22 minutes ago, Barna said:

وايضا .... نسيت اقولك ابتعد عن الكلمات المحجوزة مثل ID وغير الكثير

حياك الله ..... بالتوفيق

لم افهم استاذ ما معنى الابتعاد 

انسان متفضل علي بعد الله واتشكر منه