الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

برنامج الحضور والانصراف

بدأه خيماوي كووول في 1 أكتوبر 2013 · 6 رد · 1,235 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته .. عملت برنامج الحضور والانصراف .. مشكلتي هي في الغياب والتي تتمثل بانتداب معلم لهذا اليوم ( والذي اريده ان اسمه لا يندرج اسم الموظف في الاستعلام qry4 لاني قمت بتحديد اليوم لكل موظف الذي لا يتواجد فيه ولكني لا اعرف الدالة التي ممكن استخدمها لتعريف الايام مع الغياب ) .. ففكرة البرنامج هي ان البرنامج يقوم بتسجيل الغياب يومياً ( الموظفين جميعهم غائبين وبعد تسجيل رقم الموظف لهذا اليوم ينتقل اسمه من الغياب الى الحضور وعند اغلاق فورم تسجيل الحضور يقوم البرنامج بتحويل باقي الموظفين الى الغياب ) .. او هل توجد طريقة اخرى ممكن الاستفاده منها .. وشكرا على تعاونكم

 

الملف على الفور شير وانا اسف الملف 650K

http://www.4shared.com/rar/Za4G3EnZ/___1_.html

 

ملاحظة : ادخال بيانات الموظفين frmemployees

 تسجيل الحضور frmtasgel

#2

ملاحظة : الانتداب عندنا بدون تاريخ محدد بمعنى انه يوم الاحد منتدب معناه جميع ايام السنة الاحد هو منتدب ولا يجوز وضعه غائب .. وشكرا

#3

السلام عليكم ورحمة الله وبركاته .. اخواني .. هل توجد طريقة لموظف منتدب باليوم .. وشكرا

#4

السلام عليكم ورحمة الله وبركاته .. تم تحميل البرنامج وتحويله الى اكسس 2003 .. مشكلتي في الانتداب اليومي .. البرنامج يقوم بتسجيل الغياب اليومي عن طريق qry4 .. هل هناك طريقة يا اخواني .. وشكرا ..

برنامج الحضور.rar

#5

السلام عليكم ورحمة الله وبركاته .. اتمنى النظر في الموضوع .. وشكرا على تعاونكم ..

#6

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

أعتقد أنك تريد عمل استعلام من جدول الغياب بحيث لا يعتبر كل التواريخ غياب إلا إذا كان أحد أيام العمل المفروضة على الموظف أى يتم استبعاد أيام الغياب التى يكون الموظف فيها منتدب

 

إذا كان كذلك

فستقوم بعمل استعلام من جدول (بيانات الموظفين) مع جدول (الغياب)، بحيث لا يعرض إلا التواريخ التى يكون فيها اسم اليوم أحد أيام العمل لهذا الموظف

SELECT *
FROM
tblemployees INNER JOIN tblAbsent ON

tblemployees.EmpFinNo = tblAbsent.EmpFinNo
where
(sat=true and format(AbsentDate,"w")=7)
or
(sun=true and format(AbsentDate,"w")=1)
or
(mon=true and format(AbsentDate,"w")=2)
or
(Tus=true and format(AbsentDate,"w")=3)
or
(wen=true and format(AbsentDate,"w")=4)
or
(The=true and format(AbsentDate,"w")=5)

لاحظ أننا نريد عرض السجلات التى تحقق أحد الشروط الستة المكتوبة وكل شرط يختبر اليوم هل هو True ويختبر شرط آخر وهو أن يكون ترتيب اليوم للتاريخ يكافئ هذا اليوم

بمعنى

إذا كان ترتيب اليوم لتاريخ الغياب هو 2 أى اليوم الثانى فى الأسبوع والذى يعبر عن يوم الاثنين لأن الأسبوع الافتراضى يبدأ من يوم الأحد وكان mon=true فيعتبر هذا اليوم غياب

 

لاحظ أن ترتيب الأيام ربما يختلف على حسب نظام التشغيل عندك وعلى حسب إعدادات الأكسيس

 

دعائى بالتوفيق

أدعو الله أن يجعل أعمالنا خالصة لوجهه الكريم --- وأن ينفعنا بما علمنا

Dr Sayed Tohamy

Programming Instructor

مدرب برمجة

---------------

EmaSoft2000

-------------------

#7

السلام عليكم ورحمة الله وبركاته .. جزاك الله الف خير .. على هذا الرد الأكثر من رائع .. كلامك صحيح 100% .. الله يكثر من أمثالك .. ويرزقك الله من حيث لا تحتسب .. وشكرا

مواضيع مشابهة