kaser906

وعليكم السلام حياك اللله استاذي فعلا يوجد افرق في سرعة فتح التقرير يعطيك الف عافية

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

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

لا هذي ما بعد نوصلها 😎 ::بالتوفيق::

انظر الصورة الاولى الفرز بالتاريخ فقط الفرز بالرقم والتاريخ ::بالتوفيق::

يبدو انك لاتريد مساعدة نفسك ومساعدة من يريد المساعده 😁 عموما بعد اخذ ورد برنامجك والبحث عن المطلوب تفضل انظر النتيجة ::بالتوفيق:: Kaser9068888.rar

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

الحمد لله ::بالتوفيق::

الظاهر ليس لديك صلاحية مسؤول على النظام

سطب البرنامج بصلاحيات مسؤول كلك يمين على الحزمة تشغيل كمسؤول

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

وعليكم السلام ورحمة الله تفضل Private Sub تفصيل_Print(Cancel As Integer, PrintCount As Integer) Me.T21 = DCount("[العمر]", "[العمر]", "[العمر]between 0 AND 14 and[الجنس]= 'ذكر'") Me.T22 = DCount("[العمر]", "[العمر]", "[العمر]between 15 AND 20 and[الجنس]='ذكر'") Me.T23 = DCount("[العمر]", "[العمر]", "[العمر]between 21 AND 30 and[الجنس]='ذكر'") Me.T24 = DCount("[العمر]", "[العمر]", "[العمر]between 31 AND 40 and[الجنس]='ذكر'") Me.T25 = DCount("[العمر]", "[العمر]", "[العمر]>=41 and[الجنس]='ذكر'") Me.T27 = DCount("[العمر]", "[العمر]", "[العمر]between 0 AND 14 and[الجنس]='أنثى'") Me.T28 = DCount("[العمر]", "[العمر]", "[العمر]between 15 AND 20 and[الجنس]='أنثى'") Me.T29 = DCount("[العمر]", "[العمر]", "[العمر]between 21 AND 30 and[الجنس]='أنثى'") Me.T30 = DCount("[العمر]", "[العمر]", "[العمر]between 31 AND 40 and[الجنس]='أنثى'") Me.T31 = DCount("[العمر]", "[العمر]", "[العمر]>=41 and[الجنس]='أنثى'") Me.T51 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='حركي' and[الجنس]='ذكر'") Me.T52 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='ذهني' and[الجنس]='ذكر'") Me.T53 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='سمعي' and[الجنس]='ذكر'") Me.T54 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='بصري' and[الجنس]='ذكر'") Me.T55 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='متعدد الإعاقة' and[الجنس]='ذكر'") Me.T58 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='حركي' and[الجنس]='أنثى'") Me.T59 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='ذهني' and[الجنس]='أنثى'") Me.T60 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='سمعي' and[الجنس]='أنثى'") Me.T61 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='بصري' and[الجنس]='أنثى'") Me.T62 = DCount("[طبيعة الإعاقة]", "[العمر]", "[طبيعة الإعاقة]='متعدد الإعاقة' and[الجنس]='أنثى'") End Sub ::بالتوفيق:: Handicapées Nationa-kaser906l.rar

تفضل ::بالتوفيق:: studbex_kaser906.accdb

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

تمت التجربة ويعمل بشكل ممتاز

الله يعطيك العافية استاذ جعفر استخدمت النسخه الأولى وفادتني كثير في اصلاح العديد من الاخطاء وهناك طلب ان امكن انا استخدم باسورد لقاعدة البيانات الواجهة وأعاني من تكرار ادخال كلمة المرور في كل مره يتم فيها فتح القاعدة لو بالامكان ادخال كلمة السر مره واحده سيكون الأمر اسهل غدا سأجرب هذه النسخه

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

ضع مرفق وضع شرح مصور وبإذن لله الاعضاء لن يقصروا في افادتك ::بالتوفيق::

وعليكم السلام راجع هذا الرابط لعل الفكرة تكون قريبه

ابا جودى @ نبارك لكم الترقية ومنها للأعلى إن شاء الله

@ essam rabea نبارك لكم الترقية ومنها للأعلى إن شاء الله

يعطيك الصحه والعافية

سؤالك مبهم اشرح اكثر وضع مثال للتعديل عليه ::بالتوفيق::

الله يعطيك العافية اخي ابو ياسين ليت الأمر كان كما تصورته لهان منذ البداية الذي اقصده استخراج التواريخ المذكورة بناء على التاريخ الممرر لها من حقل EndDate وهو تاريخ ممرر حسب تقويم أم القرى مثلا انقر نقرا مزدوج في حقل EndDate وانظر الى التقويم لشهر شعبان ستجد انه 30 يوم اما التاريخ الهجري 29 يوم وهنا تكمن المشكلة في اظهار نتيجة بداية الاسبوع بين ام القرى والهجري علما ان المرفق الذي وضعته يعطي نتائج خاطئة سواء للتاريخ الميلادي او الهجري لاحظت ان بدايات الاسابيع ونهايتها خطأ بالمرفق التالي قمت بعدة محاولات وتمكنت من خلالها من اظهار نتائج صحيحة بالتاريخ الميلادي او الهجري وام القرى بتمرير دالة تاريخ أم القرى بعد ان قمت بمراجعة البرنامج الاساس للاستاذ ابو هادي وقراءة الوحدات النمطية والدالات جرب ادخل اي تاريخ بين شهر رجب 1440 و شهرشعبان وشهر رمضان 1440 وستجد الفروقات واضحة اما الشهور الاخرى والتي يكون فيها عدد الايام متساوي تكون متطابقة وهذا المرفق اضعه لعل من احد يستفيد منه شكر لك مد يد العون finel‏‏UMfirestWeekandlastweek.rar

رفع