Foksh

طيب يا صديقي .. شوف علي ، احنا رح نتجه الى الاستعلام الداخلي لتحقيق هدفك ، بحيث يكون الإستعلام كالتالي :- SELECT Combined.Barcode, Combined.St_Code, Combined.St_Name, Combined.St_Group, Combined.StudyMaterialsEng, Combined.St_Sex FROM (SELECT St_Code & Switch( [StudyMaterialsEng]="ARABIC","ARA", [StudyMaterialsEng]="ART","ART", [StudyMaterialsEng]="ENGLISH","ENG", [StudyMaterialsEng]="MATH","MAT", [StudyMaterialsEng]="RELIGION","REL", [StudyMaterialsEng]="SCIENCE","SCI", [StudyMaterialsEng]="SOCIAL","SOC", [StudyMaterialsEng]="SPORT","SPO" ) AS Barcode, St_Code, St_Name, St_Group, StudyMaterialsEng, St_Sex, Switch([StudyMaterialsEng]="ARABIC",1, [StudyMaterialsEng]="ART",2, [StudyMaterialsEng]="ENGLISH",3, [StudyMaterialsEng]="MATH",4, [StudyMaterialsEng]="RELIGION",5, [StudyMaterialsEng]="SCIENCE",6, [StudyMaterialsEng]="SOCIAL",7, [StudyMaterialsEng]="SPORT",8) AS MatOrder, [St_Group] AS GrpOrder, Switch(InStr(1,[St_Sex],"ذكر")>0,1,InStr(1,[St_Sex],"أنثى")>0,2,True,3) AS SexOrder, [St_Name] AS NameOrder, 1 AS RecType FROM Query1 UNION ALL SELECT "" AS Barcode, "" AS St_Code, "(" & CalcBarcode & ")" AS St_Name, "" AS St_Group, "" AS StudyMaterialsEng, "" AS St_Sex, MatOrder, GrpOrder, SexOrder, NameOrder, 2 AS RecType FROM ( SELECT St_Code, StudyMaterialsEng, St_Code & Switch( [StudyMaterialsEng]="ARABIC","ARA", [StudyMaterialsEng]="ART","ART", [StudyMaterialsEng]="ENGLISH","ENG", [StudyMaterialsEng]="MATH","MAT", [StudyMaterialsEng]="RELIGION","REL", [StudyMaterialsEng]="SCIENCE","SCI", [StudyMaterialsEng]="SOCIAL","SOC", [StudyMaterialsEng]="SPORT","SPO" ) AS CalcBarcode, Switch([StudyMaterialsEng]="ARABIC",1, [StudyMaterialsEng]="ART",2, [StudyMaterialsEng]="ENGLISH",3, [StudyMaterialsEng]="MATH",4, [StudyMaterialsEng]="RELIGION",5, [StudyMaterialsEng]="SCIENCE",6, [StudyMaterialsEng]="SOCIAL",7, [StudyMaterialsEng]="SPORT",8) AS MatOrder, [St_Group] AS GrpOrder, Switch(InStr(1,[St_Sex],"ذكر")>0,1,InStr(1,[St_Sex],"أنثى")>0,2,True,3) AS SexOrder, [St_Name] AS NameOrder FROM Query1 ) AS SubQuery ) AS Combined ORDER BY Combined.MatOrder, Combined.GrpOrder, Combined.SexOrder, Combined.NameOrder, Combined.RecType; والنتيجة كالآتي .. هل هو طلبك ؟؟ باركود نهائي مرتب المواد والشعب والطلاب.accdb

ولكني أعلم أنك ستصر على فكرتك التي تحققت في الصورة أعلاه ، صحيح ؟؟؟؟؟؟؟؟؟

حسناً ، اذا عرف السبب بطل العجب ، ولكن العجب في الهدف لا يمكن إبطاله .. يا صديقي لم لا نقوم بإضافة حقل جديد في نفس الاستعلام بحيث يحتوي قيمة الباركود لكل طالب موضوعاً بين قوسين !!!!! مع إني لست مقتنعاً بطريقة عملك ، ولكن هذه فكرتي كما في الصورة هل هو يشبه فكرتك التي تريدها ولكن في نفس السطر !!!!!!!

الأمر يسير ان شاء الله ، لكن من باب الفضول ممكن توضح لنا الهدف من كل هذا الإستعلام ؟؟؟؟؟

اتعب قليلاً في توضيح الفكرة من خلال صورة ذات وضوح وشرح أكثر .. لا تستخدم الجوال في التصوير للشاشة بل استخدم مفتاح PrtScr = Print Screen لالتقاط صورة من الشاشة ولصقها في المشاركة أخي الكريم أو أي برنامج محرر صور للتعديلوالشرح والكتابة عليها

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

اعتقد هي فعلاً السبب استخدام الدالة IIF داخل GROUP BY هو السبب الأكبر .. شو رأيك أول شي نعمل استعلام تجميعي مبسط بدون دوال ، وبعدين نعمل استعلام نهائي لحساب الدوال من الجدول المؤقت طبعاً هنا رايحين نحسب cntRsob1 , cntRsob2 , alnesbah1 , tgyeem1 , و hala1 بسرعة أكبر من خلال الجدول المؤقت 🙄 برضو ما زلت بفكر بصوت عالي ، ولكن هو احد الإحتمالات

نسأل الله أن يمد في عمركم ، وأن يرزقكم الصحة والعافية ، ويسعدني كثيراً أن أترك انطباعاً له دلالة كبيرة على طيبكم ومنبعكم

لا شكر على واجب ,, هذا أقل ما يمكنني تقديمه في هذا الصرح الكبير

أخي الكريم ، بداية تم اضافة حقل St_Sex في جدول الطلاب ،وتمتعيين القيمة للذكور والإناث ،وعليه جرب هذا الاستعلام :- SELECT St_Code & Switch( [StudyMaterialsEng]="ARABIC","ARA", [StudyMaterialsEng]="ART","ART", [StudyMaterialsEng]="ENGLISH","ENG", [StudyMaterialsEng]="MATH","MAT", [StudyMaterialsEng]="RELIGION","REL", [StudyMaterialsEng]="SCIENCE","SCI", [StudyMaterialsEng]="SOCIAL","SOC", [StudyMaterialsEng]="SPORT","SPO" ) AS Barcode, Query1.St_Code, Query1.St_Name, Query1.St_Group, Query1.StudyMaterialsEng, Query1.St_Sex FROM Query1 ORDER BY Switch( [StudyMaterialsEng]="ARABIC",1, [StudyMaterialsEng]="ART",2, [StudyMaterialsEng]="ENGLISH",3, [StudyMaterialsEng]="MATH",4, [StudyMaterialsEng]="RELIGION",5, [StudyMaterialsEng]="SCIENCE",6, [StudyMaterialsEng]="SOCIAL",7, [StudyMaterialsEng]="SPORT",8 ), [St_Group], Switch( InStr(1, [St_Sex], "ذكر") > 0, 1, InStr(1, [St_Sex], "أنثى") > 0, 2, True, 3 ), [St_Name]; الإستعلام Query5 هل يلبي مطلبك ؟؟ باركود نهائي.accdb

وكي لا أكون قد فهمت بشكل متسرع كعادتي في نهاية اليوم 😅 ، هل ما قمت بتوضيحه صحيح أو أنني اتحدث في الغرب وملاحظاتكم في الشرق بخصوص هذه الجزئية :-

العفو منك يا معلمي ،، أنا أتعلم منك ومن خطاك صدقني ،، ولكن لنفكر بصوت عالٍ قليلاً قبل خروجي من العمل ,, في الجدول المؤقت وبعد إعداد النتيجة ، سينتج تقريباً 2250 سجل ( صحيح ؟ ) لو جأنا لفلترة الحقول بحيث :- الفصل الأول ، الصفوف الدنيا ، الصف الأول ، الذكور ، الحالة = غ فأن عدد السجلات سيكون في الجدول 92 سجل ، بينما عند فتح التقرير وفي مربع الإخصاء للبنون = 93 . وكذلك الأمر بالنسبة للبنات حيث النتيجة في الجدول 89 ، وفي التقرير = 90 . وفي الجدول عند الفرز للفصل الثاني كانت النتيجة = البنون 92 في الجدول وفي التقرير = 93 ، وللبنات في الجدول = 89 وفي التقرير = 90 أي بفارق واحد لا اعلم ان كان هناك شروط أخيرى للفلترة .. وعليه نستطيع باستخدام Dcount في مصدر بيانات مربعات النص جلب العدد الذي نريده دون أي دوال في الاستعلامات .. هذه فكرتي وملاحظاتي التي لا تقلل من جهدكم وعملكم ..

😉 هي كانت مجرد صرخة لفكرة في رأسي ههههه . ولكن إن أتيحت لي الفرصة لتجربتها فليس لدي مانع طبعاً .. وما خطر ببالي وقتها هو لماذا لم يتطرق لاستخدام DoCmd.RunCommand acCmdPaste أو DoCmd.RunCommand acCmdCopy 😁

ما شاء الله ، ما شاء الله .. فكرة جميلة جداً أبدعت مهندسنا الغالي على هذه التحفة الجميلة ، وفعلاً قد يحتاجها الكثيرين ممن لا يعرفون كيفية التعامل مع لوحة المفاتيح عند النسخ واللصق للنصوص العربية .. عندي اقتراحين لا ينقصان من قيمة العمل شيئاً .. 1. يكون في زر لمسح المربعات النصية ، وخصوصاً بعد ان تم أخذ النتيجة وطبعاً لن أحتاج إلى اغلاق وفتح النموذج مرة أخرى .. 2. توظيف htmlfile للنسخ واللصق ، هل سيدعم جميع الأنظمة من نسخ ويندوز ؟؟ أما خلاف ذلك فالفكرة جميلة جداً

اعتذر منك ، فلم استفهم المشكلة وليس لدي حل 😃

يا صديقي ، جدول الطلاب الفرز فيه حسب الـحقل ID ، صحيح ؟؟؟ لكن لاحظ ان أول طالب هو بالصف الـ 5أ !!!!!! فكيف تريد الفرز يشبه فرز الجدول !!!!!

يا صاحبي ، الطلاب مترتبين معك حسب الاسم الابجدي ، ولا انت قصدك حسب رقم الطالب ؟؟؟؟

صدقت تماماً .. لم لا نحصل على عدد ايام الحضور بطريقة تعتمد على الجدول المؤقت بدلاً من الاستعلامات !!!!! فكرة بسيطة

هذه لم افهمها

الله يعطيك العافية أستاذنا @ابوخليل ، عمل جميل جداً ومجهود واضح يستحق التقدير ,, سؤال خطر ببالي وأكيد خطر ببال أخونا أسعد ، في الزر " إعداد النتيجة " يتم استخراج البيانات من الاستعلامات الى الجدول المؤقت لكلا الفصلين صحيح ؟؟ وهذا سيجعل عدد السجلات مضاعفاً تقريباً في كل مرة ، وسؤالي هو لم لا نجعل الأمر متروك لقائمة اختيار الفصل الدراسي ، بحيث من خلالها يتم تقسيم عمل الاستعلامات وبالتالي يقل الضغط على الاستعلامات الثلاثة في الزر !! هو مجرد رأي طبعاً في النهاية .

بالتوفيق يا رب .. وربنا ينجحك بجد من قلبي

دا العشم في محبتي لك برضو .. وانت عارف الكلام الصح . ربنا يديك الصحة والعافية من كل بلاء وهم .. لو محتاج حاجة هنا أو هناك في شغلك احكيلي ، وأنا أوعدك اني مش بفهم حاجة في شغلك هههههه

هههههه وانا بانتظار دوري لما توزع الحلويات عندي .. ولا إحنا ملناش من الحب جانب 😛 !! على العموم يسعدني تجربتك وإعلامي بالنتيجة أيضاً 😊 .

اممممم ، اذا كنت تعرف خطوات اضافة استعلام SQL ، فجرب الاستعلام التالي . حيث الفرز سيكون بالمادة أولاً ، ثم بالشعبة ، ثم الفرز باسم الطالب .. SELECT St_Code & Switch( [StudyMaterialsEng] = "ARABIC", "ARA", [StudyMaterialsEng] = "ART", "ART", [StudyMaterialsEng] = "ENGLISH", "ENG", [StudyMaterialsEng] = "MATH", "MAT", [StudyMaterialsEng] = "RELIGION", "REL", [StudyMaterialsEng] = "SCIENCE", "SCI", [StudyMaterialsEng] = "SOCIAL", "SOC", [StudyMaterialsEng] = "SPORT", "SPO" ) AS Barcode, Query1.St_Code, Query1.St_Name, Query1.St_Group, Query1.StudyMaterialsEng FROM Query1 ORDER BY Switch( [StudyMaterialsEng] = "ARABIC", 1, [StudyMaterialsEng] = "ART", 2, [StudyMaterialsEng] = "ENGLISH", 3, [StudyMaterialsEng] = "MATH", 4, [StudyMaterialsEng] = "RELIGION", 5, [StudyMaterialsEng] = "SCIENCE", 6, [StudyMaterialsEng] = "SOCIAL", 7, [StudyMaterialsEng] = "SPORT", 8 ), [St_Group], [St_Name]; باركود نهائي.accdb

تفضل ,, افتح الاستعلام Query2 باركود نهائي.accdb