تفضل اخوي ملفك بعد التعديل علية
و للمعلومية
سوف يعمل الكودبعد اول سجل يتم ادخاله عند فتح النموذج
ثانيا: يجب عليك اختيار نوع المعامله للسجل التالي لكي يعمل الكود
combo box.rar
اخوي
مصدر السجلات لمربع التحرير هوجدول يتكرر فيه اسماء الطلاب ، فامن الطبيعي تكرار الاسماء في مربع التحرير
لتجنب تكرر الاسماء
قم بانشاء مربع التحرير و في مصدر السجلات ضع جمله Sql التالية
SELECT distinct tblDegrees.StudentCode, tblDegrees.name
FROM tblDegrees ORDER BY tblDegrees.[name];
ثم اكمل بقيه العمل
ملاحظه:يوجد لديك اسماء طلاب مكرره ولكن بارقام سجل مدني مختلف فامن الطبيعي ظهور اسماء متشابهه بعداستخدام الجمله اعلاه
بالتوفيق
اخوي
دائما لايفضل تخزين ناتج العمليات الحسابيه في جدول الاكسس بل يستخدم استعلام او مربع نص غير معتمد على اي حقل
قم بوضع النمو>ج في وضع التصميم
ثم قم بانشاء مربع نص في النمو>ج بحيث لا يعتمد على اي حقل في الجدول
ثم اكتب = و العمليه الحسابية المارد عملها مثلا
=[اسم الحقل2]+[اسم الحقل2]
اخي الكريم
اولا لقد قمت بمخالفه قواعد المشاركه في المنتدى من حيث عنوان المشاركة.
ثانيا: ه>ا المنتدى للمساعده في حل المشاكل المتعلقه بالاكسس وليس تصميم البرامج للعضاء، فلا تتوقع اي اجابه من احد .
يجب عليك بناء القاعده بنفسك وا>ا صادفتك اي مشكله سوف تجد من يساعدك ان شاء الله كل حسب وقت فراغه
اخوي
عليك اولا قفل جميع الحقول الموجودة في النمو>ج و>لك عندحدث النمو>ج On Current او عند الحالي
و>لك باستخدام الكود التالي
me.name.locked=True
me.jop.locked=True
me.phone.locked=True
بعد >لك ا>هب الى الحدث On Duble Click لكل حقل واكتب الكود التالي
me.FieldName.locked=False
طبعا غير FieldName الى اسم الحقل مثل name و هك>ا
تفضل اخوي ملفك بعد التعديل عليه
طبعا لقد تم عمل ماكرو اسمه Run Delete Qry و وضعه في حدث عن النقر لزرالامر
انظر تصميم الماكرو
طبعا لا تنسى وضع شرط للاستعلام لكي يعمل
انظر المثال الموجود في الاستعلام
mmm1.rar
تفضل اخي الكريم المرفق بعد التعديل
راجع الاستعلام المسمى Marks Avg
حاول كذللك تجنب مسميات الحقول بالعربي
كذلك ارجوا عدم فتح عده موضيع لنفس السؤال ، فقط تابع الموضوع السابق الى ان يتم الحل
maq_edit5.zip
اخوي
طبيعي لا احد يرد على الموضوع
اذاالموضوع ضرووري ومهم الى هذي الدرجه ، على الاقل اشرح المشكله ، اشرح ماهو المعيار المحدد ، اسم الجداول و الحقول
اضف قاعده بيانات مع بعض الشرح.
بعد اذن المشرف العزيز
اخوي قم باكمال الكود الخاص بفتح النموذج كالتالي
If Me.aa > 0 Then
DoCmd.OpenForm "f2", , , , , acDialog
End If
حيث تم اضافه acDialog الى الكود
اخوي
المشكله ليست بالسيرفر او التطبيق
هل قاعدة البيانات مقسمه الى جزئين؟؟!! اذا نعم ضع الجزء الامامي (يحتوي على النماذج الاستعلامات....) على كل جهاز يستخدم القاعده، و الجزء الخلفي(يحتوي على الجداول فقط) على جهاز او سيرفر لايحتوي على الجزء الامامي
اتوقع القاعده ليست مقسمه و موضوعه على السيرفر لستخدام الكل
قاعده البيانات اكسس لايمكن مشاركتها لاكثر من مستخدم في الوقت نفسه مثل الاكسل و غيرها
الحل الوحيد هو تقسيمها كما ذكر اعلاه ومن ثم ربطها ببعض