طاهر اوفيسنا

هل من فكرة حول عدم وجود حقل محسوب في نوع البيانات بأكسس 2010 ؟

انا استعمل اكسس 2010 وبدون حقل محسوب في نوع البيانات مالمشكلة ياترى ؟ علما انه يظهر في اي مثال معمول مثل المرفق الذي تكرمت به استاذ حالد سيسكو

وهو كذالك شكرا لك استاذ صالح

شكرا لك استاذ الطلب الثاني لم تقم بالتعديل عليه اي عند التقرير الفارغ يظهر الميساج كما بالصورة

الملف به مشكلة "عدم ظهور الصفحات الاخرى" ماعدا الصفحة الاولى فقط هذا من جهة ومن جهة اخرى عمل مشكل عندما يصبح التقرير فارغ ارجو التعديل عن كلتى المشكلتين Discount.rar

ونسيت هذا في ٢٩‏/١٠‏/٢٠١٨ at 22:19, AlwaZeeR said: من البداية التقرير Q1 داحل التقرير الفرعي Rep1

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

هل لي ان ارى كيف تم تجميع EmployeeID داخل التقرير

شكرا لك اخي الوزير هل لي ان ارى كيف تم تجميع EmployeeID داخل التقرير

للرفع

اساتذتي الكرام هل المطلب غير مفهوم ام لا يوجد حل لذالك ؟

السلام عليكم احي عبد القدوس48 هل لنا رؤية ماصنعت ضمن برنامج الرواتب اعتقد انه برنامج راتب ادارة جزائرية

السلام عليكم اساتذة ممكن مساعدة بخصوص عدم ظهور الصفحة الغارعة و الصورة تبين المطلوب ملاحظة : للعلم انه تقرير داخل تقرير قيد العمل.rar

للرفع

للرفع والصورة تبين المطلوب ملاحظة : للعلم انه تقرير داخل تقرير

للرفع

هل بإمكان عدم ظهور الصفحات الفارغة في التقرير Rep1 قيد العمل.rar

غيرت استاذ وضبطت معي ولكن حبيت نعرف مالسر ؟

ليس في هذا التقرير استاذ بل في تقرير أخر وخاصة عند الخط العربي Sultan medium وبالتحديد عند بعض الارقام

لماذا عندما يحفظ التقرير بصغة pdf تتحول بعض الخطوط الى مربعات ؟

انظر هذا العمل لأحد الاساتذة ربما تجد فيه ضالتك اقساط 2018.rar

لقد تم التعديل على الكود استاذ جعفر عيدك سعيد وكل عام وانت وجميع الاهل بالف خير يارب للاستفادة ... Option Compare Database Dim rst As DAO.Recordset Dim MonthN1 As String Function Get_Dates(id) mySQL = "Select * From tbl_Loans" mySQL = mySQL & " Where [EmployeeID]=" & id mySQL = mySQL & " And Year([Payment_Month])= " & [Forms]![FrmOtherDiscountReport]![txtYear] mySQL = mySQL & " Order by Payment_Month" Set rst = CurrentDb.OpenRecordset(mySQL) rst.MoveLast: rst.MoveFirst rc = rst.RecordCount MonthN1 = "" Remk = "" For I = 1 To rc Remk = Left$(rst!Remarks, 22) MonthN1 = MonthN1 & Month(Format(rst!Payment_Month, "m/yyyy")) rst.MoveNext If I = rc Then Exit For MonthN1 = MonthN1 & " و" Next I Get_Dates = Remk & " شهر " & MonthN1 & " / " & [Forms]![FrmOtherDiscountReport]![txtYear] End Function

عمل ممتاز استاذ أ / محمد صالح

ادخل على هذا الرابط ستجد فيه ضالتك https://www.officena.net/ib/topic/37822-تمت-الاجابةعمل-نسخه-احتياطية/

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