السلام عليكم
في المثال المرفق يفقح مع بداية الدخول نموذج إدخال وقت حضور موظفين coming
المطلوب عند ادخال رقم الموظف في المربع rn والضغط على enter
1- قبل الساعة 6.40 دقيقة صباحا يظهر رسالة أن الموظف حضر بدون تأخير
2- بعد الساعة 6.40 دقيقة صباحا يظهر رسالة أن الموظف حضر ولكن بتأخير مقداره ........ دقيقة
3- بعد الساعة 6.40 دقيق صباحا وإذا كان مشرف باص تظهر رسالة تأكد حضور الموظف بدون تأخير
وجزاكم الله خيرا
حاولت وهذا هو الكود ولكن أين أضعه
If Me.[timefld] >= #6:40:00 AM# Then
y = IIf([bus] = -1, 0, GetTimeDiff([coming], [com]))
MsgBox "تم حضورك بنجاح وساعة التأخر لك هي " & y
ElseIf Me.[timefld] < #6:40:00 AM# Then
MsgBox "تم حضورك بنجاح وساعة التأخر لك هي " & y
End Ifشكرا جزيلا أخوي على مجهودك معي الله يجزيك خير
- تظهر رسالة تأكيد الحضور والتأخر قبل رسالة الرقم المكرر ورسالة الرقم الغير موجود بالقاعدة
-والمفروض تظهر مع تسجيل الحضور ليوم جديد فقط وليس مع الرقم المكرر أو الغير موجود بالقاعدة
فهل من طريق لإظهار رسالة ساعة التأخر فقط في هذه الحالة
الله يحفظك أخوي شكرا جزيلا
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
