تم التعديل كالتالي :
المربعات الصغيرة تم تحويلها من تسميات الى مربعات نصوص
استخدمنا الدالة Dcount لتجميع الوضع حسب انوع في خمس حقول ( هي الموجودة في جدول الموظفين ) وعليك اكمال البقية
ملحوظة : التسميات بحروف عربية تسبب ارباك عند كتابة الجملة البرمجية حيث تنقلب رأسا على عقب
انظر الى هذا السطر الخاص بمجموع م.يومي
=DCount("[الوضع]";"الموظفين";"[الوضع]='" & "م.يومي" & "'")
وانظر اليه حينما نستبدل م.يومي بحروف انجليزية كـــ xxxx
=DCount("[الوضع]";"الموظفين";"[الوضع]='" & "xxxx" & "'")
الى ترى ان الثاني واضح تماما
يكتب هذا السطر في مربع عنصر تحكم الحقل ، استبدل فقط الـــ xxxx بالقيمة الموجودة في حقل الوضع
db4.rar
اكتب هذا السطر في حدث عند فتح النموذج
DoCmd.GoToRecord , , acNewRec
ملحوظة : اجعل احد الحقول في خصائص الجدول ( مطلوب ) حتى تتلافى تكرار السجلات الفارغة
اقساط العرس.rar
الفارق : ان البيانات موزعة على ثلاث جداول
ما المشكلة ؟ فانت اولا قبل التوزيع في الاستعلام الجدولي بحاجة الى ضم و تجميع هذه الجداول سواء كان جدولا او استعلام تحديد او توحيد
نفترض أننا وجدنا طريقة فماذا سنعمل بــ بدر ، بدور ، حيدر ، داود ، عواد ........... الخ
لذا يتضح فائدة الاعتماد على الحقول المتعددة عند تسجيل الاسماء ، لاننا عند ضمها نكون تلافينا هذه الاخطاء
ايضا هناك ما يسمى بالاسم المركب مثل عبد الله ، بدر الدين ؛ فقد نضع مسافة فارغة بين جزئي الاسم وهذه يمكن ضبطها باستخدام الكود لعدم السماح بالمسافات الفارغة ،
ولكننا سنصطدم باسماء مركبة تستلزم وجود المسافة الفارغة بين شقي الاسم كـــ : صلاحالدين مثلا وهذا يوجب علينا اعتماد المسافة في جميع الاسماء المركبة
هذا رأي ، وكما ذكر اخونا الشمال بانتظار ما يدلي به الخبراء
الطريقة
جعلت مصدر النموذج الاساسي main استعلاما داخليا بدلا من الجدول
وللوصول اليه افتح خصائص النموذج / بيانات / مصدر عنصر التحكم . انقر النقاط الثلاث الموجودة الى يسار الحقل ليظهر لك الاستعلام .
( انظر الى المعايير في الاستعلام ، وانظر الى اماكنها حيث استخدمنا الخاصية "أو" )
الخطوة الثانية عند حدث التحديث لمربع البحث كتبت me.Requery لتحديث النموذج حسب المعيار المكتوب
هذا كل شيء ،،، آمل ان يكون هذا الشرح مفيد
لتحقيق المطلوب
لا بد ان تكون الحماية على مستوى الحقول لا على مستوى النموذج
ثم اكتب خلف الزر السطر التالي
Classifications.Form!NumberOfModel.Locked = False
Database2.rar
السلام عليكم
مشكلة مشابهةا حدثت معي ولكن مع التقارير وليس النماذج
حيث لم ادع طريقة للحل الا واستخدمتها وكل محاولاتي باءت بالفشل .
واحد هذه المحاولات اني اعدت تنصيب الاوفيس، ولم يتبق امامي الا الفورمات
واخيرا وجدت المشكلة وكانت في الطابعة . ( حذفتها واعدت تنصيبها من جديد )
عجيبة !! أليس كذلك ؟
استعلام التوحيد هو جمع الجداول أو حقول معينة منها في استعلام واحد شريطة التشابه في اسماء وعدد الحقول
وطريقة انشائه : بفرض وجود استعلامي تحديد
1- افتح استعلام التحديد الأول على عرض SQL ثم حدد جميع الاسطر الموجودة فيه ثم انسخها
2- افتح استعلام توحيد جديد ثم الصق ما نسخته داخله ثم انقر انتر لتنتقل الى سطر جديد
3- اكتب كلمة Union في السطر الجديد ثم انقر انتر لتنتقل الى سطرجديد
4- افتح استعلام التحديد الثاني على عرض sql وانسخ ما بداخله ثم الصقه في استعلام التوحيد تحت الكلمة السابقة
5- شغل الاستعلام لترى النتيجة
كما بينت لك سابقا ان بياناتك داخل الجداول ناقصة
في المرفق السابق وضعت لك في الجداول معرفا لما اسميته بالاسماء
وحسب طلبك الاخير انت بحاجة ايضا الى معرف للجداول
انظر النتيجة
db5.rar