jo_2010 قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 السادة الافاضل الخبراء عند عمل زر Requery عندما اكون فى السجل رقم 20 واضغط على مفتاح Requery ياتى بى الى السجل الاول اريد عند الضغط عليةيقوم بعمل Requery للنموذج واقف على نفس السجل اللى كنت واقف عندة وهو 20 مثلا رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 السلام عليكم برجاء وضع مرفق للنظر اين المشكلة بالضبط تحياتي رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 مشاركه لاخى @محمد ابوعبد الله شوف الرابط التالى لعلك تجد به ما تريد تقبل تحياتى وتمنياتى لك وللجميع بالتوفيق رابط هذا التعليق شارك More sharing options...
jo_2010 قام بنشر مارس 19, 2020 الكاتب مشاركة قام بنشر مارس 19, 2020 الاخ الفاضل محمد ابوعبد الله اليك القاعدة التى طلبتها Dental.accdb رابط هذا التعليق شارك More sharing options...
محمد أبوعبدالله قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 استبدل الكود كالتالي Me.Requery بهذا Me.Refresh كما انصحك باستبدال اسم زر الامر من Requery الى اي اسم اخر مثل XRequery تحياتي 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة kha9009lid قام بنشر مارس 19, 2020 أفضل إجابة مشاركة قام بنشر مارس 19, 2020 بعد اذن اساتذتنا الافاضل @أحمد الفلاحجى و @محمد ابوعبد الله اذا كنت ترغب في استخدام الامر Me.Requery يمكن عملها عن طريق Dim x As Integer x = CurrentRecord Me.Requery Me.PCode.SetFocus DoCmd.FindRecord x, acAnywhere, , acSearchAll حجز متغير باسم x المتغير يساوي السجل الحالي تحديث نقل التركيز للحقل pcode البحث عن السجل الى كنا واقفين عليه في خاصية النموذج حقل pcode كان غير ممكن وغيرته الى ممكن النموذج مرفق بالتأكيد توجد طرق اخرى ولكن هذا ماجاء على بالي واعذرني في حالة عدم الرد لا نشغالي في ضل الاوضاع الكرونية اجارنا الله جميعا منها Dental.accdb 2 1 رابط هذا التعليق شارك More sharing options...
Khalid Jnb قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 السلام عليكم مشاركة مع الاساتذه الاعزاء تفضل اخي الكريم اتمنى ان يكون المطلوب تحياتي Dental.rar 2 1 رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 السلام عليكم 🙂 اليكم طريقتي . وهذا هو الكود ، ولكن تذكر ان تحذف السطر الذي لا تريده : Dim ID As Long Dim ID As String ID = Me.txtID Me.Requery Me.RecordsetClone.FindFirst "[ID]=" & ID Me.RecordsetClone.FindFirst "[ID]='" & ID & "'" Me.Bookmark = Me.RecordsetClone.Bookmark . وهذه الطريقة اعلاه ، ولكنها غير مختصرة : . وهذا هو الكود ، ولكن تذكر ان تحذف السطر الذي لا تريده : Dim rst As dao. Recordset Dim ID As Long Dim ID As String ID=Me.txtID Me.Requery Set rst = Me.RecordsetClone rst.FindFirst "[ID]=" & ID rst.FindFirst "[ID]='" & ID & "'" Me.BookMark=rst.RecordsetClone.BookMark جعفر 3 1 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 استاذ @jjafferr دخلت لوضع شكر لمشاركتك وما وجدتها 😃 1 رابط هذا التعليق شارك More sharing options...
jjafferr قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 آسف اخوي خالد 🙂 بعد ان وضعت المشاركة ، واذا بها اخطاء في التنسيق ، فإستخدمت صلاحياتي ، وقمت بالتعديلات بعيد عن الاعين 🙂 عندنا مثل عماني يقول : اللي في يده القلم ، ما يكتب على عمره شقي 🙂 جعفر 1 1 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 جزاكم الله خيرا اخوانى واساتذتى @محمد ابوعبد الله @kha9009lid @jjafferr @خالد سيسكو 2 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر مارس 19, 2020 مشاركة قام بنشر مارس 19, 2020 24 دقائق مضت, jjafferr said: عندنا مثل عماني يقول : اللي في يده القلم ، ما يكتب على عمره شقي 🙂 ليت الامور بهذه السهولة اخي جعفر أبدًا يسطر، ما شاء، القلم ثم يمضى نافذ الحكم أصم ليس يمحو نصف سطر ورع لا ولا يغسله دمع سجم 3 رابط هذا التعليق شارك More sharing options...
kha9009lid قام بنشر مارس 21, 2020 مشاركة قام بنشر مارس 21, 2020 استاذي الفاضل @jo_2010 في اجابتي لاستفسارك وضعت عبارة x = CurrentRecord اي ان المتغير x = السجل الحالي ثم يتم استكمال بقية الكود وهذا الامر قد يؤدي الى نتيجة غير صحيحة في حالة حذف سجلات في الجدول لكون CurrentRecord يعطي رقم السجل الفعلي باستبعاد السجلات المحذوفة بناء عليه امل اختيار اجابة الاستاذ @خالد سيسكو او اجابة استاذنا ومعلمنا @jjafferr او تعديل السطر الثاني في مشاركتي ليكون x = Me.PCode الملف المعدل مرفق Dental.accdb 1 رابط هذا التعليق شارك More sharing options...
أبوبسمله قام بنشر مارس 21, 2020 مشاركة قام بنشر مارس 21, 2020 3 دقائق مضت, kha9009lid said: استاذي الفاضل @jo_2010 في اجابتي لاستفسارك وضعت عبارة x = CurrentRecord اي ان المتغير x = السجل الحالي ثم يتم استكمال بقية الكود وهذا الامر قد يؤدي الى نتيجة غير صحيحة في حالة حذف سجلات في الجدول لكون CurrentRecord يعطي رقم السجل الفعلي باستبعاد السجلات المحذوفة بناء عليه امل اختيار اجابة الاستاذ @خالد سيسكو او اجابة استاذنا ومعلمنا @jjafferr او تعديل السطر الثاني في مشاركتي ليكون x = Me.PCode الملف المعدل مرفق Dental.accdb 704 kB · 1 تنزيلات بارك الله فيك وجزاك الله خيرا اسال الله لكم اخوانى واساتذتى ان يزيدكم من فضله وعلمه وان يحفظكم ويرزقكم الفردوس الاعلى بجوار سيدنا محمد صل الله عليه وسلم رابط هذا التعليق شارك 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.