اختيار سجل محدد من النماذج المستمرة

وعليكم السلام :)

سمير1404 كتب:

1. ... الان عند اختيار زر خيار يقوم بتفعيل كل الخانات لكل السجلات

آسف لم افهم هذه النقطة :(

سمير1404 كتب:

2 اريد عند اختيار زر خيار ارسال الرد لاي سجل من السجلات يجبر المستخد على تعبئة الحقلين الخاصة بتاريخ الرد ورقم الرد وذا لم يتم تعبئة الحقلين السابقين يتم ارجاع زر الخيار الى خانة انتظار الرد

 

استعمل هذا الكود:

Private Sub Form_BeforeUpdate(Cancel As Integer)

    If Me.Frame55 = 3 And Len(Me.TR & "") = 0 And Me.RR = 0 Then
        Me.Frame55 = 2
    End If
End Sub

جعفر

اخي جعفر شكرا لردك اسعد الله الشق الاول اقصد به عندما يكون لدي اكثر من سجل... يكون الحقلين الاخيرين TR -RR غير مفعلة ولكن بمجرد التاشير على خانة ارسال الطلب لاي سجل يتفعل الحقلين السابقين لكل السجلات وهذا بخلاف ما اريد ...الذي اريده عند التاشير على خانة ارسال الرد لا يتفعل سوى الحقلين الخاصة السجل المحدد وليس كل السجلات ....لعلي اوصلت مبتغاي الله يوفقك واشكرك من اعماق قلبي حبيبي جعفر...

حياك الله :)

في النماذج المستمرة ، اذا اردت التعامل مع حقول السجل الواحد ، فيجب عليك استعمال if الشرطية ، هكذا:

اختار الحقل ، ثم اضغط بالفأرة اليمين ، واختار if الشرطية:

لاحظ اننا وضعنا شرطين للحقل TR ، ولعمل الشرط ، اضغط على New Rule:

اختار Expression is وادخل الشرط عندما يكون Frame55=2 ، فلا تفعّل الحقل (وذلك بالضغط على الزر الذي عليه الدائرة الحمراء) ،

واختار Expression is وادخل الشرط عندما يكون Frame55=3 ، فقم بتفعيل الحقل (وذلك بعدم الضغط على الزر الذي عليه الدائرة الحمراء) ،

ثم Ok و Apply :)

واعمل نفس الشئ للحقل الآخر :)

وكل شئ عملته في الكود لتفعيل/عدم تفعيل هذين الحقلين يجب ان يحذف :)

جعفر

سلمت يدك اخ جعفر طبقت الشرح الذي تفضلت به وحصلت على النتيجة المطلوبة شكرا لك من اعماق قلبي ولكن بقي ان تفضلك علي بالحل الاول الذي ارسلته لاني وضعت الكود ولكن بقت النتيجة كما هي وفقك الله  :)  :)  :)  :)  :)  :)  :)  :)  :) 

حياك الله :)

تفضل :)

جعفر

304.ZATEST.mdb.zip

تحياتي وشكري لك اخي جعفر زادك الله في العلم والرزق حتى ترضى  :)  :)  :)  :)  :)  :)  :)  :)  :)

:)

ماشاء الله عليك أخي جعفر .. ربي يوفقك  ^_^

:)

بعد ثلاث سنوات من اجابتك على سؤالي 

وفقك الله اخ جعفر اينما كنت