haniameen قام بنشر فبراير 9, 2021 مشاركة قام بنشر فبراير 9, 2021 (معدل) السلام عليكم اساتذتي في هذا المنتدى لدي استعلام اسمه min به حقل اسم المراقب وكود المراقب المطلوب عمل نموذج يتم من خلاله التبديل يدويا في اللجان بين المراقبين نتيجة وجود موانع تطرأ فجأة مثلا نظرا لبعد المكان او وجود موانع اخرى مثلا : عندي مراقب اسمه هاني ولجنته في اليوم الأول هي المدرسة الفندقية بالاقصر وعندي مراقب ثاني اسمه عبد الكريم ولجنته في اليوم الأول هي مدرسة الشهداء الابتدائية بالطود المطلوب مثلا تبديل لجنة هاني لتصبح مدرسة الشهداء الابتدائية بالطود ولجنة عبد الكريم لتصبح المدرسة الفندقية بالاقصر طبعا مع تغير حقل lagnah_code و edara و school تلقائيا عند تغيير اللجنة ارجو ان اكون قد اوصلت فكرتي لأساتذتي في هذا المنتى tabdeel.mdb تم تعديل فبراير 9, 2021 بواسطه haniameen رابط هذا التعليق شارك More sharing options...
husamwahab قام بنشر فبراير 9, 2021 مشاركة قام بنشر فبراير 9, 2021 تفضل التعديل ارجو ان يكون طلبك tabdeel-1.rar 2 رابط هذا التعليق شارك More sharing options...
haniameen قام بنشر فبراير 9, 2021 الكاتب مشاركة قام بنشر فبراير 9, 2021 1 hour ago, husamwahab said: تفضل التعديل ارجو ان يكون طلبك tabdeel-1.rar 44.28 kB · 0 downloads شكرا اخي حسام جاري التجريب رابط هذا التعليق شارك More sharing options...
haniameen قام بنشر فبراير 10, 2021 الكاتب مشاركة قام بنشر فبراير 10, 2021 23 hours ago, husamwahab said: تفضل التعديل ارجو ان يكون طلبك tabdeel-1.rar 44.28 kB · 7 downloads شكر ا اخي حسام ولكن كنت أتمنى عندما اختار لجنتين مثلا عن طريق مربع اختيار يكون هناك امر بالتبديل بينهم ان امكن 1 رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر فبراير 11, 2021 مشاركة قام بنشر فبراير 11, 2021 بعد اذن اخي حسام انت بحاجة لمثل هذا Dim rs1 As DAO.Recordset: Dim rs2 As DAO.Recordset Set rs1 = CurrentDb.OpenRecordset("SELECT ........")'استعلام يظهر المراقب الأول حسب اليوم Set rs2 = CurrentDb.OpenRecordset("SELECT ........")'استعلام يظهر المراقب الثاني حسب اليوم rs1.Edit: rs1!tech_code = المراقب الثاني rs2.Edit: rs2!tech_code = المراقب الأول rs1.Update: rs2.Update لاحظ انه غالبا يصعب تمرير المعايير لنموذج غير منضم داخل الاستعلام ، لذا نلجأ الى انشاء وحدات نمطية عامة كوسيط tabdeel2.rar 4 1 رابط هذا التعليق شارك More sharing options...
haniameen قام بنشر فبراير 11, 2021 الكاتب مشاركة قام بنشر فبراير 11, 2021 12 hours ago, ابوخليل said: بعد اذن اخي حسام انت بحاجة لمثل هذا Dim rs1 As DAO.Recordset: Dim rs2 As DAO.Recordset Set rs1 = CurrentDb.OpenRecordset("SELECT ........")'استعلام يظهر المراقب الأول حسب اليوم Set rs2 = CurrentDb.OpenRecordset("SELECT ........")'استعلام يظهر المراقب الثاني حسب اليوم rs1.Edit: rs1!tech_code = المراقب الثاني rs2.Edit: rs2!tech_code = المراقب الأول rs1.Update: rs2.Update لاحظ انه غالبا يصعب تمرير المعايير لنموذج غير منضم داخل الاستعلام ، لذا نلجأ الى انشاء وحدات نمطية عامة كوسيط tabdeel2.rar 34.14 kB · 1 download الصراحة حاجة جميلة أخي ابو خليل روعة في الأداء سهولة وبساطة الكود سرعة في التنفيذ جزاك الله خيرا اخي ابو خليل وحفظكم الله ورعاكم ودمتم في الخير واعلاء كلمة هذا المنتدى وشكري لأاخي حسام على مجهوده 1 رابط هذا التعليق شارك More sharing options...
ابوبسمله قام بنشر فبراير 12, 2021 مشاركة قام بنشر فبراير 12, 2021 جزاكم الله خيرا اخوانى واساتذتى @ابوخليل و @husamwahab 💐 1 2 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.