safenaz قام بنشر سبتمبر 1, 2017 قام بنشر سبتمبر 1, 2017 السلام عليكم لدي نموذج الحقول فيه من عدة جداول مرتبطة ببعضها بعلاقات اريد عند فتح النموذج الذهاب إلى السجل الأخير المحفوظ ولكن عندما يفتح النموذج احلاظ بانه لا يظهر السجل الأخير فسؤالي على اي أساس يختار النموذج السجل الأخير ومن اي جدول وشكرا لكم
ابوخليل قام بنشر سبتمبر 1, 2017 قام بنشر سبتمبر 1, 2017 5 ساعات مضت, safenaz said: السلام عليكم لدي نموذج الحقول فيه من عدة جداول مرتبطة ببعضها بعلاقات لم توضح طريقة اتصال هذا النموذج بالجداول ؟ اذا المصدر لهذا النموذج استعلام يجمع هذه الجداول فيمكنك الوصول الى السجل الاخير باستخدام احد الدالتين : Dmax اذا يوجد ترقيم تلقائي بحيث ترجع الدالة اكبر رقم تم تسجيله او الدالة Dlast للذهاب الى آخر سجل وقبل كل هذا جرب اولا استخدام هذا الامر DoCmd.GoToRecord , , acLast 1
safenaz قام بنشر سبتمبر 2, 2017 الكاتب قام بنشر سبتمبر 2, 2017 شكرا لتعاونك وردك على سؤالي ابوخليل عند استخدام DoCmd.GoToRecord , , acLast اعطى نفس النتيجة ولا يظهر آخر سجل تم ادخاله الدالة dmax كتبت الكود التالي عند فتح النموذج Me.ChitN = DMax("[ChitN]", "invoices") ChitN رقم الفاتورة وهو الحقل الذي يعبر عن آخر سجل تم ادخاله invoices الجدول أين الخطأ في الكود حيث ان النموذج بهذه الحالة لم يعد يفتح ؟
ابوخليل قام بنشر سبتمبر 2, 2017 قام بنشر سبتمبر 2, 2017 اكتب الكود هكذا Private Sub Form_Open(Cancel As Integer) Dim i As Integer i = DMax("[ChitN]", "invoices") DoCmd.GoToRecord , , , i End Sub واذا كان رقم الفاتورة نصي يصبح الاعلان هكذا : Dim i As String اوارفق مثالك لنطلع عليه عن قرب حيث ذكرت ان مصدر النموذج اكثر من جدول
safenaz قام بنشر سبتمبر 2, 2017 الكاتب قام بنشر سبتمبر 2, 2017 تفضل هي نسخة من قاعدة البيانات نلاحظ عند وضع الكود لا يفتح النموذج new_invoice test3.rar
أفضل إجابة ابوخليل قام بنشر سبتمبر 2, 2017 أفضل إجابة قام بنشر سبتمبر 2, 2017 تم وضع الكود DoCmd.GoToRecord , , acLast عند حدث تحميل النموذج والكود هذا شغال والمشكلة كانت في التسلسل والفرز ، فأنا عملت فرز في الاستعلام جرب ووافني بالنتيجة test4.rar 1
safenaz قام بنشر سبتمبر 2, 2017 الكاتب قام بنشر سبتمبر 2, 2017 شكررررررررا كتير لالك تمام هيك عذبتك معي ولو سمحتلي ابقى استشيرك مرة اخرى باي مشكلة تواجهني الله يجزيك الخير
safenaz قام بنشر سبتمبر 6, 2017 الكاتب قام بنشر سبتمبر 6, 2017 السيد ابوخليل السلام عليكم اجريت بعض التعديلات على كود قبل التحديث لنموذج new_invoice تواجهني مشكلة في حال كان سجل جديد كلياً بكافة حقوله فإن استعلام النموذج الفرعي يكون فارغ وبالتالي أحد قيم النموذج الفرعي والذي استخدمه لتحقق صحة الادخال يكون فارغ وضعت كود في حال كان الحقلnull ولكن لم يكن الكود ناجح حيث لا يتم الانتقال لزر الحفظ ممكن الاطلاع والافادة لو سمحت وشكرا لك ا gaz2.rar
ابوخليل قام بنشر سبتمبر 7, 2017 قام بنشر سبتمبر 7, 2017 عليكم السلام واضح المشكلة في حقول الربط بين النموذج الرئيس والنموذج الفرعي ولكن قبل هذا اخي بارك الله فيك انت وقعت في مخالفة لقواعد المشاركة : 1- يجب ان يفرد كل سؤال جديد في موضوع جديد يخصه 2- توجيه السؤال لعامة الاعضاء وعدم ذكر اسماء ، حتى تحضى باهتمام الجميع اتمنى اعادة السؤال في مشاركة جديدة ، مع الشكر والتقدير
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.