jo_2010

استاذى الفاضل شكرا لك على مساعدتى ولكن هل توجد طريقة اسهل من Select Case Me.OpenArgs Case Is = Urine MS_Sub.SourceObject = "1" Case Is = Stool MS_Sub.SourceObject = "2" Case Is = Sugar MS_Sub.SourceObject = "3" End Select MS_Sub.LinkMasterFields = "PCode" MS_Sub.LinkChildFields = "PCode" وذلك لان عدد التقارير كتيرة جدا خالص الشكر

عزيزى الفاضل الازرار تفتح التقارير مباشرة ولو يتم فتحها داخل التقرير الرئيسى لم يتم تحديد اسم التقرير MS_Report فى الكود الخاص بحضرتك

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

الخبراء الافاضل هل طلبى ممكن تنفيذة ام مستحيل

الخبراء الافاضل كل عام وانتم بخير ومنتدنا الرائع بكل اعضاءة فى تمام الصحة والسعادة اعادة الله علينا جميعا هذة الايام بالصحة والسعادة اريد عند الضغط على الزرالموجود بالنموذج Youssef يفتح التقرير الخاص باسمة مع العلم بان هناك تقارير كثرة ولكل تقرير زر خاص بة لكم خالص الشكر LAB 2025.rar

اخى الفاضل ومعلمى واستاذى شكرا لاهتمام حضرتك الكود يعمل بكفاءة خالص الشكر لك يا استاذى الفاضل

معلمى الفاضل خالص الشكر لسرعة الاستجابة

السادة الخبراء الافاضل بعد النحية اريد كود لزر يفتح This PC كما بالشكل

عند الضغط على الزر الأخضر تضل صورة البرج موجودة رغم لن external lab فارغ

الخبير الفاضل foksh شكرا لاهتمامك حضرتك بمساعدتى اولا عند الضغط على الزر الأحمر تظهر صورة المختبر وعند الضغط علي الزر الأصفر تظهر صورة المختبر اربد عند الضغط علي الزر الأخضر تختفى الصورتان لاتى لم احدد فى external lab اسم معمل المختبر او البرج كما اريد من حضرتك شرح الكود المكتوب فى Imgsourcetezt

الخبير الفاضل jjafferr ممكن لو تكرمت التطبيق على البرنامج ولك خالص الشكر

الخبراء الاعزاء الافاصل بعد التحية هل من الممكن تنفيذ ما بالصورة ام غير ممكن لانة نموذج مستمر JO_Lab.rar

خالص الشكر

استاذى الفاضل كل مااريدة هو عند تحديد اى سجل من النموذج الفرعى يظهر رقم الكود الخاص بالسجل فى مريع نص I'd فى الرئيسى اريد تحديث هذا السجل فقط وليس كل السجلات كما بالصورة فى النموذج الرئيسى انا واقف علي سجل رقم ٤٠ ومن النموذج الفرعى حددت رقم ٣٨ ظهر رقم ٣٨ فى النموذج الرئيسي اريد تحديث هذا السجل فقط بإضافة بكلمة المختبر لحقلexternal_lab عند الضغط علي الزر الأحمر او بكلمة البرج عند الضغط علي الزر الأصفر اتمنى بكون طلبى واضح بالنسبة لاختلاف تنسيق التقرير لا توجد مشكلة اعمل علي هذا البرنامج من ٥ سنوات

استاذى الفاضل إليك قاعدة مصغرة للتعديل عليها JO_Lab.rar

DoCmd.RunSQL "UPDATE Tbl_Lab_Requests SET Tbl_Lab_Requests.R_External_lab = ""المختبر"" " & _ " WHERE (((Tbl_Lab_Requests.PCode)= [Forms]![Laboratory]![id]));" DoCmd.RunSQL "UPDATE Tbl_Lab_Requests SET Tbl_Lab_Requests.R_External_lab = ""المختبر"" " & _ " WHERE (((Tbl_Lab_Requests.PCode)= [Forms]![Laboratory]![id]));"

الخبراء الافاضل بعد التحية والاحترام عندى نموذج فرعى مستمر داخل نموذج رئيسى عند الوقوف علي اى سجل من السجلات يوجد مربع نص فى النموذج الرئيسي ياخد قيمتة من كود السجل الموجودفى النموذج الفرعى وعندى زر تحديث لإضافة كلمة المختبر لحقل R_external_lab فى الجدول بشرط يكون كود الجدول مساوى لرقم dا الموجود فى الرئيسي لكن التحديث يحدث فقط فى السجل الحالى الموجود فى النموذج الرئيسى وليس ارجو يكون طلبى واضح إليكم صورة من الكود

الخبراء الافاضل بعد التحية والاحترام عندى نموذج فرعى مستمر وأمام كل سجل ٣ ازرار m _l_b ومربع نص اسمة total_out اريد ان وتختفى الازرار الثلاتة فى حالة total_out = 0 , وتظهر الازرار الثلاتة اذا كان 0 <> total_out لكم الشكر عملت قاعدة if فى حدث السجل الحالى ولم يعطى نتائج جبدة

الخبراء الافاضل بعد التحية بفضل الله ومساعدتكم تمكنت من الوصول الى مااريد المرفق بعد التعديل LAB_2.accdb LAB_2.accdb

الخبير الفاضل foksh فى حالة المريضة حسناء عبدالظاهر طالماtotal_out =0 لاداعى من كتابة اسم اى معمل لن نحتاج إلى إضافة معمل خارجى البرج او المختبر لذلك لا اريد تنسيق اريد التنسيق في حالة total_ out أكبر من صفر وانا نسيت اختار اسم المعمل البرج او المختبر وأصبح اسم المعمل فارغ اريدالتنسيق للتنبية بأنة لابد من إضافة اسم معمل خارجى برج او مختبر وعند الاختيار يتم تلوين خانة اسم المعمل زى ما انا عامل التنسيق من خلال الزر الأحمر والاصفر

الخبير الفاضل Foksh اريد عندما يكون اسم المعمل فارغ Total_out اكبر من صفر يصبح اللون الخلفية ازرق فى اسم المعمل واسم المريض واذا تم اختيار اسم المعمل من الزر الاحمر يكتب اسم المختبر وتصبح الخلفبة حمراء فى مربع نص اسم المعمل ويعود اسم المريض كما كان بدون تنسيق فى حالة total =صفر واسم المعمل فارغ اريد اسم المريض واسم المعمل بدون تنسيق هل هذا واضح ام لا بالمختصر اريد اخفاء الخلفية الزرقاء الموجودة فى اسم حسناء عبدالظاهر هارون لان الشرط غير متوفر اسم المعمل فارغ وtotal_out = صفر

الخبراء الافاضل اريد تنفيذ الموجود بالصورة اتمنى يكون طلبى واضح LAB.rar

شكرا Foksh يامبدع

الخبراء الافاضل بعد التحية if me.ddate=date() then الحدث else endif عند كتابة () Date فى الكود تختفى الاقواس كيف اكتبها بطريقة صحيحة تاريخ اليوم شكرا

الخبير الفاضل Foksh خالص الشكر على الابداع