ابوخليل

ما رايك ان افتح موضوعا جديدا وبعنوان مناسب لاعادة تصميم البرنامج ؟ ملحوظة : يمكنك الاستفادة لاحقا من نماذجك وتقاريرك الموجودة بداية : الاصلاح سيتم على الجداول والاستعلامات

وعليكم السلام بصفة عامة : علامة التعجب ( ! ) ما بعدها يعتبر جزء أو عضو في المجموعة التي قبله اما النقطة ( . ) فما بعدها هو خاصية أو أسلوب من سابقه واحيانا نجد هذا التعريف غير منضبط حين يكون التعامل داخل محرر النموذج وهل تتحول المجموعة الى خصائص ؟ ام ان هذا خاص بـ اكسس فحين نريد ان نشير الى حقل خارج النموذج محل العمل نستخدم هذه الصيغة forms!frm1!text1 ولكن حينما نشير الى حقل ونحن داخل النموذج نستخدم me.text1 حيث me تعني النموذج الحالي علما انه يمكننا الاكتفاء باسم الحقل فقط للاشارة اليه ما دمنا داخل النموذج

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

انت بحاجة الى اعادة هيكلة للبرنامج ككل ، اقصد تأسيس الجداول بطريقة صحيحة سأعينك ونخرج بعمل مرضي ان شاء الله هي مسألة وقت

اعتذر منك اخي كريمو فلم استطع الامساك باي حبل يوصلني الى مطلوبك ضاعف الله لك الدرجات وكل سنة وانت طيب

NZ([text1])+NZ([text2])+NZ([text3])+NZ([text4])+NZ([text5])>>>>> الخ الدالة NZ ترجع القيمة الخالية صفرا

الحمد لله اخي العزيز alshamal سرني مرورك وتقييمك

أخي ابا الوليد تحية طيبة وبعد حقيقة يوجد في جهازي اكسس 2003 فقط وطبعا لا يمكنني فتح المرفق ولكن بالامس كان ابني بجانبي ومعه جهازه المحمول فاطلعت على مثالك وقمت بالتعديل عليه فلو حولت عملك وجعلته على صيغة mdb لرجوت لك تفاعلا اكبر من الزملاء نعود لموضوعنا : والتصفية من خلال الشهر افضل لا شك لسهولة التعامل ويمكن وضع قائمة منسدلة بالاشهر للاختيار منها ولكن قبل ذلك انت بحاجة الى اعادة النظر في التأسيس : فكيف تبحث في جدول الدفعات عن اشخاص غير موجودين اصلا ؟ وهذه يوجد لها حل ولكن العائق الحقيقي انك ستبحث عن اشخاص غير موجودين خلال شهر معين ، وحقل التاريخ الذي تبحث فيه فارغ !

في الكود ادناه يمكنك عند الخطأ جعل مربع الصورة فارغ او عرض صورة رمزية On Error GoTo ErrHandler Me.myPics.Picture = Application.CurrentProject.Path & "\" & Me.eSiS & ".jpg" ErrHandler: If err.Number = 2220 Then Me.myPics.Picture = "" ' Me.myPics.Picture = Application.CurrentProject.Path & "\0.jpg" End If

تم التعديل واخراج الرصيد اما معرفة المتأخرين فمن وجهة نظري حين يكون الاشتراك شهريا فيجب البحث بمعلومية الشهر وليس تاريخ بداية وتاريخ نهاية فنبحث عن المتأخرين خلال شهر رمضان فيكون المعيار في الاستعلام رقم 9 وتستطيع استخلاص رقم الشهر من التاريخ في عمود مستقل في الاستعلام باستخدام الدالة month لتصبح هكذا : رقم_الشهر:month([حقل التاريخ]) الصندوق.rar

حياك الله اخي علي وكل سنة وانت طيب والمسألة يسيرة بإذن الله كل ماعليك عمله هو التعامل مع خصيصة الفرز والتجميع انظر الصورة المرفقة

اخي كريمو الجداول المدمجة في الاستعلام وهي Employee و Company اساسا لا يوجد فيها ملاحظات حيث ان الملاحظات التي بينتها في الصورة موجودة في جداول اخرى

تفضل اخي مهتدي تم التعديل حسب رغبتك مجاميع اجمالية في تقرير وايضا مجاميع تفصيلية في تقرير Moh_RepotUp.rar

بهذه الطريقة (قد) يستفيد صاحب السؤال فقط وانما بني هذا المنتدى من اجل بذل المعلومة ونشرها للجميع من هنا >> كيفية رفع المرفقات http://www.officena.net/ib/index.php?showtopic=31250

حتى على 2010 لا يعمل

ارفق مثالك مبينا عليه مطلوبك واحرص ان يكون على صيغة mdb

اخي الكريم المثال لا يعمل تأكد من عمله ثم ارفعه مرة اخرى

الغاء ازرار النسخ واللصق في لوحة المفاتيح Ctrl+C , Ctrl+V Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If (Shift And 2) And (KeyCode = Asc("C")) Then KeyCode = 0 MsgBox "No Coping Allowed, Cheater!!!" ElseIf (Shift And 2) And (KeyCode = Asc("V")) Then KeyCode = 0 MsgBox "No Pasting Allowed, Cheater!!!" End If End Sub

تفضل واحدة من الطرق تحويل الى شهر ويوم وساعة ودقيقة .rar

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

جزيت خيرا تم ضم المشاركة الى الدروس المثبتة

وعليكم السلام ورحمة الله وبركاته الاستعلام الجدولي يحقق النتيجة المطلوبة انظر مثالك بعد التعديل اما لو اردت ان ترسم تقريرا خاصا فيمكنك توظيف الدالة Dcount لعد الافراد حسب النوع فمثلا نكتب السطر التالي لجلب عدد الذكور في فرع معين نكتبه في في عنصر التحكم لحقل في نموذج او تقرير فهو يجلب عدد البيانات في جدول حسب شرطين نصيين =DCount("txt1";"tbl1";"txt1='" & "1" & "'" & " And txt2='" & "ذكر" & "'") Database4.rar

السلام عليكم كل سنة وانت طيب والعراق بخير وتآلف وعز ومنعة واجتماع كلمة انظر تم التعديل على المثال واعذرني فلن اتمكن خلال هذه الايام من التواجد كالعادة رواتب112.rar

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

كنت انتهيت من عمل نموذج قبل مشاركتك الاخيرة جعلته نموذجا واحدا فقط ويبحث بالاسم والرقم واظنه كافيا جرب وافحص واخبرني بملاحظااتك ان اردت ظهور بعض البيانات للموظف يمكن اظهارها في حقول غير منضمة استنادا الى مربع التحرير النموذج متقن 100% الا من هنة صغيرة ان لم تكتشفها سأخبرك بها لاحقا رواتب111.rar