AboSaad17 قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 السلام عليكم ورحمة الله وبركاته من المعلوم أن ( زر التنقل التالي )) بين السجلات يفتح سجل جديد فهل هناك طريقة لإيقاف زر التنقل من فتح سجل جديد والوقوف عند أخر سجل محرر وذلك بهدف إجبار المستخدم على استخدام زر الأمر لفتح سجل جديد New Rec.mdb
Shivan Rekany قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 2 ساعات مضت, AboSaad17 said: فهل هناك طريقة لإيقاف زر التنقل من فتح سجل جديد والوقوف عند أخر سجل محرر اليك هذا Dim rst As DAO.Recordset Set rst = Me.RecordsetClone rst.MoveLast: rst.MoveFirst RC = rst.RecordCount If Me.CurrentRecord < RC Then DoCmd.GoToRecord , , acNext End If 2 1
ابوخليل قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 ومشاركة مع الاستاذ العزيز شفان ثلاث خطوات : 1- من خصائص النموذج اعدل الخصيصة : السماح بالاضافة=لا 2- الصق السطر في اعلى كود زر جديد : Me.AllowAdditions = True 3- الصق السطر في اعلى كود زر التالي : Me.AllowAdditions = False New Rec2.rar 1 2
النجاشي قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 (معدل) 1 ساعه مضت, ابوخليل said: ومشاركة مع الاستاذ العزيز شفان ثلاث خطوات : 1- من خصائص النموذج اعدل الخصيصة : السماح بالاضافة=لا 2- الصق السطر في اعلى كود زر جديد : Me.AllowAdditions = True 3- الصق السطر في اعلى كود زر التالي : Me.AllowAdditions = False بارك الله فيكم استاتذتي الكرام بو خليل وشفان ريكاني والسائل الذي حط السوال الذي كان ببالي سوالي استاتذتي الكرام كيف يكون الكود عندما يكون لديك نموذج ريسي وفرعي واريد تنفيذ الكود من نموذج اخر عند الاغلاق شاكرين اليكم احبتي مثال.accdb تم تعديل يوليو 31, 2018 بواسطه ابو زاهر
AboSaad17 قام بنشر يوليو 31, 2018 الكاتب قام بنشر يوليو 31, 2018 جزاكم الله خير وزادكم علما ونورا .................................. 1
ابو ياسين المشولي قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 (معدل) 1 ساعه مضت, ابو زاهر said: بارك الله فيكم استاتذتي الكرام بو خليل وشفان ريكاني والسائل الذي حط السوال الذي كان ببالي سوالي استاتذتي الكرام كيف يكون الكود عندما يكون لديك نموذج ريسي وفرعي واريد تنفيذ الكود من نموذج اخر عند الاغلاق شاكرين اليكم احبتي مثال.accdb جرب هذا Forms.frmSales.AllowAdditions = False DoCmd.Close Forms.frmSales.AllowAdditions = False Forms!frmSales!SubSales!نص4.SetFocus DoCmd.Close تم تعديل يوليو 31, 2018 بواسطه ابو ياسين المشولي 1
النجاشي قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 11 دقائق مضت, ابو ياسين المشولي said: جرب هذا Forms.frmSales.AllowAdditions = False DoCmd.Close Forms.frmSales.AllowAdditions = False DoCmd.Close بارك الله فيك استاذنا الغالي ابو ياسين نورت المنتدي الحمدلله على سلامه الاسفار هو المطلوب الف شكر اليك يالحبيب تحياتي اليك 1
ابو ياسين المشولي قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 الله يسلمك اخي ابو زاهر بالتوفيق اخي
النجاشي قام بنشر يوليو 31, 2018 قام بنشر يوليو 31, 2018 34 دقائق مضت, ابو ياسين المشولي said: جرب هذا Forms.frmSales.AllowAdditions = False DoCmd.Close Forms.frmSales.AllowAdditions = False DoCmd.Close معذرتا استاذي لم يشتغل معي انظر الي طريقتي راح تفهمني يالغالي مثال.accdb
محمدنجار قام بنشر أغسطس 3, 2018 قام بنشر أغسطس 3, 2018 في ٣١/٧/٢٠١٨ at 18:23, Shivan Rekany said: اليك هذا: :: شكرا أخي شفان . 1
kaser906 قام بنشر أغسطس 3, 2018 قام بنشر أغسطس 3, 2018 (معدل) استخدم هذا الكود Private Sub Next_Click() On Error GoTo Err_Next_Click AllowAdditions = False DoCmd.GoToRecord , , acNext Exit_Next_Click: Exit Sub Err_Next_Click: MsgBox "هذا هو السجل الأخير لايوجد سجل تالي للذهاب إليه!" Resume Exit_Next_Click End Sub ::بالتوفق:: تم تعديل أغسطس 3, 2018 بواسطه kaser906 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.