ابوخليل

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

ان كان الملف المرفق هو قاعدة الجداول الخلفية فإن النموذج سيكون ضمن القاعدة الأمامية ويمكنك اخذ نسخة من قاعدة الجداول البعيدة عند كل اغلاق للقاعدة الامامية

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

If Time() = #10:00:00 AM# Then Call myFunction End If myFunction استبدل هذه بالوحدة النمطية التي عندك الوحدة النمطية لا تعمل الا عند النداء اي الحدث والاحداث توجد في النماذج والمايكروات والتقارير اما عداد الزمن فيختص به النموذج فقط هذا ما اعلمه ،،،

آمين ولك بالمثل

هل تقصد ترحيل الطلاب من صف الى صف مثلا من الرابع الى الخامس ؟

من خصائص النموذج / لسان التبويب : تنسيق يوجد قيمة اسمها : صورة ادرج فيها الصورة التي تريد

الاغلاق دائما يتم من خلال النموذج والمرفق لا يحتوي على نموذج ؟

- طلب المساعدة فى : يغلق ،،، الموضوع مخالف لقواعد المشاركة الرجاء الاكتفاء بسؤال او استفسار واحد فقط في الموضوع الواحد اخي الكريم يمكنك رفع السؤال مرة اخرى

في تايمر الفورم اعني عداد الوقت في النموذج اضبط الفاصل الزمني لعداد الوقت على اي شيء مثلا ثانية واحدة =1000 او حتى دقيقة 60000 ثم في حدث form_Timer اكتب مثل هذا : If Time() = #10:00:00 AM# Then Call myFunction End If مع الاخذ بالاعتبار ان النموذج يجب ان يكون مفتوحا في هذا الوقت وهذا يعني ان الكود سيكون في نموذج الواجهة الرئيسي

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

آمين ولك مثل ذلك

انظر التعديل ان كان يوافق طلبك فأكمل على النسق نفسه student8.rar

تفضل student7.rar

في هذه الحالة لا بد ان تستخدم الاستعلام الفرعي ويمكنك جلب هذه النتيجة من الاستعلام الرئيس في اي مكان من مشروعك بواسطة Dco sa4.rar

يمكن الحل باستخدام استعلام تجميعي او بتوظيف الدالة dcount وفي بعض الحالات نستخدمهما جميعا انظر ان كان الحل يفي بالمطلوب والا ارفع المثال بكمية مناسبة من البيانات sa3.rar

حول الملف على صيغة mdb

تم فصل الموضوع للفائدة الاخ السائل يطلب تحويل البيانات من عمودي الى افقي ؟ وليس فصل بيانات عمود الى اعمدة

احد الحلول لابقاء المؤشر داخل حقل معين : قم بإيقاف علامة الجدولة من جميع الحقول ما عدا حقل البحث خصائص الحقل /لسان التبويب : غير ذلك غير القيم في جميع حقول النموذج النشطة كالتالي : ايقاف علامة الجدولة =لا اما حقل البحث فاجعله : ايقاف علامة الجدولة =نعم فهرس علامة الجدولة = صفر

على قولهم : احسن اعلمك تصيد هذه القوائم خاصة بأكسس 2003 الاصدارات الاحدث تعمل بطريقة اخرى ابحث عن قوائم 2007

لا عبقير ولا عبقور فقد نقلت لك الحل من الامثلة السابقة Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer) AccessTotalsExpr2 = 0 End Sub في الكود اعلاه وفي رأس الصفحة جعلنا قيمة حقل الجمع تساوي صفر حتى نقطع الصلة مع الصفحة السابقة ونبدأ من جديد Private Sub ÊÝÕíá_Print(Cancel As Integer, PrintCount As Integer) AccessTotalsExpr2 = AccessTotalsExpr2 + Expr2 End Sub وفي مقطع التفصيل جعلنا حقل المجموع = حقل المجموع نفسه + السعر لا حظ ان الجمع سيكون تراكميا بعدد حقول السعر فلو فرضنا ان قيم حقول السعر هي 1 ، 2 ، 3 ، 4.... هكذا ففي الحقل الاول ستكون القيمة = صفر+1 =1 والثاني = 1+ 2=3 والثالث= 3+3=6 والرابع = 6+4=10 وهكذا ....... فآخر عملية هي القيمة النهائية لمجموع الصفحة آمل اني قد بينت ووضحت بعض الاشكالات التي لديك

اما ان اردت الادخال المستمر عبر القارىء بدون تدخل منك فيجب ان تستخدم حدث بعد التحديث اجعل السطرين التاليين في آخر الحدث Private Sub text1_AfterUpdate() ' ' ' ' ' text1 = "" text1.SetFocus End Sub

هل تعني مثل هذا ؟ sa22.rar

تفضل sa2.rar

عذرا اخي حسين جهازي لا يفتح الا صيغة mdb