طاهر اوفيسنا

يعني انك حذفت الجملة في مربع نص a1

لا تفير في المرفق استاذ بقيت نفس المشكلة

شكرا استاد قسيم على المساعدة بقي مشكل عدم ظهور بطاقة التعريف الوطنية كما في الصورة بالرغم اني زدت في الدالة ولكن بقت المشكلة TempVars("Reporte_Title") = Reporte_Title.Value

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

اوفغت كود الخروج 'DoCmd.Close acForm, "A2" لا لم ينفع معي اريد غلق الفورم a2 عند الدخول على التقرير Face4 كيف لي ان اعدل في الكود Private Sub أمر15_Click() Dim Cr As String Cr = DLookup("Hamech", "Tbl_ZAWJA", "IDM =" & Me.IDM) If Cr = 1 Or Cr = 2 Or Cr = 3 Then stDocName = "FACE4" DoCmd.OpenReport stDocName, acPreview Abou_Taha (stDocName) 'DoCmd.Close acForm, "A2" Else MsgBox "هذه الزوجة متوفيه" DoCmd.Close acForm, "A2" End If End Sub

هل من ايجاد حل لقد وجدت شبه حل وهو عند الدخول على التقرير لا نغلق الفورم A2

اليكم المرفق مدعم بالصور التوضيحية 20231002.accdb

السلام عليكم اساتذتي الكرام لدي مشكلة ظهور رموز الخطأ عند طباعة التقرير علما ان النتائج ناتجة من فورم اخر a2 وبه مربعات نص n1/n2/n3/n4 كما في الصورة ارجو المساعدة اساتذي الكرام

تمت العملية بنجاح شكرا لك استاذ Eng.Qassim ربي يجعل تعبك معي في ميزان حسناتك ببركة الايام العشرة الاخيرة من الشهر الفضيل

لم يتم فتح الملف المرفق بعد تغديله من طرفك اخي Eng.Qassim علما انني استخدم اكسس 2007

لم افهم شيء مما تطرقت اليه اخي Ezril ارجو ان يكون التعديل على المرفق حتى يتسنى لي معرفة الخطأ

اخي اليك الملف للتعديل عليه وشكرا ff2023.accdb

اخي لا اريد سجل جديد بل التعديل في السجل الموجود

النموذج الاول الرئيسي اسمه FrmMenah والنموذج الفرعي التابع له هو FrmInkhirat_sub الذي به VerCcp وLoan_Other و Auto_Date والنموذج المراد التحويل له اسمه frmVerment والنموذج الفرعي التابع له هو FrmVerment_Sub وبه TheValueCcp و TxtMonth

شكرا على الرد اخي Eng.Qassim تقبل الله منا ومنكم صالح الاعمال لقد وقع لي هذا المشكل

السلام عليكم اخواني تقبل الله صيامكم المطلوب التعديل على الحدث Private Sub VerCcp_Click() If Me.VerCcp.Value = 0 Then DoCmd.OpenForm "FrmVerment" Me.Loan_Other = Me.Form.FrmVerment!FrmVerment_sub!Me.TheValueCcp Me.Auto_Date = Me.Form.FrmVerment!FrmVerment_sub!TxtMonth End If End Sub حيث عند النقر على خانة VerCcp يتحول المبلغ الموجود في Loan_Other مباشرة الى الجدول Verment في TheValueCcp (مع العلم انه عند وجود مبلغ يضاف اليه المبلغ المتحول) مع تحويل التاريخ : Auto_Date بالفورم الى جدول Verment في مكان TxtMonth وشكرا لكم

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

هل من فكرة حول ظهور الحقل المحسوب

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

السلام عليكم اساتذة حاولت انشاء حقل محسوب في حداول اكسس 2010 فلم اجده فكيف يمكن اضافته على النسحة التي بحوزتي

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

أعجز المختصون في الاكسس على معالجة طلبي

ارجو منكم معالجة بطء تشغيل التقرير