AbuuAhmed

محاولتي الثانية ولكن بإلغاء عمل الزر فهو غير مفهوم لي طريقة عمله ولا أؤيد العمل به. تعامل مع الأكسس بشكل عملي واترك عنك هذه الأمور غير المفيدة وغير العملية. عوضت عن الزر بصندوق نعم/لا ويمك عملها بزر ولكن ليست بطريقتك بل بطريقة عادية بسيطة. BlockExam_03.accdb

محاولتي قمت بتبديل المرفق بعد أن تبين لي أني فهمتك خطأ الحل الآن به طريقتين على مستوى الصناديق أو على مستوى السجل. BlockExam_02.accdb

حدسي يقول أنهم يريدون التاريخ بدون الفاصلة "سلاش" لو فكرة الأستاذ عبدالله ما صلحت جرب نفس الفكرة مع تعديل بسيط: =TEXT(D7;"'dd/mm/yyyy")

لا زلنا بانتظاركم، وشكرا لاهتمامكم

شكرا لك، أرحتنا بهذه الأداء.

وكيف يتم إنزال/تنزيل الملف؟

لأسف، خبر غير جيد. شكرا لردكم.

لم أمر بتجربة سابقة، وقد حاولت وتمت المشاركة ولكن الأكواد لم تعمل! هل لأحدكم تجربة في الموضوع؟

موفقين وعساكم ع القوة.

وهذه نفس سابقتها ولكن مختصرة: = IFERROR(RIGHT(A4, FIND(".", A4, 1)),0) * 1000

@ابوخليل أرجو الانتباه أنه تم التعديل على المرفق تعديلا بسيطا لا يؤثر على النتائج ولكنه الأصح بسبب قلة التركيز. التعديل في قوس الإغلاق للدالة يفترض أن يكون للوقت قبل عملية الضرب وليس بعد عملية الضرب. Me.txtResult1 = CDbl(Me.txtTime) * Me.txtMultip Me.txtResult2 = CDbl(Me.txtTime) * Me.txtMultip * 24 MsgBox Format(CDbl(Me.txtTime) * Me.txtMultip, "Short Time"), , _ Format(CDbl(Me.txtTime) * Me.txtMultip, "hh:mm")

ويمكن تحويله إلى نص إذا تجاوز 24 ساعة بشكل وقت عند الرغبة Times_02.accdb

نعم كلامك وكلام الأستاذ جعفر صحيح، وهذا لا يعني أنه لم يكن خلاف ما هو عليه الآن فقد يكون ما يكروسوفت طورت عملية التخزين. In MS Access, text fields store the exact length of the entered text, up to the defined field size. For Short Text fields (formerly Text), the maximum length is 255 characters, according to Microsoft Support. For Long Text fields (formerly Memo), the storage capacity is much larger, up to 2^30-1 bytes, but can be limited in Access web apps by setting a character limit according to Microsoft Support. Here's a more detailed breakdown: Short Text (formerly Text): The default size is 255 characters. according to DePaul University You can adjust the Field Size property to specify a shorter length (from 1 to 255). Access only stores the characters entered, not unused space.

وأفضل تكون المعادلة بدون عملية الطرح حيث أحيانا عملية الطرح تفقد الرقم جزء من دقته من واقع تجارب. كالتالي: = IF(FIND(".", A4, 1) = 0, 0, RIGHT(A4, FIND(".", A4, 1)) * 1000)

لو تبدل دالة Int بدالة Trunc أفضل حتى لا يتبدل الكسر مع المبالغ السالبة.

رحمه الله وغفر له وجعل مثواه الجنة. عظم الله لكم الأجر

أعتذر فقد تكون خانتني الذاكرة .. وأخطأت في هذه الجزئية فالمقارنة هي لحجم تحزين السجل الواحد، فلو عندنا حقل نصي مثلا طوله 255 حرفا وحفظنا فيه كلمة بطول خمسة حروف فالأكسس سوف يستخدم مساحة 255 حرفا والـ SQL سوف يخزنها بحجم 5 حروف فقط. أي أن سجل الأكسس ثابت الحجم وسجل الـ SQL متغير الحجم.

سلوك قاعدة بيانات الأكسس كل سجل يضاف سيأخذ مساحة من التخزين وهذا طبيعي ولكن غير الطبيعي أن المساحة ستبقى ولو حذفت السجل. وحل هذه المشكلة ستكون باستخدام "الضغط والإصلاح". ولكن هذه المشكلة لن تحدث مع قاعدة بيانات SQL فسلوكها مختلف بحيث تتخلص من مسحات السجلات المحذوفة أولا بأول أو تعيد استخدامها بدون عمليات الضغط. معلومات قديمة جدا وربما استجدت أمور أنا بعيد عنها.

مشكلتك في هذه الجملة فيه غلطتين، الأولى And خارج نص الجملة، والأخرى في اسم الحقل ناقص حرف. الخطأ "#" And "[usr_id] ='" التصحيح "# And [user_id] ='"

قلة تركيز DLookup_01.accdb

تم تتقيح الأكواد. تم حذف الاستعلام qryAddMissingEmps لعدم الحاجة له بعد تنقيح الأكواد. تم حذف الفهرس من حقل UserId للجدول tblAttendanceAll. Attendance_11.rar

تمت المهمة، ويمكنكم تحسينه إذا احتاج لذلك. مشكلة الحضور لأني غفلت عن وجود وقت مع التاريخ ويفترض أن أتخلص من الوقت باستخدام دالة Fix تجنبت عمليات الحذف والإضافة للسجلات حتى لا تتضخم قاعدة البيانات مع الوقت وكل التحديثات باستخدام التعديل. اختبار جميع الموظفين ليوم واحد عن طريق إجراء Test بتمرير تاريخ معين. ويمكن استخدام دالة موظف واحد لشهر كامل باستدعاء منفصل بإضافتكم لإجراء آخر.

سامحني سأتأخر عليك سأقوم بالمطلوب أو بعضه الليلة إن شاء الله.

تم إضافة حقل للإجازات المرضية في الجدول كان قد سقط سهوا. تم تحديث أيام الحضور والغياب. لا أعرف لماذا هذه المرة تفكيري كله في الأكواد ولم أفكر في الاستعلامات. ما عندي شيء آخر آخر أضيفه.

هذه محاولة غير مكتملة فهي فقط تحدد العطل الأسبوعية والإجازات حتى الأن الباقي في حال راقت لكم الفكرة. صار لي فترة طويلة بعيد عن "شغلات" الاستعلامات وأفكار حلول شؤون الموظفين. نسيت أوضح أن الحل في الكود، والنتيجة ستكون في جدول tblEmpAttendance