saffar قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 السلام عليكم اريد المساعده في الاستعلام عن اليوم الحصة بحيث عند الضغط على رز الشعبة تتطلع البيانات حسب توقيت الحصص واليوم الحالي TT.accdb رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 أخي الكريم بعد الإطلاع على المرفق ممكن توضيح المسميات ( الحصة - الشعبة - ..... الخ ) 1 رابط هذا التعليق شارك More sharing options...
عمر ضاحى قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 (معدل) اولا هتحتاج الى هذه الدالة ضعها فى مديول Function XDayNumber() As Integer XDayNumber = Weekday(Date, vbSunday) End Function فى الاتسعلام ممكن تستخدم هذا الاستعلام SELECT Timetable.ID, Timetable.EVENT1, Timetable.GRP_CD, Timetable.DAY_NO, Timetable.HOUR_NO, Timetable.CRS_CD, Timetable.ROOM_CD, Timetable.TCH_SC_NO, Timetable.NAM, Timetable.SEC_NM, Timetable.EVENT FROM Tdays INNER JOIN Timetable ON Tdays.ID = Timetable.DAY_NO WHERE (((Timetable.GRP_CD)=[Forms]![result]![GRP_CD]) AND ((Timetable.DAY_NO)=XDayNumber())); تم تعديل أكتوبر 11, 2023 بواسطه عمر ضاحى اصلاح خطأ فى الاستعلام 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 11, 2023 الكاتب مشاركة قام بنشر أكتوبر 11, 2023 اخ @Foksh المرفق مره ثانية بالمسميات داخل الجدول اخ @عمر ضاحى خليت الكود في استعلام لم يعمل معي TT.accdb رابط هذا التعليق شارك More sharing options...
عمر ضاحى قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 جرب هذا الملف TT.rar 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 11, 2023 الكاتب مشاركة قام بنشر أكتوبر 11, 2023 (معدل) اخ ضاحي ليس هذا المطلوب انظر الصور اختيار الشعبة من النموذج الاول والنتيجة في النموذج الثاني مرفق الملف بعد التعديل TT.accdb تم تعديل أكتوبر 11, 2023 بواسطه saffar رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 22 دقائق مضت, saffar said: اختيار الشعبة من النموذج الاول والنتيجة في النموذج الثاني جرب TT.accdb 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 11, 2023 الكاتب مشاركة قام بنشر أكتوبر 11, 2023 احسنت يمكن شرحي غير واضح لما اختار الشعبة يجب ان يكون اليوم هو نفس اليوم والحصة حسب التوقيت من الجدول الوقت مثال بعد اختيار الشعبة -- النتيجة (اليوم الاربعاء) ونفترض الوقت بين 8:05 الى 8:45 (الحصة الثانية) يعرض بيانات الحصة الثانية رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 جرب المرفق ، واخبرني بالنتيجة ، انشغلت في العمل قليلاً وإلا لأرسلت المرفق منذ مدة TT.accdb 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 11, 2023 الكاتب مشاركة قام بنشر أكتوبر 11, 2023 جربت المرفق المنتيجة غير صحيحة اذا اخترت احدى الشعب يظهر يوم الاحد الحصة الاولى رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 11, 2023 مشاركة قام بنشر أكتوبر 11, 2023 (معدل) 6 ساعات مضت, saffar said: جربت المرفق المنتيجة غير صحيحة جرب المرفق بعد التعديل TT.accdb تم تعديل أكتوبر 12, 2023 بواسطه Foksh تم تعديل الملف السابق 1 رابط هذا التعليق شارك More sharing options...
أفضل إجابة ابوخليل قام بنشر أكتوبر 11, 2023 أفضل إجابة مشاركة قام بنشر أكتوبر 11, 2023 مشاركة مع اخوتي .. تم تحقيق الفكرة مع مراعاة تغير نظام الحضور ( الشتوي / الصيفي) Public Function funTestTimes() On Error GoTo err_idt Dim idt As String idt = DLookup("[hour_no]", "[Ttime]", "[time_from] <=#" & Time() & "# And [time_to] >=#" & Time() & "# ") funTestTimes = idt err_exit: Exit Function err_idt: If idt = "" Then MsgBox "لا يوجد حصص في الوقت الحالي" Resume err_exit End If End Function TT2.rar 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 12, 2023 الكاتب مشاركة قام بنشر أكتوبر 12, 2023 اشكر جميع الاخوه على المشاركة 🌹 اجابة الاستاذ @ابوخليل هي المطلوبه شكرا 👍 رابط هذا التعليق شارك More sharing options...
ابوخليل قام بنشر أكتوبر 12, 2023 مشاركة قام بنشر أكتوبر 12, 2023 ملحوظة ملاحظة جميلة من الاستاذ @Foksh حول ازرار اختيار الشعبة .. ماذا لو استجد مستقبلا زيادة في الشعب لذا فالحل المرن المحكم هو استبدال الازرار بمربع تحرير يتم الاختيار منه تجدون ادناه تعديل على المرفق السابق TT3.rar 1 رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر أكتوبر 12, 2023 مشاركة قام بنشر أكتوبر 12, 2023 1 دقيقه مضت, ابوخليل said: ملاحظة جميلة من الاستاذ منكم نتعلم أستاذنا ومعلمنا @ابوخليل ، وقد كنت أفكر معك بصوت عالٍ ليس إلا رابط هذا التعليق شارك More sharing options...
دروب مبرمج قام بنشر أكتوبر 12, 2023 مشاركة قام بنشر أكتوبر 12, 2023 (معدل) 16 ساعات مضت, ابوخليل said: تم تحقيق الفكرة مع مراعاة تغير نظام الحضور ( الشتوي / الصيفي) خير الكلام ما قل و دل ابدعت ابدعت و انرت الطريق للجميع بسطور معدودة سهلة الفهم و بكفرة ابداعية خارجة عن المألوف تم تعديل أكتوبر 12, 2023 بواسطه دروب مبرمج 1 1 رابط هذا التعليق شارك More sharing options...
saffar قام بنشر أكتوبر 12, 2023 الكاتب مشاركة قام بنشر أكتوبر 12, 2023 اخي وأستاذي @ابوخليل كلامك صحيح وطريقة الاستاذ @Foksh صحيحة في اختيار الشعب احترافية ولكن هدفي تسهيل عملية الاختيار عن طريق النقر على الأزرار والأمر الثاني عملت البرنامج لاستخدام الطلبة يعني قد ما تقدر تبسط الأمور وانت أدرى بمستوى الطلبة بالنسبة لإضافة شعب اكثر في المستقبل ما راح تزيد عند شعبة او اثنين بالكثير 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان