rudwan

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

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

أخي الصق الكود كما هو , و غير اسم الحقل MyDate الى اسم حقل التاريخ الذي عندك

السلام عليكم المؤقت , أو Timer هو حدث موجود في النموذج و ليس أداة , و هو موجود كما يلي : Private Sub form_timer() - الشروط هنا End Sub لكن يجب تحديد سرعة المؤقت , التي يتم التحكم بها عن طريق Timer Interval حيث كل 1000 وحدة منه تعادل ثانية زمنية و هذا مثال على طريقة التحكم بالمؤقت المؤقت

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

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

اعمل استعلام و خذ الجدول الأول , اختر منه أي حقل من الحقول و اختر استعلام تجميع و من معايير التجميع في الأسفل اختر عدد , يعطيك عدد السجلات في ذلك الجدول

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

السلام عليكم أقصد الملف الذي أرفقته لك , ماهو التعديل المطلوب عمله ؟

لو ترغبين الآن بطرح استفسارك لامانع

السلام عليكم انظر طريقة عمل التراكمي في الاستعلام في الملف المرفق , و منه تعمل التقرير المطلوب Accumulated.rar

عافاك الله أخي أبو آدم و أرجو أن تطمئننا عنك أولا بالشفاء العاجل

السلام عليكم عذرا لم أتمكن من المتابعة في ذلك اليوم بسبب انتهاء الدوام في مكتبي عموما يمكن أن نتواصل ان شا الله يوم السبت , لكن أرجو قبل الساعة الرابعة عصرا حيث ينتهي عملي . أما الملف المرفق أخيرا فهو مختلف عن الأول , فأي منهم سيتم الاعتماد عليه ؟

السلام عليكم حبة حبة علي :( أرجو التفصيل أكثر

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

الشكر ليس مهما , لكن المهم هو حصول الفائدة حيث كما قلتي و أود الاشارة الى أن كود النقل الى مرحلة أعلى يعتمد على الرسوب في ثلاث مواد فقط على الأكثر , فهل هذا سليم ؟

الخصم عادي و ممكن تخصم نسبة من الراتب حتى تصل الى صفر لكن السؤال ماهي بنية جداولك في الملف ؟ كل الجداول

السلام عليكم جرب هذا الكود في النموذج في حدث قبل التعديل private sub form_beforeubdate(cancel as integer) if datediff("m",now(),"MyDate") =1 and day(now())<4 then cancel=false else if month(now())=month(MyDate) then cancel=false else cancel=true end if end if end sub حيث MyDate هي اسم حقل التاريخ في النموذج

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

وجدت خطأ في الأكواد الخاصة بالوحدة النمطية تم تعديل المرفق MALAK1_XP.rar

شكرا لجهودك يا أخ أحمد و بارك الله فيك

السلام عليكم هذا الملف بعد اجراء التعديلات في الجداول و العلاقات و الاستعلامات طبعا قد يكون هناك أخطاء و لكن لن يتم اكتشافها الا اثناء التجريب , لذا أرجو التجربة و اخباري في حال وجود نقص أو أخطاء آلية سير البرنامج : - النماذج القديمة كلها الآن بحاجة للتعديل نظرا لتعديل جميع الجداول -النموذج الرئيسي هنا و اسمه Exams و هو الذي سيتم بناء عليه ادخال نتائج الامتحانات و الطريقة هي : ادخال تاريخ الامتحان , رقم القسم - اسم المادة في النموذج الرئيسي مع العلم أن حقلي السنة YearFrom - YearTo هما عبارة عن رقمي السنة الهجرية للفصل الدراسي و يأخذان قيمة افتراضية من الجدول Years و هي 1427 - 1428 حيث سيتم لاحقا دمج هذين الحقلين في حقل واحد بالاستعلام و اسمه العام الدراسي في النموذج الفرعي سيتم اختيار أسماء الطلبة و كتابة نتائج الامتحانات الأربعة , أما مجموع الاختبارات لكل مادة موجود بالاستعلامات و بذلك فان كل امتحان ( في النموذج الرئيسي ) هو عبارة عن امتحان المادة التي سيتم الاختبار بها , و تفصيل نتائج الطلاب في النموذج الفرعي - شرح الاستعلامات : QryAllResults نتائج امتحانات جميع الطلاب QryAllSuccess نتائج امتحانات جميع الطلاب المجتازون للمادة ( النجاح على مستوى المادة ) QryCurrYearResults جميع نتائج الطلاب في امتحانات العام الدراسي الحالي QryCurrYearSummaryResults جدول نتائج الطلاب بشكل أفقي - العام الحالي QryFailed نتائج الطلاب غير المجتازون للمادة ( الرسوب على مستوى المادة )- العام الحالي QryPassed الطلاب الناجحون لصفوف أعلى مع عدد المواد الناجحون بها- العام الحالي QryStudentResults جدول نتائج جميع الطلاب على مستوى جميع الأعوام QrySubjectDue1 جميع المواد التي قدمها الطالب سابقا و المكلف بها حاليا ( مواد السنة الحالية مضافا اليها مواد الأعوام السابقة ) QrySubjectDueForStudent المواد المكلف بها الطالب والتي لم يتقدم لها بعد QrySuccess نتائج الطلاب المجتازون للمادة على مستوى العام الحالي الماكرو SetStudents يقوم بترقية الطلاب الناجحون الى صفوف أعلى مع تحديث حقل الصف في جدول الطلاب حسب النتائج ( متخرج - ناجح - منقول بمواد - راسب ) و هذا يتم تشغيله فقط حين انتهاء ادخال جميع نتائج امتحانات الطلاب في نهاية العام الدراسي و بعده ينبغي اضافة سجل جديد الى حقل السنوات في جدول Years مع نقل المؤشر الى العام الجديد طبعا كما ذكرت أن الملف بحاجة لادخال بيانات جديدة حتى يتم التأكد من تحقيق المطلوب , فقد يكون هناك نواقص ينبغي ادراجها تحياتي تم حذف المرفق وتحميله في المشاركة التالية

طيب عدلي الكود الأول الى مايلي : Dim A As String A = DLookup("[password]", "user", "[UserName]=" & [UserName])

السلام عليكم تم عمل أغلب الجداول و الاستعلامات , و سأقوم ان شاء الله بتنزيل الملف غدا

ضع كود تصغير النموذج المنبثق قبل كود فتح الاستعلام DoCmd.Minimize اذا كان هذا الحل يناسبك لأن الاستعلام لايكون منبثقا الا اذا كان ضمن نموذج صفحة بيانات