ناتج الفرق بين الوقت نص تلقائي

[hh88]

السلام عليكم ورحمة االه وبركاتة

الاساتذة الكرام

اشكر اساتذتي الاستاذ شفان و الاستاذ محمد نجار بما قدموه مسبقاً بالمساعدة في هذا المثال

..........................

آمل التفضل بايجاد حل لي 

اريد ان يكون ناتج الفرق بين الوقت  نص تلقائي بين حقل 

came و out

اذا كان اكبر من <30 يظهر في حقل (نوع الخروج) متاخر

اذا كان اصغر من >30 يظهر في حقل (نوع الخروج) خروج عادي

والف شكر

 

حساب الوقت.rar

[صالح حمادي]

السلام عليكم

استعمل هذا الكود في حدث بعد التحديث لمربع نص البدء و مربع نص القفال:

If DateDiff("n", Me.بدء_البلاغ, Me.اغلاق_البلاغ) < 30 Then
Me.type_sortie = "خروج عادي"
Else
Me.type_sortie = "متأخر"
End If

و هذا هو المرفق

حساب الوقت.rar

[hh88]

1 hour ago, صالح حمادي said:

السلام عليكم

استعمل هذا الكود في حدث بعد التحديث لمربع نص البدء و مربع نص القفال:

If DateDiff("n", Me.بدء_البلاغ, Me.اغلاق_البلاغ) < 30 Then
Me.type_sortie = "خروج عادي"
Else
Me.type_sortie = "متأخر"
End If

و هذا هو المرفق

حساب الوقت.rar

الف مليون شكر اخي صالح

عندي ملاحظة

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

يقبل فقط في حالة كتابة وقت الاقفال يدوي

كيف يمكن تعديل ذلك

ولك خالص تحياتي وتقديري

[صالح حمادي]

منذ ساعه, hh88 said:

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

يقبل فقط في حالة كتابة وقت الاقفال يدوي

كيف يمكن تعديل ذلك

ولك خالص تحياتي وتقديري

تفضل هذا التعديل:

 

حساب الوقت.rar

[hh88]

7 hours ago, صالح حمادي said:

تفضل هذا التعديل:

 

حساب الوقت.rar

الف الف مليون شكر استاذي صالح

اسال الله ان يكتب لك الاجر

تقبل خالص تحياتي

[النجاشي]

بارك الله فيك صالح حمادي ابداع

تم تعديل أغسطس 7, 2017 بواسطه ابو زاهر