أبو أحمد قام بنشر مايو 10, 2017 مشاركة قام بنشر مايو 10, 2017 الاخوه الافاضل أعضاء المنتدى / السلام عليكم ورحمة الله لدي حقل خانة اختيار نعم ولا هل ممكن إذا تم اختيار نعم (True) لا يسمح بكتابة بيانات في حقل العنوان1 ويعطي رسالة بأن العنوان 2 مشار إليه بنعم (True) مرفق لكم نموذج وجزاكم الله خيرا db1.rar رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر مايو 10, 2017 مشاركة قام بنشر مايو 10, 2017 وعليكم السلام تفضل كما فهمتك من طلبك ويمكن ان يكون الحل بطريقة اخرى بحيث تستغني عن الرسالة مثلا اذا تم التأشير على الخانة يتم حماية حقل العنوان فلا يمكنه التحرير او الاضافة db11.rar رابط هذا التعليق شارك More sharing options...
أبو أحمد قام بنشر مايو 10, 2017 الكاتب مشاركة قام بنشر مايو 10, 2017 (معدل) استاذي الكريم / جزاكم الله خيرا ولكن أريد أن لا يسمح بالكتابة في خانة العنوان إلا بعد حذف علامة نعم من العنوان الثاني بمعنى على المستخدم إن يحذف نعم من العنوان الثاني ليتمكن المستخدم من الكتابة طلب أخير وهو أريد ما معنى كلا من Undo DoCmd.CancelEvent وأيضا إذا وضعت كلمة cancel أمام الرسالة فماذا تعني في هذا الوقت وجزاكم الله خيرا على سعة صدركم وزادكم علما وبارك فيكم تم تعديل مايو 10, 2017 بواسطه أبو أحمد رابط هذا التعليق شارك More sharing options...
Shivan Rekany قام بنشر مايو 10, 2017 مشاركة قام بنشر مايو 10, 2017 (معدل) Undo = تراجع DoCmd.CancelEven = الغاء الحدث cancel = الغاء غالبا يستخدم كانسل يساوي ترو اي سالب 1 قبل التحديث لكي لا يخرج مؤشر الماوس اي التركيز على تلك المربع النص هذا والله يعلم تم تعديل مايو 10, 2017 بواسطه Shivan Rekany رابط هذا التعليق شارك More sharing options...
أبو أحمد قام بنشر مايو 10, 2017 الكاتب مشاركة قام بنشر مايو 10, 2017 جزاكم الله خيرا وزادكم علما ولكن لي طلب هل ممكن التعديل في المرفق بحيث لا يسمح وضع علامة صح أمام العنوان 2 إلا بعد حذف البيانات في العنوان 1 والعكس صحيح بمعنى لا يجوز وضع بيانات في العنوان 1 واضافة العلامة صح في العنوان2 معا لابد من واحد منهما فقط أو تعديله وجزاكم الله خيرا db11.rar جزاكم الله جميعا خيرا ... لقد توصلت الى الحل رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر مايو 10, 2017 مشاركة قام بنشر مايو 10, 2017 جرب هذا فى حدث beforeupdate ل titel2 Private Sub Title2_BeforeUpdate(Cancel As Integer) If Me.Title2 = True Then If Me.title <> "" And Not IsEmpty(Me.title) Then MsgBox "احذف العنوان أولا" Cancel = True DoCmd.CancelEvent End If End If End Sub رابط هذا التعليق شارك More sharing options...
أبو أحمد قام بنشر مايو 10, 2017 الكاتب مشاركة قام بنشر مايو 10, 2017 أستاذي الكريم / جزاكم الله خيرا بالفعل تمام ولكن هذا لا يمنع من الكتابة في العنوان الاول بارك الله فيكم وفي علمكم والحمد لله تم التوصل لما هو مطلوب بعد تجارب عديدة وفقني الله تعالى ولكن أتمنى شرح لما ارسلته لي لاني لم أفهمه كله أما ما قمت بعمله فهو على النحو التالي : تم وضع في العنوان 2 بعد التحديث If Not IsNull(Me.title2) Then MsgBox "لا يجوز جعل العنوان2 إلا بعد حذف البيانات من العنوان الآخر" Me.[حقل آخر].SetFocus Me.title2.Value = False Exit Sub End If وفي العنوان1 تم وضع عند الادخال If title2 = True Then MsgBox "2غير مسموح بأي بيانات إلا بعد حذف العلامة من المدخل بالعنوان" Me.title2.SetFocus Exit Sub End If في انتظار شرح ما أرسلته وجزاكم الله خيرا 1 رابط هذا التعليق شارك More sharing options...
عبد الفتاح كيرة قام بنشر مايو 10, 2017 مشاركة قام بنشر مايو 10, 2017 الشرح يعمل هذا الكود فى حال كان العنوان ليس به علامة صح ثم نحاول وضع علامة صح فيه فى هذه الحالة افحص العنوان الأول إذا لم يكن فارغا أظهر رسالة أعد حالة العنوان إلى الحالة السابقة يعنى بدون صح رابط هذا التعليق شارك More sharing options...
أبو أحمد قام بنشر مايو 10, 2017 الكاتب مشاركة قام بنشر مايو 10, 2017 جزاكم الله خيرا أستاذي الكريم رابط هذا التعليق شارك 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.