ابوخليل

وجدت حلا عملت دالة بل اثنتين .. لأن يوم الخميس مشترك هذه لوسط الاسبوع جميع الأيام ..... ولآخر الاسبوع فقط الجمعة والسبت Public Function funDayInweek() Dim i As Integer If Weekday(Date) >= 1 And Weekday(Date) <= 5 Then i = 1 funDayInweek = i ElseIf Weekday(Date) >= 6 And Weekday(Date) <= 7 Then i = 2 End If funDayInweek = i End Function ثم عملت الثانية وخصصتها لنهاية الاسبوع يوم الخميس فقط Public Function funDayInweek5() If Weekday(Date) = 5 Then funDayInweek5 = 2 Else funDayInweek5 = Null End If End Function يوجد في المثال نسخة طبق الأصل من الدالتين .. استبدلت فيها دالة استخراج اليوم بمتغير .. من اجل الفحص والتأكد من النتيجة Database3.rar

تصفحت العمل على عجل واضح مليء بالأفكار النيرة الجميلة شكرا @Ahmos

اهلا اخي @Foksh وااااااو الأمر معقد بالنسبة لي باستخدام استعلامات وسيطة ومعايير كثيرة اتمنى يكون الحل أسهل مباشر ومحكم .. على احتمال تغير الفترات بالزيادة او النقص الوقت او الفترة وتم التعامل معها بشكل مباشر بسيط في مثال الأخ موسى بقي الأيام اتوقع ان عمل دالة تستكشف اليوم الحالي مع ربط اليوزر بهذا اليوم حسب صلاحيته هو الأفضل

لم اوفق في التسمية .. كان الأولى أيام الاسبوع تكون تسميتها : وسط الاسبوع

نعم .. تماما .. كما في الصورة حسب الوقت الحالي الذي هو متحقق بين الوقتين المهم مع تطبيق الفترة الزمنية ايضا مطابقة الأيام حسب الصلاحية من صلاحيته ايام الاسبوع لايظهر في الجمعة والسبت والعكس صحيح .. من صلاحيته نهاية الاسبوع يظهر في الخميس والجمعة والسبت فقط

السلام عليكم اخواني واحبتي في الجدول tblCtrlDetails اريد من خلال استعلام اظهار السجل الذي يمثل الوقت الحالي حسب اليوم والفترة فقط الوقت الحالي محصور بين وقتين (بداية ونهاية ) ...................................................... الأيام : أيام الأسبوع : الأحد /الاثنين / الثلاثاء / الأربعاء / الخميس نهاية الأسبوع : الخميس / الجمعة / السبت لاحظ ان يوم الخميس مشترك .................................................................. لك مطلق الحرية في تغيير اوقات الفترات ... والأيام واعتقد من اجل التجربة يجب العبث بوقت جهاز الحاسوب Database1.accdb

تفضل Data125.rar

لم انسك ولكني تركت متابعة العمل قصدا .. لايمكن الاستمرار .. لأن الطريقة ستختلف جذريا

ينفع ونص .. بكذا نختصر ما يمكننا من ادوات Data124.rar

ايضا من الملاحظات ان بيانات الفورم NewPP معتمدة على جدول النتائج وهذا ما يصير .. لأن النتائج تأتي لاحقا .. والصحيح ان يتم عرض فقط جدول الاسماء مع من تم تسجيله في جدول التحاليل فقط يجب فورم newpuok يتم عرض من تم تسجيل نتائج له فقط .. ويوضح عدد نتائج التحاليل المسجلة ( نوعها او اسمها ) جدول النتائج يجب ان يكون قابل للتكرار .. والافضل تخصيص كل تحليل بجدول نتائج يخصه من ملاحظاتي اهتمامك كثيرا بالمظهر والتعامل مع البيانات في الواجهات .. واغفلت القلب ضبط الجداول = 80 % من انجاز المشروع 20 % تكميل وتجميل وتحسينات

لا اعلم لماذا تبخل بالشرح الوافي الآن لدينا قائمة تشمل 5 انواع من التحليل .. وفي المقابل لا يوجد الا ثلاث صفحات لتسجيل النتائج هذه واحدة . الثانية : حسب فهمي المتواضع يجب ان يظهر الى القائمة التي على اليسار كل من تم تسجيل نتيجة له دعنا نفترض ان التحاليل 3 بعدد الصفحات هنا لا بد ان يكون امام المريض ما يدل على تسجيل النتائج الثلاث له ايضا لو تم ازالة علامة الصح من امامه لا يرجع الى القائمة اليمنى ابدا حتى يتم حذف نتيجته اولا شيء آخر مهم كبرمجة مشروع : ماذا لو اعاد المريض الفحص والتحليل مرة أخرى ؟ اين بياناته التاريخية؟

؟؟؟؟؟؟؟؟

على كل حال اجتهدت حسب فهمي وقمت بضبط العلاقات كما يجب ان تكون اخ يوسف جرب ووافني بأي ملاحظات JO2_2025.rar

عزيزي المشكلة في العلاقات المريضة ولاء لا تظهر لأن اسمها غير موجود في مصدر بيانات النموذج NewPara وعندما تتبعتها وجد لها فقط Creatinine في جدول Tbl_NewRequest ولا يوجد لها شيء في جدول Tbl_NewResults لهذا لا تظهر او اي مريض يشبهها كما ذكرت لك المشكلة في العلاقات اريد افهم عمل النموذجين الفرعيين NewPP و NewPU_OK ماذا يعرضان اشرح لي بالتفصيل عند الاختيار من القائمة مالذي يتم عرضه في النموذج NewPP حسب البند المختار .. وبالمقابل ما يتم عرضه في النموذج NewPU_OK انا متأكد بعد فهمي للفكرة انك لست بحاجة الى كثير من الأكواد العرض سيتم من خلال الجداول والاستعلامات من دون الاستعانة بأي كود

تفضل فقط تحديث JO 2027_new.rar