كل الانشطه

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

السلام عليكم اخوتي الاعزاء... ماهي اعدادات تقرير فاتورة لطابعة حرارية مع التقدير والاحترام

كل الحب والوفاء وبأرق كلمات الشكر والثناء، ومن قلوب ملؤها الإخاء نتقدم بالشكر على تفانيكم في عملكم...جزاكم الله خيرا

تمام سنعمل على المرحلة الأولى .. بعد اكتمال البرنامج .. وعندما تريد العمل عليه .. يجب ان تضيف جميع المراحل ملحوظة : عملت درجة الرأفة امام المادة حتى يصبح البرنامج شاملا مرنا حيث يمكنك تخصيص هذه الدرجة حسب مادة معينة ومرحلة معينة وفرع معين مثلا امنح 10 لمادة التربية الاسلامية المرحلة الثالثة فرع الزراعي فقط ....... انتظرني .. اعد لك فورم ادخال الدرجات

تم data5.rar

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

مثل للجدول لجمع درجات المواد data4.rar

انظر في المثال الى كيفية اعداد المواد .. عملت لك التربية الاسلامية data3.rar

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

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

الدرجة الكبرى لكل المواد(100) والصغرى(50) درجات النجاح ومن (45الى49) يعتبر مكمل ويحتاج الى درجة الرافه التي مقدرها(5) درجات تستخدم لحد اقصى ثلاث مواد لكل طالب بحيث شرط ان تكون درجات الطالب للمواد الثلاثه مثلا (49، 48،48) ليكون مجموع درجة الرافه (5) درجات لثلاث مواد واذا الطالب مكمل في مادتين شرط ان يتم توزيع ضمن حدود (5) درجات فقط مثلا (47 و48) لتتغير حالة الطالب الى النجاج واذا اكثر من ثلاث مواد او تتكون درجة الرافه اكبر من (5) درجات يعتبر راسباً مثلا( 48 و48 و45) يتم معالجة مادتين فقط لتغير حالة الطالب من راسب الى مكمل وكل مادة تسخدم درجة الرافه تشطب الدرجة السابقة وتوضح الدرجة الجديدة بعد استخدام درجة الرافه...واسف للاطاله data2.rar

هناك ملاحظتين : 1. الاكسس لا يستطيع تكوين حقل نص او اي حقل آخر اثناء العرض ، فتكوين الحقول تتم فقط في وضع التصميم ، لذا ومن التجربة ، ترى اني وضعت في النموذج 38 حقل نص جاهزين للعمل. 2. وفي التقرير ، الاكسس لا يستطيع ان يجعل التقرير عمودي او افقي برمجيا (ونصيحة ، لا تهدر وقتك بمحاولاتك) ، لذا اعمل تقريرين ، افقي وعمودي ، واجعل في النموذج زرين: واحد لطباعة التقرير افقيا ، والاخر لطباعة التقرير عموديا.

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

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

وعليكم السلام ورحمة الله وبركاته ,, أحد الحلول التي قد تخطر ببال أي أحد ، هو الضغط والإصلاح ، ولكني اعتقد أنها لن تفيدك بشيء . وهنا سيكون هناك مقترح آخر وهو ، استيراد عناصر ومكونات قاعدة البيانات هذه الى قاعدة بيانات جديدة .

لدي قاعدة بيانات اكسس عند فتحها تظهر هذه الرسالة ممكن أعرف ماذا تعني ؟ جزاكم الله خيرا

خبراء الاكسيل الأفاضل بحكم خبرتى المتواضعه بالاكسيس مش فاهم تعليقات العمالقة ابو خليل Foksh واية المطلوب منى اعملة عشان البرنامج يعمل بكفاءة

استاذ خليل تمت المراجعة وحيث تم اضافة حقل لجدول Tbl_degree_Detail. وهناك ملاحظة استاذ، درجات الطلبة يتطلب ان يتم فرز نتائجهم حسب الفرع والاختصاص والمرحلة بالاضافة الى نسب النجاح والطلبة المكملون والراسبون لكل فرع واختصاص والمرحلة......... iq-Vocational preparatory school.rar

نعم/ الاختبارات التحريرية هي... الفصل الأول - نصف السنة-الفصل الثاني - درجة الامتحان النهائي-ثم دور ثاني للطالب درجة الاكمال

على كل حال عملت لك الجداول حسب فهمي اذا يوجد تعديلات سنعملها لاحقا الآن تصفح المرفق وانظر في جميع الجداول .. اي ملاحظات تجدها زودنا بها سجلت لك 5 طلاب سيكونوا باكورة العمل المهم أمامك الآن ان ترصد موادك وتفاصيلها : افتح جدول المواد Tbl_materil ثم اضف المواد كلها اما تخصيص المراحل فعلى النحو التالي : بواسطة علامة الزائد امام كل مادة أكمل البيانات .. كما عملت لك في مادة اللغة العربية والانجليزية .... انتظر اتمامك للعمل ورفع الملاحظات مع المرفق النهائي iraqSchool.rar

التجربة الأولى ناجحة ولله الحمد 🙂 بس لما رجعت أجرب نفس الكود السابق حصلت على نفس النتيجة السابقة 😅 Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As _ Long Private Const KEYEVENTF_KEYUP = &H2 ' Get the current state of the NumLock key Function GetNumLockKey() As Boolean GetNumLockKey = GetKeyState(vbKeyNumlock) End Function Sub SetNumLockKey(ByVal newState As Boolean) ' if the current state must be changed If CBool(GetKeyState(vbKeyNumlock)) <> newState Then ' programmatically press and release the NumLock key keybd_event vbKeyNumlock, 0, 0, 0 keybd_event vbKeyNumlock, 0, KEYEVENTF_KEYUP, 0 End If End Sub والنتيجة : '=================================================== ' API Code Converter for Dual Compatibility (32-bit & 64-bit) ' Developed By Foksh (Officena.Net) ' Generated on: 2025-06-10 17:43:10 ' Tool version: v1.3 '=================================================== Private Const KEYEVENTF_KEYUP = &H2 ' Get the current state of the NumLock key Function GetNumLockKey() As Boolean GetNumLockKey = GetKeyState(vbKeyNumlock) End Function Sub SetNumLockKey(ByVal newState As Boolean) ' if the current state must be changed If CBool(GetKeyState(vbKeyNumlock)) <> newState Then ' programmatically press and release the NumLock key keybd_event vbKeyNumlock, 0, 0, 0 keybd_event vbKeyNumlock, 0, KEYEVENTF_KEYUP, 0 End If End Sub #If VBA7 Then ' 64-bit declarations Private Declare PtrSafe Sub keybd_event Lib "user32" (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As LongPtr) Private Declare PtrSafe Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As _ Long #Else ' 32-bit declarations Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, _ ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As _ Long #End If الترتيب غير صحيح .. المفروض : الثوابت ثم -----> دالة ال API ثم -----> الدالة الفرعية

هذه غير واضحة .. وبحاجة الى تفصيل ... كم اختبار تحريري في السنة ؟ هل هو ثلاثة : فصل اول / فصل ثاني / اختبار نهائي >>>>> تحريري؟ بغض النظر عن المعدل والدرجة النهائية هذه نتائج وليست اختبارات

ملاحظة استاذ ابوخليل الفرع التجاري ١٢مادة الفرع الصناعي للمرحلة الأول والثاني (١١) مادة الفرع الصناعي للمرحلة الثالثك(٩) مواد

كهرباء، أجهزة طبية، مساحة، سيارة وسيارات، ميكانيك

النتيجة واحدة مؤكدة ، وفعلاً لا فرق بينهما في النتيجة .. مع العلم أن استخدامك للتجميع مباشرةً أفضل من ناحية الأداء مقارنة مع تضميني للشروط في استعلامي ، ( طبعاً التجميع في موضعه مناسب أكثر ،والسبب لعدم وجود دوال تجميع مثل "Sum" أو غيرها ) على سبيل المثال. أما فيما يتعلق بمثال الأخ @jo_2010 الأخير ، فهنا ويا حبذا منك أن تعيد صياغة المطلوب بشكل أوضح لخطوات المشكلة الثانية التي تواجهها . وليس فقط من خلال الصور التي ارسلتها . وإنما لخطوات العمل على مشروعك حتى تتبين لنا المشكلة بعينها .