الموجود لديك ليس ساعات العمل ..وانما توقيت الساعة
المفروض ان تستخرج ساعات العمل والذي يساوي الفرق بين نهاية العمل وبداية العمل بأستخدام دالة datediff
ثم تضرب الناتج في سعر الساعة ..
الافضل ارفاق مثال للعمل عليه
ليست هناك مشكلة دكتور ..سطر الكود لديك بدون نهاية قوس
الفكشن هو
Function SetActiveControlColour()
Dim ctl As Control
For Each ctl In Me.Controls
ctl.BackColor = RGB(150, 180, 215)
Next ctl
Me.ActiveControl.BackColor = vbYellow
End Function
ماهو المعيار الذي تريد الحذف من خلاله؟ وعلى العموم وكما تفضل به الاستاذ موسى
يمكنك عمل checkbox وتضغط على الخقول او السجلات التي تريد حذفها ..وفي استعلام الحذف تضع معيار = True تحت الجيك بوكس
وعليكم السلام
يرجى توضيح مطلبك بمثال بين 3 موظفين ...محمد ..علي ..خالد
لنفرض ان محمد لديه مهمة بتاريخ 1/10.. علي لديه مهمة في 2/10.. خالد لديه مهمة في 3/10
المفروض ان المهمة الرابعة ستكون من حصة محمد ...هذا الذي فهمته
مطاليبك تحتاج لتوضيح اكثر
وعليكم السلام ..
انظر للاستعلام AbsentQ الذي يحدد عدد ايام الغياب لكل طالب
لكني لم افهم البحث بين تاريخين ..حول اي موضوع تبحث ؟ هل تبحث عن الغيابات بين تاريخين ؟
__الفياب.accdb
بعد اذن اخي عمر ضاحي ...
الاساس عندك هو فاتورة الشراء او البيع ... والصنف هو جزء من تلك الفاتورة
يمكنك ان تعمل كومبوبوكس للصنف في فاتورة الشراء او البيع وتجعل مصدر بياناتها هو الصنف ..او تجعل مصدر بيانات الصنف عبارة عن باركود
حل على السريع حسب مقترح الاستاذ عبدالله
يمكن استبدال الاستعلامات بجمل السيكوال..حسب رغبتك وحتى لاتكون هناك استعلامات كثيرة
New Microsoft Access Database(3).rar
لا تعمل Issue_doc رقم تلقائي وانما حوله الى رقم
ثم في القيمة الافتراضية لهذا الرقم في نموذج المبيعات ضع الكود التالي
=Nz(DMax("Issue_doc";"Issue_doc");0)+1
اعتقد لان بعض الحقول فيها قيم ولهذا في كل مرة يأخذ رقم جديد حينما يكون الترقيم تلقائي