mrnooo2000

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

اليك هذا البرنامج و هو من ابداعات الاستاذ رضا عقيل و يوفر لك كل ما تريد redaokailpro3.rar

اليك ماتريد تم تغيير الاسماء العربية لبعض الحقول الى الانجليزية لاحظ القيمة الافتراضية لحقل الرقم المتسلسل فى النموذج Database1.rar

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

ضع اسم مربع النص قبل علامة =

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

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

تفضل اخى استخدم هذا الكود =DLast("amount";"aa") db2.rar

بالتوفيق

ما دام الامر قد تم حله و تنتظر فقط هذه النقطة فبعد اذا الاخ عمانى غير صيغة حقل المجموع فى الاستعلام الى الاتى TotalWH: ((Val([mm])+Val([em]))\60)+[mh]+[eh] & ":" & ((Val([mm])+Val([em])) Mod 60) و بالتوفيق

و لكن انا مازلت لا اعرف ما سبب حاجتك الى ذلك ؟

جزاك الله خيرا اخ عمانى الاخ السائل اليك هذا المرفق ربما تجد به ما تستفيد منه و هو لا يختلف كثيرا عما تفضل به اخونا عمانى الحضور والإنصراف.rar

اذا كان العدد كبير كما تقول فيمكنك ان تضع هذه الخيارات فى جدول جديد بنفس اترتيب فى المجموعة و بعد ذلك يمكنك ربط هذا الجدول مع الجدول الرئيسى او استخراج القيم من الجدول باستخدام الدالة dlookup كما فى المرفق choice group.rar

اليك هذا المثال ضع هذا الكود فى حدث عند الضغط لزر امر و لاحظ ما سيحدث (يجب ان يكون لديك جدول باسم table1 و به حقل باسم names CurrentDb.Execute "SELECT table1.* INTO newtable FROM table1 ORDER BY table1.names;" او ضع هذا الكود فى الاستعلام بنفس الشروط السابقة S…

لاحظ الاستعلام db2.rar

طبق نفس الكود و لكن احذف الجزء الخاص بحذف السجل اى احذف هذين السطرين DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70

اليك المرفق ف.ع.rar

اخى كل ما تحتاج اليه هو حذف بيانات الجدول فى بداية الكود CurrentDb.Execute "delete * from tbl1 "

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

تفضل اخى اليك التعديل st.rar