[ تمت الإجابة ]عند أضافة الصورة للتقرير يظهر خطأ

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

تفضل أخي الملف بعد التعديل عليه قم بفك الضغط عنه وضعه في السي وجرب ..

آمل أن أكون وفقت لما تريده .

Photo2005.rar

أخي الغالي

Rayan

الحل بسيط

قم بعمل تقرير جديد لعرض بيانات الموطفين بدون صور

ثم قم بكتابة جملة IF

اذا كان هناك صورة للموظف قم بعرض التقرير الاول

واذا لم يكن اعرض التقرير الثاني

وهذا هو الكود الخاص بالعملية

Private Sub ViewOne_Click()
If IsNull(ImagePath) Then
strReportName = "rptImage2"
		strCriteria = "[ImageID]= " & Me![ImageID]
		DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
Else
strReportName = "rptImage"
		strCriteria = "[ImageID]= " & Me![ImageID]
		DoCmd.OpenReport strReportName, acViewPreview, , strCriteria
End If
End Sub

مرفق ملفك بعد اجراء التعديلات اللازمة علية

Photo2005_up.rar

أخـي العـزيز أبـو رهــف جـربت البـرنـامج بعـد التعـديل قمــت بفـكـ الضغـطـ ونسخـه علــى الــ C ولكــن المشكــله لا تــزال حيــث عنـد أدخـال بيـانات من دون أدخـال الصـورة يظهـر خطـأ .

يعطيــكـ العـافيــه وأشكـركـ أخـي الكــريم ،،،

-------------------

أخــي العــزيز محمـد فـؤاد

فكــرة جميــله لـم تطـرأ علـى بـالي لكــن يـوجـد مـلاحظتيــن

الأولـى : عنــد الضغـط علــى الأيقـونه سجـل جـديد ثـم عمـل معـاينـه مبـاشـرة دون أدخـال أي بيـانات فـي الحقــول يظهــر خطـأ

الثـانيـه : عنــد الضغـط علــى الأيقـونه سجـل جـديد وأدخـال بيـانات في الحقــليـن دون أدخـال الصــورة وعمـل معــاينــه يظهـر التقــرير بــدون بيــانات

ولا تظهــر البيــانات الا عــند الــذهـاب للسجــل الــسابق ثــم الــرجــوع للحــالي وعمـل المعـاينــه .

أشكــركـ أخـي الكــريم واللــه يعطــيكـ العــافيـه

أخي الغالي Rayan

وجدت لك ضمن مكتبتي المفضلة مثال آخر مشابة لمثالك ايضا من ابداع المشرفة الغالية زهرة وقد عدلت علية لما يتوافق مع متطلباتك

ان شاء الله يفي بالغرض ويكون المطلوب

Coding_Error.rar

أخي الكريم Rayan

المثال يعمل بالشكل الصحيح ولكن يجب أن تفك المجلد كاملاً بالسي وليس القاعدة فقط لاحظ :

وهذا المثال بعد التعديل عليه

Photo2005.rar

الأخ محمــد فـؤاد اللــه يعطيــكـ العــافيــه بالفعــل تــم حــل المشــاكل المــوجــوده بــواسطــه المثــال المــرفق شـاكـرومقــدر لكـ جهــودكـ

الأخ أبــو رهـف بالفعــل جــربت الطــريقــه كمـا فـي الشــرح وكـان البـرنامج علــى أحــسن ما يــرام أشكـركـ علـى الشــرح الـميســر والمتــابعـه واللــه يعطيــكـ العـافيه .

المثــاليــن بطــريقتيـن مختــلفه وجميعهــا شغــاله 100%

تحيــاتي لكــم ،،،

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة