نموذج احترافى لفلترة وإظهار التقارير و طباعتها - أطلب التعديل به

[أحمد العيسى]

السلام عليكم

قبل التعديل فى قاعدة البيانات الخاصة بى والتى تحتوى على صف دراسى واحد  لم تقابلنى أى مشكلة

وذلك باستخدام نموذج إظهار التقارير ( الذى اقتبسته من أحد الزملاء ) بناءاً على فلترة معينة "وهى كلمة تقرير "

لكن بعد إضافة صف دراسى آخر أو أكثر ووضع كلمة "تقرير2 " فى بدء تسمية تقارير الصف الثانى ، ظهرت المشكلة

كما هو واضح فى الصور التالية ، وقد أرفقت مثال لقاعدة البيانات كما نصحنى الأخ الفاضل أبو خليل

 

db1.rar

SELECT DISTINCTROW Mid([Name],7) AS Expr1, MSysObjects.Type FROM MSysObjects WHERE (((MSysObjects.Type)=-32764 Or (MSysObjects.Type)=-32768) AND ((MSysObjects.Name) Like "تقرير*")) ORDER BY MSysObjects.Name; 

وما  المقود بهذه الأرقام    -32764       -32768

تم تعديل أغسطس 3 بواسطه أحمد العيسى

[ابوخليل]

عليكم السلام

اخي العزيز انت تتعامل مع جدول النظام

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

1- الاكتفاء بجدول واحد لجميع الطلاب .. فقط يتم اضافة حقل الصف من اجل التصفية 

2- ستكون النتيجة تقرير واحد للجميع حسب المادة . اقصد ان جميع التقارير الأربعة سوف تختزلها في تقرير واحد

فقط ستحتاج في النموذج الى مربعي تحرير للتصفية من خلالهما : الصف / المادة

اذا ترغب في ان اعدل لك مثالك وفقا لهذه الطريقة فاخبرني

[أحمد العيسى]

6 ساعات مضت, ابوخليل said:

اذا ترغب في ان اعدل لك مثالك وفقا لهذه الطريقة فاخبرني

كل أفكارك موضع اهتمام وترحيب  ..

تطبيقى الحالى يحتوى على ثلاث جداول غير مرتبطة ، جدول لكل صف ..

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

عموماً  كنت أريد معرفة ما هو جدول النظام هذا  الذى أشرت إليه  ؟ ، وما المقصود بتلك الأرقام المذكورة بكود التصفية ؟

كما ذكرت _ أنا _ نموذج أكواد التصفية تم استعارته من تطبيق زميل فاضل ، لكن لا مانع من رؤية مثالك على هذا مع الشكر مقدماً

[ابوخليل]

اخي احمد

منهجي دوما التوجيه للأفضل بل للصح اذا رأيت ما يوجب التوجيه .

وعلى كل حال هذه اجابات لتساؤلاتك .. وحل لمشكلتك :

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

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

للاطلاع على ذلك عن كثب .. فعل خيار اظهار جداول النظام مع اظهار الكائنات المخفية وانظر في الجدول المسمى MSysObjects

سترى ان المعايير في استعلامك تمت بناءها على حقلي الاسم والنوع

 

تجد ادناه مثالك كما هو  .. فقط تم تحقيق طلبك

 

db2.rar

[أحمد العيسى]

تمام   هو المطلوب

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

ويكون التغيير شامل أيضا ً ومفيد لتطبيقه على الصف الثالث الذى لم أضع بياناته بالمثال السابق .

 

[ابوخليل]

12 ساعات مضت, أحمد العيسى said:

تمام   هو المطلوب

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

التعديل تم فعلا على كود المعاينة وكود الطباعة 

في نموذج الصف الثاني

تم اضافة الفاصلة تحت السطر  ( لانها موجودة فعلا ) ولكننا اخفيناها عند العرض

انظر الكود والفاصلة موجودة 

        DoCmd.OpenReport "تقرير2" & "_" & stDocName, acPreview, , stLinkCriteria
        Else
        DoCmd.OpenForm "تقرير2" & "_" & stDocName, acNormal

اما اخفاءها عند العرض فتم من خلال مصدر بيانات الصف للقائمة الذي هو الاستعلام الداخلي

انظر في الاستعلامين للنموذجين لتعرف الاختلاف .. وهو كالتالي

نموذج الصف الأول
Expr1: Mid([Name];7)
نموذج الصف الثاني
Expr1: Mid([Name];8)