khasem قام بنشر مايو 25, 2020 قام بنشر مايو 25, 2020 السلام عليكم اخوتي الكرام كيف يمكن توزيع جلوس الطلاب ضمن الشروط التالية: 1- المقعد الواحد يجلس فيه طالبان كل طالب من صف 2- القاعة الواحدة تحتوي على 17 مقعد اي ممكن ان تضم 34 طالب ( تتكون القاعة من قطاعين ) 3- ان لايجلس طالبان من صفين بينهما مادة مشتركة ( اي يدرسون نفس المادة ) 4- يمكن أن تستوعب قاعة الاختبار كحد أقصى 30 طالب 5-ترتيب جلوس طلاب الصف الواحد خلف بعضهم وشرط أن لا يتجاور طالبان من نفس الصف توزيع.mdb 1
عفرنس قام بنشر مايو 26, 2020 قام بنشر مايو 26, 2020 في ٢٥/٥/٢٠٢٠ at 21:46, khasem said: السلام عليكم اخوتي الكرام كيف يمكن توزيع جلوس الطلاب ضمن الشروط التالية: 1- المقعد الواحد يجلس فيه طالبان كل طالب من صف 2- القاعة الواحدة تحتوي على 17 مقعد اي ممكن ان تضم 34 طالب ( تتكون القاعة من قطاعين ) 3- ان لايجلس طالبان من صفين بينهما مادة مشتركة ( اي يدرسون نفس المادة ) 4- يمكن أن تستوعب قاعة الاختبار كحد أقصى 30 طالب 5-ترتيب جلوس طلاب الصف الواحد خلف بعضهم وشرط أن لا يتجاور طالبان من نفس الصف توزيع.mdb 456 kB · 6 تنزيلات انظر للتقرير St_Jloss_Qury مع العلم أن هناك غموض في طلبك .. وحتى يكون الأمر واضحا .. أضف في الجدول جميع الحقول التي تريد . أنت طلبت اقتباس ان لايجلس طالبان من صفين بينهما مادة مشتركة ( اي يدرسون نفس المادة ) السؤال : أين هو حقل المادة في الجدول ؟؟؟؟؟ وهنا تقول : اقتباس 2- القاعة الواحدة تحتوي على 17 مقعد اي ممكن ان تضم 34 طالب ( تتكون القاعة من قطاعين ) ثم بعدها تقول اقتباس 4- يمكن أن تستوعب قاعة الاختبار كحد أقصى 30 طالب وكيف تكون طريقة ادخال البيانات ؟؟ هل هي عن طريق الجدول مباشرة ؟؟ أم عن طريق نموذج ؟؟ توزيع.mdb 1
khasem قام بنشر مايو 27, 2020 الكاتب قام بنشر مايو 27, 2020 9 hours ago, فايز.. said: انظر للتقرير St_Jloss_Qury مع العلم أن هناك غموض في طلبك .. وحتى يكون الأمر واضحا .. أضف في الجدول جميع الحقول التي تريد . أنت طلبت السؤال : أين هو حقل المادة في الجدول ؟؟؟؟؟ وهنا تقول : ثم بعدها تقول وكيف تكون طريقة ادخال البيانات ؟؟ هل هي عن طريق الجدول مباشرة ؟؟ أم عن طريق نموذج ؟؟ توزيع.mdb 608 kB · 2 downloads وعليكم السلام أستاذ فايز انا ممتن لردك استاذنا الفاضل الموجود في التقرير هو خارطة لجلوس الطلاب اثناء الامتحانات لمدة عشرة أيام اول اقل حسب عدد المواد التي يدرسها والأيام التي تحددها الوزارة لاجراء الامتحان مثلا : اول يوم يمتحن الصف الأول إسلامية والصف الثاني عربية والصف الثالث كيمياء هذا لايهم . والمقصود ان لايتجاور طالبان من صفين لهما نفس المادة هو أحيانا تكون مواد مشتركة بين صفين مثلا احتمال ان تكون مادة الاقتصاد تدرس في الصف الأول والصف الثالث والمطلوب زر خيار يؤشر اشتراك الصفين بنفس المادة لكي لايجلس طالبان من الصفين متجاورين المطلوب في الخارطة اسم الطالب وصفه ورقمه الامتحاني فقط وهذه المعلومات موجودة في جدول( (Jloss_tpl الطاقة الاستيعابية لكل قاعة 17 مقعد مزدوج ( أي يجلس طالبان على نفس المقعد ) واحيانا توجد قاعات اكبر تستوعب عدد اكثر من المقاعد القاعة الواحدة تحتوي على قطاعين كما هو موجود في تقرير ( Jloss_report ) مع تقديري واحترامي لشخصكم الكريم على تفضلك بالرد على منشوري
khasem قام بنشر مايو 27, 2020 الكاتب قام بنشر مايو 27, 2020 (معدل) 3 hours ago, khasem said: تم تعديل مايو 27, 2020 بواسطه khasem
ناقل قام بنشر مايو 27, 2020 قام بنشر مايو 27, 2020 10 ساعات مضت, khasem said: وعليكم السلام أستاذ فايز انا ممتن لردك استاذنا الفاضل الموجود في التقرير هو خارطة لجلوس الطلاب اثناء الامتحانات لمدة عشرة أيام اول اقل حسب عدد المواد التي يدرسها والأيام التي تحددها الوزارة لاجراء الامتحان مثلا : اول يوم يمتحن الصف الأول إسلامية والصف الثاني عربية والصف الثالث كيمياء هذا لايهم . والمقصود ان لايتجاور طالبان من صفين لهما نفس المادة هو أحيانا تكون مواد مشتركة بين صفين مثلا احتمال ان تكون مادة الاقتصاد تدرس في الصف الأول والصف الثالث والمطلوب زر خيار يؤشر اشتراك الصفين بنفس المادة لكي لايجلس طالبان من الصفين متجاورين المطلوب في الخارطة اسم الطالب وصفه ورقمه الامتحاني فقط وهذه المعلومات موجودة في جدول( (Jloss_tpl الطاقة الاستيعابية لكل قاعة 17 مقعد مزدوج ( أي يجلس طالبان على نفس المقعد ) واحيانا توجد قاعات اكبر تستوعب عدد اكثر من المقاعد القاعة الواحدة تحتوي على قطاعين كما هو موجود في تقرير ( Jloss_report ) مع تقديري واحترامي لشخصكم الكريم على تفضلك بالرد على منشوري اين الاجابة اخي الكريم ؟؟؟؟؟ 1
عفرنس قام بنشر مايو 27, 2020 قام بنشر مايو 27, 2020 19 دقائق مضت, ناقل said: اين الاجابة اخي الكريم ؟؟؟؟؟ الى الان الصورة ليست واضحة بالنسبة لي .. لعل احد الاخوة يفيدنا 1
khasem قام بنشر مايو 27, 2020 الكاتب قام بنشر مايو 27, 2020 7 minutes ago, فايز.. said: الى الان الصورة ليست واضحة بالنسبة لي .. لعل احد الاخوة يفيدنا استاذي الفاضل اوضحت المطلوب ( JLOSS _ REPRT) فقط توزيع الطلاب ضمن الشروط وكما موجود في تقرير مع تقديري واحترامي لشخصكم الكريم
Gamal.Saad قام بنشر مايو 29, 2020 قام بنشر مايو 29, 2020 بعد اذن أخي وزميلي أستاذ فايز.. شوف أستاذ khasem : هناك فكرة وهي : 1 - توزيع نصف الطلاب سواء تم الترتيب حسب الاسم أو حسب المادة على المقعد الأول بكل صف 2 - استخدام طريقة المرور على السجلات مع شرط المادة و الصف حتى يتم تسكين هذا الطالب بالسجل بالمقعد الثاني وهكذا حتى تنتهي السجلات أو تستخدم طريقة الدالة العشوائية أيضا مع نفس الشروط دون الحاجة للمرور على السجلات 3 - في نهاية التوزيع نقوم بترقيم القاعة حسب العدد المطلوب وهذه النقطة بسيطة لكن القصور في تلك الفكرة أن نصف الطلاب يتم تسكينهم على المقعد الأول بكل صف و تطبق الشروط على المقعد الثاني فقط بمعنى : اذا كان لديك 50 طالب منهم 20 بالصف الأول والقاعة تتسع لعدد 15 مقعد فسوف تجد أن معظم طلاب الصف الأول تتركز في القاعة الأولى بينما باقي الصفوف تتوزع على القاعات حسب الشرط والفكرة الثانية هي نفس السابقة لكن يتم التوزيع واختبار الشرط على كلا المقعدين بكل صف والفكرة الأولى أسرع في التنفيذ والثانية تحتاج لوقت وتركيز ، فهل تناسبك فكرة توزيع الطلاب على المقعد الأول أولا في كل الصفوف والقاعات ؟ 1
khasem قام بنشر مايو 29, 2020 الكاتب قام بنشر مايو 29, 2020 8 hours ago, Gamal.Saad said: بعد اذن أخي وزميلي أستاذ فايز.. شوف أستاذ khasem : هناك فكرة وهي : 1 - توزيع نصف الطلاب سواء تم الترتيب حسب الاسم أو حسب المادة على المقعد الأول بكل صف 2 - استخدام طريقة المرور على السجلات مع شرط المادة و الصف حتى يتم تسكين هذا الطالب بالسجل بالمقعد الثاني وهكذا حتى تنتهي السجلات أو تستخدم طريقة الدالة العشوائية أيضا مع نفس الشروط دون الحاجة للمرور على السجلات 3 - في نهاية التوزيع نقوم بترقيم القاعة حسب العدد المطلوب وهذه النقطة بسيطة لكن القصور في تلك الفكرة أن نصف الطلاب يتم تسكينهم على المقعد الأول بكل صف و تطبق الشروط على المقعد الثاني فقط بمعنى : اذا كان لديك 50 طالب منهم 20 بالصف الأول والقاعة تتسع لعدد 15 مقعد فسوف تجد أن معظم طلاب الصف الأول تتركز في القاعة الأولى بينما باقي الصفوف تتوزع على القاعات حسب الشرط والفكرة الثانية هي نفس السابقة لكن يتم التوزيع واختبار الشرط على كلا المقعدين بكل صف والفكرة الأولى أسرع في التنفيذ والثانية تحتاج لوقت وتركيز ، فهل تناسبك فكرة توزيع الطلاب على المقعد الأول أولا في كل الصفوف والقاعات ؟ الاستاذ الفاضل جمال رحم الله والديك لتعاونك معي اذا تركنا شرط المادة هل يتم التوزيع بشكل منتظم 1
Gamal.Saad قام بنشر مايو 29, 2020 قام بنشر مايو 29, 2020 2 ساعات مضت, khasem said: اذا تركنا شرط المادة هل يتم التوزيع بشكل منتظم إن شاء الله ، وهذا يتم بأغلب اللجان عندنا يعني الطلبة تتوزع لو اثنان متجاورين يكونان من صفين مختلفين والأرقام مرتبة حسب الصف أولاً ثم حسب رقم الجلوس ثانياً ثم هناك جدول للمادة حسب الأيام أنا بس أحب أنبهك لشيئ إن كنت تتحمل المسئولية أن تضع نفس مكان الطالب و مكان كل مشارك بالامتحانات عند التعامل مع نتيجة التوزيع تجنباً لحدوث مشاكل واستياء من برنامجك 1
Gamal.Saad قام بنشر مايو 29, 2020 قام بنشر مايو 29, 2020 هناك 4 طرق توزيع للطلاب بالمرفق : 1 - "صف مختلف + مادة مختلفة" 2 - "نفس الصف أو صف مختلف + نفس المادة أو مادة مختلفة" 3 - "صف مختلف + نفس المادة" 4 - "صف مختلف وتجاهل المادة" وهذا يحافظ على الترنيب طبقاً لرقم الجلوس والصف إن كانوا في ترتيب تسلسلي ولكن جميعها يستند لتوزيع المقعد الأول في كامل القاعات أولاً وهذا هو الهيكل الرئيسي أو العقل المدبر للكود الذي يمكن العمل عليه لاجقاً للتعديل و جاري تعديل الكود للاختصار وحذف الزيادات ، واذا أتيح الوقت فهناك طريقة اضافية للتوزيع المتزامن للمقعدين معاً بكل صف بالقاعة 'Start ..................... إنشاء الجدول المؤقت من جديد ........................ Call Clear_data_first 'start.......................................------ توزيع الحقل الأول بعدد نصف الصفوف ---- الطلاب ................. DoCmd.RunSQL "INSERT INTO Table1 ( Seat1_class, Seat1_Exam, Seat1_name, Jloss1_no ) " _ & "SELECT Qry1.Safe, Qry1.[N-EXSAM], Qry1.St_name, Qry1.Jloss_no FROM" _ & "(SELECT TOP 50 PERCENT Jloss_tpl.Jloss_no, * FROM Jloss_tpl " _ & "ORDER BY Jloss_no , Jloss_tpl.Safe, Jloss_tpl.[N-EXSAM], Jloss_tpl.St_name ) Qry1;" DoCmd.RunSQL GetSQL.update_action 'start......................................... توزيع الحقل الثاني ............................................. Set rsQry = CurrentDb.OpenRecordset(GetSQL.select_action) Set rsTbl = CurrentDb.OpenRecordset(GetSQL.select_tbl1) 'start......................................... المرور على سجلات الجدول المؤقت لإضافة الطالب بالمقعد الثاني ............................................. For h = 0 To rsTbl.RecordCount Set rsQry = CurrentDb.OpenRecordset(GetSQL.select_action) rsQry.MoveFirst 'start......................................... المرور على سجلات الاستعلام من الجدول الاساسي لاختيار طالب حسب الشروط للمقعد الثاني ............................................. For i = 0 To rsQry.RecordCount 'start................... دالة اختيار طالب واحد عشوائي لأول ثلاثة اختيارات من الكومبوبكس Set rsQry = CurrentDb.OpenRecordset("SELECT top 1 Jloss_no , * FROM Jloss_tpl WHERE (((Jloss_tpl.Action) = False) ) ORDER BY rnd(Jloss_no),Safe;") s = Nz(DLookup("Jloss2_no", "Table1", "[Jloss2_no] = " & rsQry!Jloss_no & ""), 0) ' شرط عدم اختيار مسبق y = (Val(rsTbl!Seat1_Exam) <> Val(rsQry("N-EXSAM"))) ' شرط اختلاف المادة x = (Val(rsTbl!Seat1_Exam) = Val(rsQry("N-EXSAM"))) ' شرط تشابه المادة 'start................................. اختيارات طريقة التوزيع من النموذج Select Case Combo_choice Case 1 If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 And y = True Then: Call dist Case 2 If IsNull(rsTbl!Seat2_name) And s = 0 Then: Call dist Case 3 If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 And x = True Then: Call dist Case 4 'start................... إعادة اختيار بدون العشوائية للمحافظة على ترتيب رقم الجلوس للاختيار الرابع من الكومبوبكس Set rsQry = CurrentDb.OpenRecordset("SELECT Jloss_no , * FROM Jloss_tpl WHERE (((Jloss_tpl.Action) = False) ) ORDER BY Jloss_no;") s = Nz(DLookup("Jloss2_no", "Table1", "[Jloss2_no] = " & rsQry!Jloss_no & ""), 0) If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 Then: Call dist End Select Next ' السجل التالي للاستعلام If rsTbl.EOF Then: rsTbl.MoveFirst: Else: rsTbl.MoveNext Next ' السجل التالي الجدول توزيع 20.accdb 1 2
khasem قام بنشر مايو 29, 2020 الكاتب قام بنشر مايو 29, 2020 (معدل) 2 hours ago, Gamal.Saad said: هناك 4 طرق توزيع للطلاب بالمرفق : 1 - "صف مختلف + مادة مختلفة" 2 - "نفس الصف أو صف مختلف + نفس المادة أو مادة مختلفة" 3 - "صف مختلف + نفس المادة" 4 - "صف مختلف وتجاهل المادة" وهذا يحافظ على الترنيب طبقاً لرقم الجلوس والصف إن كانوا في ترتيب تسلسلي ولكن جميعها يستند لتوزيع المقعد الأول في كامل القاعات أولاً وهذا هو الهيكل الرئيسي أو العقل المدبر للكود الذي يمكن العمل عليه لاجقاً للتعديل و جاري تعديل الكود للاختصار وحذف الزيادات ، واذا أتيح الوقت فهناك طريقة اضافية للتوزيع المتزامن للمقعدين معاً بكل صف بالقاعة 'Start ..................... إنشاء الجدول المؤقت من جديد ........................ Call Clear_data_first 'start.......................................------ توزيع الحقل الأول بعدد نصف الصفوف ---- الطلاب ................. DoCmd.RunSQL "INSERT INTO Table1 ( Seat1_class, Seat1_Exam, Seat1_name, Jloss1_no ) " _ & "SELECT Qry1.Safe, Qry1.[N-EXSAM], Qry1.St_name, Qry1.Jloss_no FROM" _ & "(SELECT TOP 50 PERCENT Jloss_tpl.Jloss_no, * FROM Jloss_tpl " _ & "ORDER BY Jloss_no , Jloss_tpl.Safe, Jloss_tpl.[N-EXSAM], Jloss_tpl.St_name ) Qry1;" DoCmd.RunSQL GetSQL.update_action 'start......................................... توزيع الحقل الثاني ............................................. Set rsQry = CurrentDb.OpenRecordset(GetSQL.select_action) Set rsTbl = CurrentDb.OpenRecordset(GetSQL.select_tbl1) 'start......................................... المرور على سجلات الجدول المؤقت لإضافة الطالب بالمقعد الثاني ............................................. For h = 0 To rsTbl.RecordCount Set rsQry = CurrentDb.OpenRecordset(GetSQL.select_action) rsQry.MoveFirst 'start......................................... المرور على سجلات الاستعلام من الجدول الاساسي لاختيار طالب حسب الشروط للمقعد الثاني ............................................. For i = 0 To rsQry.RecordCount 'start................... دالة اختيار طالب واحد عشوائي لأول ثلاثة اختيارات من الكومبوبكس Set rsQry = CurrentDb.OpenRecordset("SELECT top 1 Jloss_no , * FROM Jloss_tpl WHERE (((Jloss_tpl.Action) = False) ) ORDER BY rnd(Jloss_no),Safe;") s = Nz(DLookup("Jloss2_no", "Table1", "[Jloss2_no] = " & rsQry!Jloss_no & ""), 0) ' شرط عدم اختيار مسبق y = (Val(rsTbl!Seat1_Exam) <> Val(rsQry("N-EXSAM"))) ' شرط اختلاف المادة x = (Val(rsTbl!Seat1_Exam) = Val(rsQry("N-EXSAM"))) ' شرط تشابه المادة 'start................................. اختيارات طريقة التوزيع من النموذج Select Case Combo_choice Case 1 If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 And y = True Then: Call dist Case 2 If IsNull(rsTbl!Seat2_name) And s = 0 Then: Call dist Case 3 If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 And x = True Then: Call dist Case 4 'start................... إعادة اختيار بدون العشوائية للمحافظة على ترتيب رقم الجلوس للاختيار الرابع من الكومبوبكس Set rsQry = CurrentDb.OpenRecordset("SELECT Jloss_no , * FROM Jloss_tpl WHERE (((Jloss_tpl.Action) = False) ) ORDER BY Jloss_no;") s = Nz(DLookup("Jloss2_no", "Table1", "[Jloss2_no] = " & rsQry!Jloss_no & ""), 0) If IsNull(rsTbl!Seat2_name) And rsTbl!Seat1_class <> rsQry!Safe And s = 0 Then: Call dist End Select Next ' السجل التالي للاستعلام If rsTbl.EOF Then: rsTbl.MoveFirst: Else: rsTbl.MoveNext Next ' السجل التالي الجدول توزيع 20.accdb 612 kB · 0 downloads السلام عليكم استاذ جمال حقيقة لا اعرف ماذا اصف هذا العمل العملاق ربي يحفظك ويزيدك من فائض علمه يظهر كما في الصورة المرفقة (Jloss_report_class)لكن هل من الممكن جعل التقرير اي يظهر في كل مقعد طالبين اول - ثاني ... ثالث- اول .... ثاني - ثالث ضمن فقرة صف مختلف وتجاهل المادة مع تقديري واحترامي تم تعديل مايو 29, 2020 بواسطه khasem
khasem قام بنشر مايو 29, 2020 الكاتب قام بنشر مايو 29, 2020 (معدل) 43 minutes ago, Gamal.Saad said: احتمال نعم كما بالصورة توزيع 21.accdb 624 kB · 0 downloads كم انت رائع استاذ جمال ربي يحفظك ويرحم الله والديك فقط ان امكن طلب اخير هل من الممكن ادراج عدد طلاب كل صف في القاعة الواحدة مثلا عدد طلاب الصف الاول = وعدد طلاب الصف الثاني وعدد طلاب الصف الثالث القاعة ممكن ان تستوعب 34 او 36 اتصور تقسيم القاعة الواحدة الى قطاعين بالتساوي فيه صعوبة مع تقديري واحترامي لك استاذي الفاضل تم تعديل مايو 29, 2020 بواسطه khasem
Gamal.Saad قام بنشر مايو 30, 2020 قام بنشر مايو 30, 2020 تسلم يا غالي 20 ساعات مضت, khasem said: هل من الممكن ادراج عدد طلاب كل صف في القاعة الواحدة ممكن بعد التجربة 20 ساعات مضت, khasem said: القاعة ممكن ان تستوعب 34 او 36 زي ما تحب ، أنت فقط تحتاج تجربة الكود أنت قدر المستطاع أعطيت عنوان داخل الكود للأجزاء الرئيسية توضح عمل الكود والفكرة لتسهيل التعديل 20 ساعات مضت, khasem said: اتصور تقسيم القاعة الواحدة الى قطاعين بالتساوي فيه صعوبة طالما سيكون القطاع يساوي عدد مقاعد القاعة مقسوما على 2 فليس هناك صعوبة الصعوبة كانت في عدد مقاعد القاعة لو 17 مقعد عدد فردي لأن مش هنعرف ناخد نصف مقعد يجلس عليه طالب والنصف الآخر بقاعة أخرى لذلك عدلت لك في اللوب Loop الخاص بالترقيم ليراعي وجود رقم فردي For i = 1 To Labs ' المرور على السجلات داخل الجدول لترقيم القاعات حسب عددها section_no = 1 Lab_no = Lab_no + 1 For h = 1 To 2 ' المرور على صفوف كل قاعة For j = 1 To Me.Rows_count / 2 '.......... عدد قطاعين بكل قاعة Call R("R") ' دالة اجرائية لتسجيل رقم القاعة ورقم القطاع If Not rsTbl.EOF Then rsTbl.MoveNext Next section_no = 2 If Val(Me.Rows_count) Mod 2 <> 0 Then '........ زيادة صف للعدد الفردي Call R("R") If Not rsTbl.EOF Then rsTbl.MoveNext End If Next If Val(Me.Rows_count) Mod 2 <> 0 And Not rsTbl.EOF Then rsTbl.MovePrevious Next وبالنسبة للتقرير قدر الامكان هذا تنسيقه ويناسب عدد مقاعد قليل داخل القاعة حتى تكون بصفحة واحدة للطباعة توزيع 23.accdb 1 1
khasem قام بنشر مايو 30, 2020 الكاتب قام بنشر مايو 30, 2020 10 minutes ago, Gamal.Saad said: تسلم يا غالي ممكن بعد التجربة زي ما تحب ، أنت فقط تحتاج تجربة الكود أنت قدر المستطاع أعطيت عنوان داخل الكود للأجزاء الرئيسية توضح عمل الكود والفكرة لتسهيل التعديل طالما سيكون القطاع يساوي عدد مقاعد القاعة مقسوما على 2 فليس هناك صعوبة الصعوبة كانت في عدد مقاعد القاعة لو 17 مقعد عدد فردي لأن مش هنعرف ناخد نصف مقعد يجلس عليه طالب والنصف الآخر بقاعة أخرى لذلك عدلت لك في اللوب Loop الخاص بالترقيم ليراعي وجود رقم فردي For i = 1 To Labs ' المرور على السجلات داخل الجدول لترقيم القاعات حسب عددها section_no = 1 Lab_no = Lab_no + 1 For h = 1 To 2 ' المرور على صفوف كل قاعة For j = 1 To Me.Rows_count / 2 '.......... عدد قطاعين بكل قاعة Call R("R") ' دالة اجرائية لتسجيل رقم القاعة ورقم القطاع If Not rsTbl.EOF Then rsTbl.MoveNext Next section_no = 2 If Val(Me.Rows_count) Mod 2 <> 0 Then '........ زيادة صف للعدد الفردي Call R("R") If Not rsTbl.EOF Then rsTbl.MoveNext End If Next If Val(Me.Rows_count) Mod 2 <> 0 And Not rsTbl.EOF Then rsTbl.MovePrevious Next وبالنسبة للتقرير قدر الامكان هذا تنسيقه ويناسب عدد مقاعد قليل داخل القاعة حتى تكون بصفحة واحدة للطباعة توزيع 23.accdb 1.22 MB · 0 downloads اعزك الله استاذي الفاضل وزادك من فضله عادي استاذ من الممكن ان يكون كل قطاع في صفحة واحدة ولكل قطاع خلاصته اي خلاصة بعدد الطلاب الموجودين في كل قطاع حسب الصف حتى يكون التقرير بشكل منظم اتصور بذلت جهدا كبيرا واسال الله ان يجزيك عنا خير الجزاء ويجنبك كل مكروه باذنه تعالي احترامي واتقديري لشخصكم الكريم 1
Gamal.Saad قام بنشر مايو 30, 2020 قام بنشر مايو 30, 2020 2 دقائق مضت, khasem said: حتى يكون التقرير بشكل منظم اتصور بذلت جهدا كبيرا واسال الله ان يجزيك عنا خير الجزاء ويجنبك كل مكروه باذنه تعالي احترامي واتقديري لشخصكم الكريم شكرا أخي على دعواتك وربنا يوفقك بالبرنامج وأي مشكلة تظهر فيه أعلمني بها بالعكس أنا استفدت من البرنامج وتعلمت اشياء جديدة وأخرى تذكرتها بعدما نسيتها وبالمناسبة أنا صممت من قبل برنامج لتوزيع المعلمين عشوائيا على لجان الامتحانات بالمدارس لتجنب المحسوبية وبعد مجهود كبير كان أغلب المعلمين يقومون بالدعاء على الكمبيوتر وعلى من صمم البرنامج ههههه لأن المسئول الاداري بالتعليم وقتها رفض طلبي بوضع شرط للتوزيع أن لا يبتعد المعلم عن محل سكنه بالوحدة المحلية لوحدة محلية أخرى فكان تجمع حاشد من المعلمين لتقديم اعتذارات عن المشاركة باللجان وقالوا الكمبيوتر مش عارف يوزع ومش يراعي ظروف الناس علشان كده قلت لك خلي بالك وضع نفسك مكان المتأثرين بتنفيذ البرنامج حتى لو كانوا مدخلي البيانات 1 1
khasem قام بنشر مايو 30, 2020 الكاتب قام بنشر مايو 30, 2020 2 minutes ago, Gamal.Saad said: شكرا أخي على دعواتك وربنا يوفقك بالبرنامج وأي مشكلة تظهر فيه أعلمني بها بالعكس أنا استفدت من البرنامج وتعلمت اشياء جديدة وأخرى تذكرتها بعدما نسيتها وبالمناسبة أنا صممت من قبل برنامج لتوزيع المعلمين عشوائيا على لجان الامتحانات بالمدارس لتجنب المحسوبية وبعد مجهود كبير كان أغلب المعلمين يقومون بالدعاء على الكمبيوتر وعلى من صمم البرنامج ههههه لأن المسئول الاداري بالتعليم وقتها رفض طلبي بوضع شرط للتوزيع أن لا يبتعد المعلم عن محل سكنه بالوحدة المحلية لوحدة محلية أخرى فكان تجمع حاشد من المعلمين لتقديم اعتذارات عن المشاركة باللجان وقالوا الكمبيوتر مش عارف يوزع ومش يراعي ظروف الناس علشان كده قلت لك خلي بالك وضع نفسك مكان المتأثرين بتنفيذ البرنامج حتى لو كانوا مدخلي البيانات استاذنا ما اخبرتني هل من الممكن وضع كل قطاع في ورقة مع خلاصته اي اعداد طلاب كل صف في القطاع
Gamal.Saad قام بنشر مايو 30, 2020 قام بنشر مايو 30, 2020 4 دقائق مضت, khasem said: استاذنا ما اخبرتني هل من الممكن وضع كل قطاع في ورقة مع خلاصته اي اعداد طلاب كل صف في القطاع إن شاء الله ممكن في أقرب فرصة ، ولو تحب تضع كل طالب في ورقة ، ماشي
khasem قام بنشر مايو 30, 2020 الكاتب قام بنشر مايو 30, 2020 1 minute ago, Gamal.Saad said: إن شاء الله ممكن في أقرب فرصة ، ولو تحب تضع كل طالب في ورقة ، ماشي والله ماتقصر استاذ ربي يحفظك
ابو البشر قام بنشر مايو 30, 2020 قام بنشر مايو 30, 2020 46 دقائق مضت, Gamal.Saad said: أنا صممت من قبل برنامج لتوزيع المعلمين عشوائيا على لجان الامتحانات بالمدارس لتجنب المحسوبية وبعد مجهود كبير كان أغلب المعلمين يقومون بالدعاء على الكمبيوتر وعلى من صمم البرنامج ههههه لأن المسئول الاداري بالتعليم وقتها رفض طلبي بوضع شرط للتوزيع أن لا يبتعد المعلم عن محل سكنه بالوحدة المحلية لوحدة محلية أخرى فكان تجمع حاشد من المعلمين لتقديم اعتذارات عن المشاركة باللجان وقالوا الكمبيوتر مش عارف يوزع ومش يراعي ظروف الناس علشان كده قلت لك خلي بالك وضع نفسك مكان المتأثرين بتنفيذ البرنامج حتى لو كانوا مدخلي البيانات هو انت الى كنت عامل البرنامج .... كفشناك ..... ههههههههه ..... 2
khasem قام بنشر مايو 30, 2020 الكاتب قام بنشر مايو 30, 2020 (معدل) 4 minutes ago, ابو البشر said: هو انت الى كنت عامل البرنامج .... كفشناك ..... ههههههههه ..... عزيزي ابو البشر السلام عليكم كلكم خير وبركة ان شاء الله نتعلم منكم والجزاء من رب لايضيع عنده اجر من احسن عملا تم تعديل مايو 30, 2020 بواسطه khasem 1 1
Gamal.Saad قام بنشر مايو 30, 2020 قام بنشر مايو 30, 2020 19 دقائق مضت, ابو البشر said: هو انت الى كنت عامل البرنامج .... كفشناك ..... ههههههههه . ههههههه ياباشا أنا مليش دعوة ، هما اللي طلبوا مساعدة الكمبيوتر منذ ساعه, khasem said: هل من الممكن وضع كل قطاع في ورقة مع خلاصته اي اعداد طلاب كل صف في القطاع من خصائص Group رقم القطاع اختر كما بالصورة : توزيع 24.accdb 2
khasem قام بنشر مايو 30, 2020 الكاتب قام بنشر مايو 30, 2020 لماذا اصبحت عمودين استاذ القاعة من ثلاث اعمدة
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.