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

سؤال : عمل نماذج مرتبطة مع بعضها البعض .

مغلق
بدأه AL7ABIB في 22 أغسطس 2004 · 9 رد · 823 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ..

شكرا لكم على جهودكم التي تبذلونها في خدمة الأعضاء اخواني الاعزاء .

ليس لي تجارب كثيرة في الاكسس ربما يكون هذ البرنامج الذي اعرضه عليكم من اول البرامج التي انفذها لذلك هناك بعض الامور المتعقلة بالبرمجة لم اتمكن من اتقانها ..

البرنامج هو برنامج لتسجيل الحضور والغياب اليومي للموظفين .. بحيث كل موظف يسجل الحضور بواسطة هذا البرنامج عبر النموذج form1

acc1.jpg

1-في هذا النموذج المطلوب . هو ان تظهر كلمة متاخر اذا كانت الساعة اقل من السابعة وعشر دقائق صباحا . وتظهر كلمة حاضر اذا كانت الساعة اكثر الساعة السابعة و عشر دقائق ..

2- تفعيل زر الامر لينتقل للنموذج form2 اذا كان الموظف قد حضر في الوقت

او النموذج form3 اذا كان الموظف قد حضر متأخر

acc2.jpg

acc3.jpg

ليتم تسجيل الموظف في الجدول app من خلال ال form 2 او form 3

أرجو ان يكون السؤال واضحا والقاعدة مرفقة ..

appcnt.rar

تم تعديل هذه المشاركة بواسطة AL7ABIB في 22 أغسطس 2004 في 18:18

#2

تفضل واذا كنت تريد اضافة او تعديل انا حاظر

appcnt1.rar

ريح من الزفرات تعصف في الحشى &&& و ورائها مطر من العبرات

ابو حسن

#3

شكرا لك اخي الكريم المبرمج 2003 وجزاك الله الف خير على تعديلك لقاعدة البيانات ..

فعلا اخي لقد قمت بما اريد بالضبط لكن اسمحلي بان اتثاقل عليك ببعض الملاحظات

1- بالنسبة لتسجيل الحضور او التاخر أريده أن يكون من خلال form2 او form 3 انطلاقا من الفورم form1 الذي يكتب فيها الموظف رقمه والتاكد من حالته سواء متاخر او حاضر ..

,وبعد تأكد الموظف من صورته يتم تسجيل حضور او تأخرة في الجدول app لأني لاحظت بأنه يتم التسجيل من خلال form1 في الجدول app دون الحاجة للدحول في form2 او form 3

2- لا يتم تسجيل اسباب التأخر في الجدول app

.

وشكرا لك مرة اخرى اخي المبرمج 2003

#4

بسراحة ما فاهم اللي تبيه بالضبط لاني والله ما ني مركز اليوم على العموم

انا عدلت في برنامجك واختصرت بعض الاشياء ويمكن ما تكون هي اللي تبيها لكن

انا مسوي من زمان برنامج خاص بالحظور والانصراف وتسجيل الموظفين من خلال رقمه

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

وفي بعض الحاجات اللي يمكن تفيدك اذا تبيه انا حاظر بعد ما اعدل عليه بعض الاشياء لان حجمه كبير شوي

اخوكم /المبرمج2003

appcnt.rar

ريح من الزفرات تعصف في الحشى &&& و ورائها مطر من العبرات

ابو حسن

#5

مرحبا اخي المبرمج

اعتقد اني توصلت لصيغة نهائية للبرنامج لذلك سأطلب منج اخر خدمتين

لقد قمت بادراج اسباب التاخر من ضمن from1 وأريده ان تفعل مثل الازرار التي وضعتها في حالة التأخر فقط ..

2- أن لا يقبل البرنامج ارقام الموظفين الغير موجودة أساسا عندي موظفين تحت ارقام

14 و 15 ولذلك عند ادراج رقم موظف مثلا 16 تخرج رسالة بعدم قبول الادخال ..

فقط وسوف اقوم بمراجعة قاعدة البيانات التي وضعتهااخي لاتعرف المزيد من خبراتك فيها

شكرا لك مرة اخري وهذه هي قاعدة البيانات في المرفقات

appcnt_2004-08-24.rar

#6

توصلت لحل السؤال الاول وهو ومن خلال قاعدة التحقق من الصحة . ونجحت معي

بافي امر تفعيل (اسباب التأخر )

#7

لنفرض ان مربع السرد الذي فيه اسباب التأخر اسمه = bb

والحقل الذي فيه كلمة حاظر او متاخر = aa

وتريد ان يكون مفعل مربع السرد bb (اسباب التاخر) اذا كان الحقل aa = متأخر

لها اكثر من طريقة

اولا ضع خاصيت الحقل bb

تمكين = لا

وضع هذا الكود عند الخروج مثلا من الحقل aa

If aa = "متاخر" Then
bb.Enabled = True
Else
bb.Enabled = False
End If

يعني عند الخروج من الحقل aa اللي راح يكون فيه حاظر وا متاخر وكانت النتيجة = متاخر اجعل المربع السرد والتحرير اللي فيه اسباب التاخير ممكن وان كان غير ذلك اجعله غير ممكن

ان شاء الله وضحت الفكرة وإذا اردت غير ذلك انا مستعد

تم تعديل هذه المشاركة بواسطة المبرمج2003 في 26 أغسطس 2004 في 03:29

ريح من الزفرات تعصف في الحشى &&& و ورائها مطر من العبرات

ابو حسن

#8

شكرا اخي المبرمج

الكود الذي كتبته يعمل بنجاح في حال الموظف متاخر ..

اما اذا كان حاضر تظهر هذه الرسالة

code.jpg

تم تعديل هذه المشاركة بواسطة AL7ABIB في 27 أغسطس 2004 في 00:35

#10

الأن تعمل بشكل صحيح .. لأني لم اعدل الكود بشكل صحيح ..

شكرا لك اخي المبرمج

هذا الموضوع مغلق.

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

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…