حمدى الظابط قام بنشر نوفمبر 28, 2022 مشاركة قام بنشر نوفمبر 28, 2022 (معدل) السلام عليكم مرفق نموذج Form1 اريد عند الضغط بصح يفتح كل علامات الخطاء عمود (تحديد ) ولكم تحياتى وشكرى ارسال.rar تم تعديل نوفمبر 28, 2022 بواسطه حمدى الظابط رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 السلام عليكم قد حاولت واتوصلت لكود يفتح السجلات ولكن للاسف لا يفتح الا سجل واحد فقط ارجو لمن عنده خبرة المساعدة فى تعديل الكود لفتح كل السجلات او غلقها ارسال.rar رابط هذا التعليق شارك More sharing options...
سامي الحداد قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 وعليكم السلام اخي حمدي اليك الكود التالي جرب ووافنا بالنتيجة DoCmd.SetWarnings False If Me.SELCTALL = True Then DoCmd.RunSQL "UPDATE email SET selectrow = True;", dbFailOnError ElseIf Me.SELCTALL = False Then DoCmd.RunSQL "UPDATE email SET selectrow = False;", dbFailOnError End If Me.Requery DoCmd.SetWarnings True بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 6 ساعات مضت, سامي الحداد said: وعليكم السلام اخي حمدي اليك الكود التالي جرب ووافنا بالنتيجة DoCmd.SetWarnings False If Me.SELCTALL = True Then DoCmd.RunSQL "UPDATE email SET selectrow = True;", dbFailOnError ElseIf Me.SELCTALL = False Then DoCmd.RunSQL "UPDATE email SET selectrow = False;", dbFailOnError End If Me.Requery DoCmd.SetWarnings True بالتوفيق السلام عليكم اشكر طلالتك الراقية والف مبروك على الترقية التى تستحقها بجدارة وامتياز تم تجربة الكود وللاسف بيفتح فتح وهمى وتظل السجلات مغلقة وطبعا انا السبب فى ذلك كان يجب عليا ارسال زر الارسال بعد فتح السجلات مع النموذج لتكون تجربة كود حضرتك على الواقع فارجو قبول الاعتذار وبشكرك على مجهودك ولك كل الاحترام وعملت محاولة لايجاد كود وتم التجربه والحمد لله بيفتح كل السجلات ولكن لم يقوم باغلقها وهذا هو الكود Private Sub SELCTALL_AfterUpdate() DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='R' " DoCmd.Requery DoCmd.SetWarnings False رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 (معدل) أخي يفترض أن تشرح أكثر وخصوصا ربط حقلين في التعديل. كذلك أنا لم أفهم سلوك مربع نص اضطررت أن أزيحه وأبدله بآخر، الآن إذا أحببت أن ترجع مربعك فيمكنك ذلك ولكني لا أنصح باستخدام مثل هالصندوق المزعج. ارسال_02.rar تم تعديل نوفمبر 29, 2022 بواسطه AbuuAhmed رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 1 ساعه مضت, AbuuAhmed said: أخي يفترض أن تشرح أكثر وخصوصا ربط حقلين في التعديل. كذلك أنا لم أفهم سلوك مربع نص اضطررت أن أزيحه وأبدله بآخر، الآن إذا أحببت أن ترجع مربعك فيمكنك ذلك ولكني لا أنصح باستخدام مثل هالصندوق المزعج. ارسال_02.rar 23.07 kB · 3 downloads السلام عليكم استاذى العزيز اشكرك على مشاركتك واهتمامك وبصراحة حل جميل وفكرة جميلة ومبدعة ورائعة ولكن عند التجربة الفعلية للكود الخاص بك وعند ارسال التقرير وجد تعارض الكود مع الوحدة النمطية الموجودة بالنموذج ويجعلها لاتقوم يواظفتها لذلك ارجو التعديل على الكود الخاص بى لانه مأخوذ من الوحدة النمطية الموجودة بالنموذج فهو يفتح السجلات ولكن لم يقوم بغلقها وهذا هو الكود ولك تحياتى Private Sub SELCTALL_AfterUpdate() DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='R' " DoCmd.Requery DoCmd.SetWarnings False End Sub رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 أنا تلخبطت 🙂 هل: Yes = T No = R ؟ رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 9 دقائق مضت, AbuuAhmed said: أنا تلخبطت 🙂 هل: Yes = T No = R ؟ تمام هجرب وافيك بالنتيجة رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 4 دقائق مضت, حمدى الظابط said: تمام هجرب وافيك بالنتيجة للاسف مازالت المشكلة موجودة والكود يعارض وظيفة الوحدة النمطية حتى بعد التبديل رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 أخي أنا لم أرفع لك نسخة جديدة لتجربها 🙂 أنا سألتك سؤالا حتى أعمل التعديل الجديد. رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 نحتاج إلى "موصل" حتى نستطيع أن نفهم على بعضنا عموما أنا راجعت الكود وقمت بالتعديل حسب فهمي ارسال_03.rar 1 رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 30 دقائق مضت, AbuuAhmed said: نحتاج إلى "موصل" حتى نستطيع أن نفهم على بعضنا عموما أنا راجعت الكود وقمت بالتعديل حسب فهمي ارسال_03.rar 24.12 kB · 4 downloads الغالى على القلب اشكرك على اصرارك على التواصل لحل ولكن للاسف مازالت المشكلة موجودة وتتوقف الوحدة النمطية عند هذا السطر StudentEmaile = rs.Fields("email_c") رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 29, 2022 مشاركة قام بنشر نوفمبر 29, 2022 حياك الله أحينا العزيز ملاحظاتك ليس لها علاقة بالموضوع ولا بالذي قمت أنا بتنفيذه. ومع ذلك أن أطلعت على الكود مرة أخرى وكتبت فيه ملاحظاتي ، أرجو الاطلاع. وأعتذر أخي ، هذه آخر مشاركة لي في هذا الموضوع. موفق. ارسال_04.rar 1 رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 29, 2022 الكاتب مشاركة قام بنشر نوفمبر 29, 2022 37 دقائق مضت, AbuuAhmed said: حياك الله أحينا العزيز ملاحظاتك ليس لها علاقة بالموضوع ولا بالذي قمت أنا بتنفيذه. ومع ذلك أن أطلعت على الكود مرة أخرى وكتبت فيه ملاحظاتي ، أرجو الاطلاع. وأعتذر أخي ، هذه آخر مشاركة لي في هذا الموضوع. موفق. ارسال_04.rar 26.36 kB · 0 downloads اسعدت واتشرفت بحضرتك واعجز عن الشكر بالكلمات لمجهودك وتعبك وقد استفد من خبرتك واصرارك على حل ولكن للاسف مازالت المشكلة كما هى تحياتى وودى وتقديرى لشخصك الراقى الكريم رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 30, 2022 مشاركة قام بنشر نوفمبر 30, 2022 في 28/11/2022 at 22:42, حمدى الظابط said: تعديل كود فتح وغلق عمود من نوع no , yas مرفق نموذج Form1 اريد عند الضغط بصح يفتح كل علامات الخطاء عمود (تحديد ) أخي إذا هذه المشكلة حسب العنوان والوصف "حلت" فاخبرنا واختر أفضل إجابة ، ويمكنكم فتح موضوع آخر لأي مشكلة ليس لها علاقة بالعنوان. رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر نوفمبر 30, 2022 الكاتب مشاركة قام بنشر نوفمبر 30, 2022 5 ساعات مضت, AbuuAhmed said: أخي إذا هذه المشكلة حسب العنوان والوصف "حلت" فاخبرنا واختر أفضل إجابة ، ويمكنكم فتح موضوع آخر لأي مشكلة ليس لها علاقة بالعنوان. للاسف مازالت المشكلة موجودة بيتم فتح السجلات لكن عند الارسال يتعارض الكود مع الوحدة التمطية وجارى التجارب والبحث عن حل رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر نوفمبر 30, 2022 مشاركة قام بنشر نوفمبر 30, 2022 4 ساعات مضت, حمدى الظابط said: للاسف مازالت المشكلة موجودة بيتم فتح السجلات لكن عند الارسال يتعارض الكود مع الوحدة التمطية وجارى التجارب والبحث عن حل هذه مشكلة أخرى ، ليس لها علاقة بمشكلة عنوان الموضوع ، ثم أين الوحدة النمطية التي تتحدث عنها؟!! ، هل تقصد سطور الإرسال؟. هل انتبهت لعدد الملاحظات في مثالك لإجراء واحد فقط؟. هل المطلوب أن نصمم لك البرنامج من جديد؟! أم ماذا؟ 16 ساعات مضت, AbuuAhmed said: نا تلخبطت 🙂 هل: Yes = T No = R لم تجاوب على هذا السؤال ولم تخبرنا أيه يعني T وأيه يعني R اللي فهمته T يعني تم الإرسال. أنت بطريقتك تنسب لنا فشل من غير مفشل وتحرجنا أمام الناس، يا أخي أولا اعترف لنا رجاءً 🙂 أن ما قمنا به تم بشكل صحيح ثم ابحث عن حل للمشلكة الأخرى. 1 رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر ديسمبر 1, 2022 الكاتب مشاركة قام بنشر ديسمبر 1, 2022 17 ساعات مضت, AbuuAhmed said: هذه مشكلة أخرى ، ليس لها علاقة بمشكلة عنوان الموضوع ، ثم أين الوحدة النمطية التي تتحدث عنها؟!! ، هل تقصد سطور الإرسال؟. هل انتبهت لعدد الملاحظات في مثالك لإجراء واحد فقط؟. هل المطلوب أن نصمم لك البرنامج من جديد؟! أم ماذا؟ لم تجاوب على هذا السؤال ولم تخبرنا أيه يعني T وأيه يعني R اللي فهمته T يعني تم الإرسال. أنت بطريقتك تنسب لنا فشل من غير مفشل وتحرجنا أمام الناس، يا أخي أولا اعترف لنا رجاءً 🙂 أن ما قمنا به تم بشكل صحيح ثم ابحث عن حل للمشلكة الأخرى. السلام عليكم استاذى الجليل AbuuAhmed حرفT يعنى غلق السجل وحرف R يفتح السجل وهذا الحقل موجود يالجدول باسم SelectRow واخد قيمة افتراضية لكل السجلات حرف T وحقيقى انا شكر اهتمامك يأيجاد حل وانا لا اقصد احراجك على الاطلاق كل مافى الامر انى استحيت منك ومن اصرارك ومحولاتك على المساعدة وهذا لم يعطينى الحق ان اطلب تانى مساعدتك احراج منك ليس الا هذا الكود توصلت له بيفتح السجلات كلها ولكن لم يغلقها اريد تعديل عليه فتح وغلق Private Sub SELCTALL_AfterUpdate() DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='R' " DoCmd.Requery DoCmd.SetWarnings False End Sub رابط هذا التعليق شارك More sharing options...
سامي الحداد قام بنشر ديسمبر 1, 2022 مشاركة قام بنشر ديسمبر 1, 2022 السلام عليكم اخي الكريم حمدي بصراحة انا كذلك لم استطع فهم الصيغة على العموم اليك هذا الكود جرب ووافنا بالنتيجة ويا حبذا لو ترفق كل الملف بكل الاوامر والاكواد حتى يتسنى لنا معرفة اين المشكلة بالضبط. تفبل تحياتي If Me.SELCTALL = True Then DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[selcted]=True , SelectRow ='R' ", dbFailOnError DoCmd.RunSQL "UPDATE email SET[SendStuts]=True , SelectRow ='R' ", dbFailOnError ElseIf Me.SELCTALL = False Then DoCmd.RunSQL "UPDATE email SET[selcted]=Null , SelectRow ='T' ", dbFailOnError DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='T' ", dbFailOnError End If DoCmd.SetWarnings False DoCmd.Requery If Me.Dirty Then Me.Dirty = False 1 رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر ديسمبر 1, 2022 الكاتب مشاركة قام بنشر ديسمبر 1, 2022 (معدل) 3 ساعات مضت, سامي الحداد said: السلام عليكم اخي الكريم حمدي بصراحة انا كذلك لم استطع فهم الصيغة على العموم اليك هذا الكود جرب ووافنا بالنتيجة ويا حبذا لو ترفق كل الملف بكل الاوامر والاكواد حتى يتسنى لنا معرفة اين المشكلة بالضبط. تفبل تحياتي If Me.SELCTALL = True Then DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[selcted]=True , SelectRow ='R' ", dbFailOnError DoCmd.RunSQL "UPDATE email SET[SendStuts]=True , SelectRow ='R' ", dbFailOnError ElseIf Me.SELCTALL = False Then DoCmd.RunSQL "UPDATE email SET[selcted]=Null , SelectRow ='T' ", dbFailOnError DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='T' ", dbFailOnError End If DoCmd.SetWarnings False DoCmd.Requery If Me.Dirty Then Me.Dirty = False السلام عليكم العزيز الغالى استاذ سامى الحداد تم التجربة على الكود الخاص بك ويعمل بكفاءة 100% ولكنه يضع فى حقل حالة الارسال رقم -1 وعند تم الارسال يتم حذف -1 ويضع نم الارسال والكود المرفق بعد التعديل مؤخوذ من الكود الخاص بك يلغى -1 فى حقل حالة الارسال والاتنين يعملو بكفاءة عالية وممتازة الاول يضع -1 فى حقل حالة الارسال والثانى يزيل -1 من حقل حالة الارسال والاثنين يعملو بكفاءة ولا يسعنى الا الشكر والاحترام والتقدير لشخصكم الكريم واشكر استاذ ابو احمد لمجهودة ومحولاته المستمرة للوصول الى افضل النتائج ربما اكون انا المقصر فى عدم توصيل له المعلومة والان استاذ سامى فى مشكلة ليس لها علاقة بعنوان الموضوع الذى تم حلها حلها الخمد لله ولكن المشكلة لها علاقة بنفس النموذج الموجود فى الموضوع هل اعرض المشكلة هنا استكمالا للموضوع ولا فى موضوع منفصل If Me.SELCTALL = True Then DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[selcted]=True , SelectRow ='R' ", dbFailOnError ElseIf Me.SELCTALL = False Then DoCmd.RunSQL "UPDATE email SET[selcted]=Null , SelectRow ='T' ", dbFailOnError End If DoCmd.SetWarnings False DoCmd.Requery If Me.Dirty Then Me.Dirty = False تم تعديل ديسمبر 1, 2022 بواسطه حمدى الظابط رابط هذا التعليق شارك More sharing options...
أفضل إجابة سامي الحداد قام بنشر ديسمبر 1, 2022 أفضل إجابة مشاركة قام بنشر ديسمبر 1, 2022 وعليكم السلام اخي حمدي الحمدلله انه تم حل المشكلة. والشكر موصول للاستاذ العزيز أبو أحمد جزاه الله خيرا . 3 ساعات مضت, حمدى الظابط said: والان استاذ سامى فى مشكلة ليس لها علاقة بعنوان الموضوع الذى تم حلها حلها الخمد لله ولكن المشكلة لها علاقة بنفس النموذج الموجود فى الموضوع هل اعرض المشكلة هنا استكمالا للموضوع ولا فى موضوع منفصل للحفاظ على قوانين المنتدى الافضل ان يتم عرض المشكلة في موضوع منفصل ويمكن الاشارة لهذا الموضوع. لا تنسى إغلاق هذا الموضوع. تحياتي 1 رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر ديسمبر 1, 2022 مشاركة قام بنشر ديسمبر 1, 2022 أما أنا فأطالب الإدارة عرض هذا الموضوع للنقاش فهذا الموضوع به أخطاء سلوكية بالجملة ، خطأ السائل وخطأ مقدمي الحلول وخطأ الإدارة - خطأ السائل هو خطأ مكرر من بعض الذين يطلبون العون ويرفضون الاعتراف بصحة الحل لمن لا يرغبون اعطائهم هذا الحق وهذا تكرر معي في أكثر من موضوع وأضطر أن أنتزعه منهم انتزاعا. - خطأ الزملاء ، ففي حالة وضوح صحة الحل وضوحا تاما أن يبدو رأيهم مقابل السائل وأن يكبحوا اندفاعهم وتحمسهم لتقديم "حلول أخرى" مكررة فهذا الفعل له سلبياته وفيه تشجيع لتكرار هذا السلوك. - خطأ الإدارة في عدم تدخلها في ابداء رأيها الصريح وفي غلق هذا الموضوع والذي قد يتسبب فيه السائل في دق اسفين بي الخبراء وهو في غير صالح المنتدى. طبعا السائل ابتدأ يصفي حساباته معي في مواضيع أخرى لا ناقه له فيها ولا جمل. وعذرا للجميع. رابط هذا التعليق شارك More sharing options...
سامي الحداد قام بنشر ديسمبر 2, 2022 مشاركة قام بنشر ديسمبر 2, 2022 11 ساعات مضت, AbuuAhmed said: - خطأ الزملاء ، ففي حالة وضوح صحة الحل وضوحا تاما أن يبدو رأيهم مقابل السائل وأن يكبحوا اندفاعهم وتحمسهم لتقديم "حلول أخرى" مكررة فهذا الفعل له سلبياته وفيه تشجيع لتكرار هذا السلوك استاذي الجليل أبو أحمد حفظك الرحمن أنا توقفت عندما رأيت جنابكم بدأت واسهبت بالشرح والامثلة واشهد انك كفيت ووفيت والحلول التي قدمتها في غاية الروعة. لهذا لم اشارك وانما كنت متابع وهل تعلو العين على الحاجب أدامك الله لنا في هذا المنتدى. عندما رأيت الاخ السائل يصر على استخدام ذلك الكود وعلى ما اعتقد ان لدية تضارب في الاكواد في مكان ما من برنامجه ورأيت جوابك على الموضوع في 30/11/2022 at 05:31, AbuuAhmed said: حياك الله أحينا العزيز ملاحظاتك ليس لها علاقة بالموضوع ولا بالذي قمت أنا بتنفيذه. ومع ذلك أن أطلعت على الكود مرة أخرى وكتبت فيه ملاحظاتي ، أرجو الاطلاع. وأعتذر أخي ، هذه آخر مشاركة لي في هذا الموضوع. موفق. من وجهة نظري رايت ان أحاول عسى ولعل ان نحل له المشكلة بعد ان قلت هذه اخر مشاركة في هذا الموضوع . على العموم استاذي الحبيب انا اسف ان كنت قد أسات في اي شيئ بحقكم. اكرر اعتذاري تحياتي لشخصكم الكريم ودمتم في رعاية الله 1 رابط هذا التعليق شارك More sharing options...
AbuuAhmed قام بنشر ديسمبر 2, 2022 مشاركة قام بنشر ديسمبر 2, 2022 حياك الله أخي @سامي الحداد ، ملاحظتي جديدة قديمة وليست مقتصرة على هذا الموضوع، بس جات في رأسك لأنك الوحيد المشارك هنا 🙂 ، آسف لإزعاجك ولكن هذه حقيقة لا يمكن اخفاءها. رابط هذا التعليق شارك More sharing options...
حمدى الظابط قام بنشر ديسمبر 2, 2022 الكاتب مشاركة قام بنشر ديسمبر 2, 2022 (معدل) في 30/11/2022 at 00:31, AbuuAhmed said: حياك الله أحينا العزيز ملاحظاتك ليس لها علاقة بالموضوع ولا بالذي قمت أنا بتنفيذه. ومع ذلك أن أطلعت على الكود مرة أخرى وكتبت فيه ملاحظاتي ، أرجو الاطلاع. وأعتذر أخي ، هذه آخر مشاركة لي في هذا الموضوع. موفق. ارسال_04.rar 26.36 kB · 3 downloads القاضل استاذ ابو احمد اولا لك كل الشكر والاحترام على مجهودك واصرارك على تقديم افضل الحلول ثانيا ليس بينى وبينك غير كل خير واحترام وادب وهذه المشاركة كانت اول مشاركة بينى وبينك فى المنتدى ولا يسبق لنا من قبل اى تعامل ثالثا حضرتك حاولت ايجاد حل ولكن الحل كان غير مناسب للمشروع واخطرت حضرتك بان مازالت المشكلة موجودة ولن تحل وبناء على تعليقك المشار اليه فى هذا التعليق تم تدخل احد الخبراء المحترمين للمساعدة والعون لحل المشكلة وتم حلها الحمد لله وهذا لا ينقص من شأنك شى رابعا وهذا هو الاهم اذا نظرت لاول مشاركة فى الموضوع كانت باسم الاستاذ سامى الحداد ولم يوفق فى حل المشكلة ولم يزعل او يضابق ثم حضرتك جصرت فى ثانى مشاركة لايجاد حل ولم يعضب الاستاذ سامى من تدخلك نظرا لاننا فى عالم منتدى اوفيسنا كما علمتنا ادارة المنتدى نحن جميعا على قلب رجل واحد ثم حضرتك اعتذرت عن المشاركة كما اشرت فى التعليق وثم حضر وعاد الاستاذ سامى الى الموضوع فى صمت ليكمل ما بداءه فلماذا الزعل والغضب من ذلك علما بان هذا المشروع مقدم اهداء لاعضاء اوفيسنا وهو مشروع جماعى ( ارسال رسائل وتقارير فردية وجماعية وتساب واميلات ) لمن يستطيع ايجاد مقتراحات او افكار وحلول تفيد انجاز المشروع لخروجة بصورة مشرفة تلبى جميع احتياجات المبرمجين اهلا به علما بانى نشرت اكثر من موضوع بشأن هذا البرنامج ومازال يوجد بعض مشاكل التفنيات الفنية التى تحتاج لعباقرة وخبراء هذا المنتدى ويشرفى وجودك من ضمن الكوكبة التى تتولى الموضوع وارجوا عدم الزعل من سوء تفاهم غير مقصود في 1/12/2022 at 08:32, حمدى الظابط said: السلام عليكم استاذى الجليل AbuuAhmed حرفT يعنى غلق السجل وحرف R يفتح السجل وهذا الحقل موجود يالجدول باسم SelectRow واخد قيمة افتراضية لكل السجلات حرف T وحقيقى انا شكر اهتمامك يأيجاد حل وانا لا اقصد احراجك على الاطلاق كل مافى الامر انى استحيت منك ومن اصرارك ومحولاتك على المساعدة وهذا لم يعطينى الحق ان اطلب تانى مساعدتك احراج منك ليس الا هذا الكود توصلت له بيفتح السجلات كلها ولكن لم يغلقها اريد تعديل عليه فتح وغلق Private Sub SELCTALL_AfterUpdate() DoCmd.SetWarnings True DoCmd.RunSQL "UPDATE email SET[SendStuts]=Null , SelectRow ='R' " DoCmd.Requery DoCmd.SetWarnings False End Sub تم تعديل ديسمبر 3, 2022 بواسطه حمدى الظابط رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان