ابوخليل

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

اسم الطالب موجود فعلا وارى انه لا فرق بين ان يكون مقطعا او كاملا تم اضافة حقل يجمع الاسم الشيء المهم : اراك رجعت الى التسميات بالحروف العربية ؟ 1-اعد تسمية النماذج 2-يوجد حقلين في جدول الطلاب اعد تسميتهما ايضا نموزج 03.rar

في صندوق الادوات فعل ايقونة تفعيل عناصر التحكم انظر الصورة

في الشرط اعلاه يجب ان يكون نوع الحقل ID نصي اما اذا كان نوع حقل ID رقمي يجب ان تكون صيغة الكود هكذا : txtname.Value = DLookup("[date_open]", "tbl_pro", "ID=" & Me.txtserch )

تم غلق الموضوع لمخالفته لقوانين المشاركة 1- طلب المساعدة من شخص بعينه 1- احتواء المشاركة على اكثر من طلب

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

الربط بين جدول الاداره والمحافظه لم ينجح معى ولا اعرف السبب اجعل الحقل في جدول المحافظات مفهرس = نعم بدون تكرار العلاقات الباقيه بين المدارس ونوع التعليم يعنى هل المدرسه تعليم ابتدائي ام اعداداى ام ثانوى هل احذفها ايضا اذا كنت ستعمل احصائيات لمدارس مصر فاترك العلاقة وعل كل حال جميع جداول المحافظات والادارات والمدارس هي جداول خدمية داخل مشروعك فأرى انك تركنها على جنب الى نهاية مشروعك وتكتفي بحافظة وحدة وادارتين مثلا و10 مدارس والسبب الحجم الكبير في المثال وقدامك اعمال كثيرة من نماذج وتقارير ونحوه ابو الاء لو سمحت اشرح آلية عمل البرنامج مفصلا ماهي البيانات التي سيدخلها المستخدم ؟ وما هي النتائج المطلوب اظهارها ؟

يجب استبعاد الجداول القديمة ثانيا : احذف جميع العلاقات الموجودة ثالثا : اربط علاقة بين جدول المحافظات وجدول الادارات رأس لاطراف مع التكامل المرجعي رابعا : اربط علاقة بين جدول الادارات وجدول المدارس رأس لاطراف مع التكامل المرجعي

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

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

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

ليس جدولا بل حقل في جدول الطلاب بالضبط كما عملت حقل السنة في جدول المدرسة ان كانت تسبب زحمة خاصة عند البحث عن مدرسة فلا باس بحذفها ويمكنك اضافة ما يستجد لاحقا عند الحاجة

Private Sub txt1_Exit(Cancel As Integer) If IsNull(Me![txt1]) Then MsgBox "لا يمكن ترك الحقل فارغا ", vbCritical, "رسالة تنبية" Cancel = -1 End If End Sub اترك الحقول كما هي في الجداول وفي النماذج فقط استخدم هذا الكود في حدث الخروج من الحقل هذا الكود يمنع المستخدم من الخروج الا بعد الكتابة في الحقل

المرفق يحتوي على الجداول المذكورة تاريخ الالتحاق نعم اما العام الدراسي الحالي فمكانه جدول المدرسة db1.rar

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

عجيب !! كتبت لك في وقت سابق يبدو اني خرجت ولم احفظ نعم اضفهم في جداولك .. نسخ ولصق

هذا هو الكود الذي طلبت ضعه في الحدث المناسب سيغير القيمة في السداسي العشري الى 300 Dim objWShell Set objWShell = CreateObject("WScript.Shell") objWShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows\CSDVersion", 768, "REG_DWORD" وهذا كود الاسترجاع سيغير القيمة في السداسي العشري الى 200 Dim objWShell Set objWShell = CreateObject("WScript.Shell") objWShell.RegWrite "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows\CSDVersion", 512, "REG_DWORD"

الحمد لله وشكرا على المعلومة

انظر الاستعلامات تمعن ودقق لعلك تخرج بتصور صحيح saeyd-17.rar

الادارة المنقول منها ؟؟ يلزم جدول للادارات للاختيار منه هذا الجدول TP_inOrOwtSchool زائد عندي لك حلا سريعا قم بتعبئة الجداول ببيانات كافية للتطبيق والتجربة ، حتى استطيع ان اجيب على تساؤلاتك

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

معليش ابو آلا .. تحل بالصبر اكرر ... انت قلت ان الادارة واحدة فلماذا حقل الادارة المحول منها او اليها في جدول الطلاب ؟ ثانيا خانة نعم لا للمحولين من والى : فالمؤشر عليها للمنقول من المدرسة ويدرج اسم المدرسة المنقول اليها اما المنقول الى المدرسة فتبقى الخانة خالية ويدرج اسم المدرسة المنقول منها وطبعا هناك طلاب مستجدون فهؤلاء تبقى خانة الاختيار خالية وحقل المدرسة خالي بكذا تستطيع التصفية لا حقا وتستطيع اظهار طلاب المدرسة الموجودين وكذلك اخفاء المنقولين لذا سيكون حقل حالة التحويل زائد

جدول المدرسة هو جدول بيانات المدرسة الحالية والبيانات فيه ثابتة وما دمت تقول ان الادارة واحدة إذا : 1- حقل المدرسة في جدول الطلاب زائد 2- حقل الادارة في جدول الطلاب زائد 3- تحتاج جدولا بالمدارس الاخرى التي قد ينتقل الطالب اليها وحقلا رقميا للمدرسة تلك في جدول الطلاب 4- خانة اختيار في جدول الطلاب لتفعيل النقل من عدمه 5- حقل منقول من والى يكون رقميا 1 أو 2 (مربع تحرير )

ما يلزم المسألة وما فيها اننا نتحاشى الارقام من 1 الى 9 لوحدها لان الواحد موجود في 11 ، 12 51 ، 101 ........ وهكذا باقي الارقام المفردة كما ان 14 موجود في 114 ، 140 ... وعند استخدام like في التصفية تظهر جميع هذه السجلات التي يتواجد فيها هذا الجزء بالنسبة للتحويلات لم استوعب الشرح هل هو انتقال من مدرسة الى اخرى ام هو ترقية الى صف اعلى امل زيادة الايضاح

نعم .. صحيح تحتاج الى جدولين واحد للادارات والاخر للمدارس ونربط بيمهما بعلاقة رأس لاطراف وتكون قيمتهما داخل جدول الطلاب رقمية ربما تقول ان الادارات ككثيرة والمدارس اكثر فمن سيحيط بها نقول اننا سنرصد كل ما يرد الينا اولا بأول الشيء الآخر وهو مهم جدا وهو يجب استبدال معرفات الجداول من ارقام تلقائية تبدأ من واحد نستبدلها بارقام نحن نضعها وتبدأ من 11 على الاقل والافضل ان تكون تبدأ من فوق المائة والسبب هو ما ستواجهه من مشاكل مستقبلا عند التصفية والبحث خاصة عند استخدام like شيء في نفسي في مسألة منقول من ومنقول الى اشرح لي آلية العمل بها