ابوخليل

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

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

تطيب المجالس بمشاركتك عقول الرجال اين المرفق ؟ ام تريد طلابك يتعبوا كما تعبت

هل اعتمد الحل ؟ .. ام لك رأي آخر افضل ؟

صح .. ولكن الوقت يحمل معياره الخاص لم اغير في معيار الأخ موسى

ان امكن دمج الدالتين بدالة واحدة .. جيد بحيث تصبح الدالة يوم الخميس = 1 أو 2

وجدت حلا عملت دالة بل اثنتين .. لأن يوم الخميس مشترك هذه لوسط الاسبوع جميع الأيام ..... ولآخر الاسبوع فقط الجمعة والسبت 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