ابوخليل

انظر هنا فقد تستفيد من هذا الموضوع http://www.officena.net/ib/index.php?showtopic=34596

هذه احدى الطرق لتحقيق الهدف بالاقتصار على استعلام واحد vv.rar

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

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

اعتقد اني فهمت مطلوبك ولكن كيف يدخل بيانات جديدة لو اراد ؟ ... هل يمسحها ويكتب بدلها ؟ اذا كان جوابك نعم .. فالافضل ان تصنع زر لتكرار البيانات في سجل جديد ، مع استخدام الكود السابق عند فتح النموذج

جميل جدا ولكنك ستبحث من خلال حقلين في نموذج اقصد من خارج الاستعلام وستتغير التواريخ عند كل بحث

نعم اتضحت المسألة بداية احب التنبيه للعناية باختيار مسميات الكائنات والعناصر داخل المشروع والتأكد من ان اكسس لا يستخدمها فمثلا تسمية النموذج بـ form لا يصلح لان هذه الكلمة ضمن الكائنات المحجوزة في اكسس ولتخطي هذه المشكلة نزيد الاسم حرفا او رقما ونحو ذلك والافضل تسميته بما يدل على وظيفته وللتعرف على المزيد حول الاسماء المحجوزة في اكسس اتبع الرابط التالي http://www.officena.net/ib/?showtopic=39164 اما بالنسبة للمسألة المعروضة بل افضل من ذلك وهو جمع الاقتطاعات مهما بلغ عددها في المثال المرفق تم التعديل على استعلام الحسميات قم فقط بجلب الاستعلام Qhsmyat الى برنامجك بعد حذفك للاول جرب ووافنا بالنتيجة Rwat1.rar

اكتب في حدث تحميل أو فتح النموذج السطر التالي DoCmd.GoToRecord , , acLast

شكرا لك اخونا الكريم تمت اضافة لمسة عند الفتح لاخفاء اطار القاعدة وكذلك تعديل عند الاغلاق حيث كان البرنامج عند الاغلاق يبقى عالقا في الذاكرة ahmed.rar

if isnull([text1]) Or isnull([text2]) Or isnull([text3]) then MsgBox"لا يمكن ترك احد الحقول فارغا" DoCmd.CancelEvent Exit sub else ' يكتب هنا الآوامر End If

تأكد من وجود هذه المكتبة ضمن المراجع Microsoft Activex Data Objects Library

بحاجة الى زيادة في الشرح والايضاح

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

تمت التجربة على اكسس 2010 وعمل على اكمل وجه

شكرا على المعلومة

بقليل من البحث تجد بغيتك انظر هنا http://www.officena.net/ib/?showtopic=36736 وهنا http://www.officena.net/ib/index.php?showtopic=37846

اخي الكريم احرص على اختيار عنوان مناسب يصف موضوعك تم تعديل العنوان

الحمد لله ،،،

تفضل db2.rar

في المرفق ادناه يتم تصفية التقرير حسب النموذج وبالنسبة لما تريد في الصورة فهو موجود فعلا وكل ماعليك فعله هو زيادة المعايير حسب الرغبة tast6.rar

كنت ذكرت في اجابتي السابقة استخدام مربع السرد ولكن مربع السرد نستخدمه عند اختيار القيم من حقل واحد وهنا ستتم التصفية بناء على اكثر من حقل لذا وضعت لك في النموذج حقول بعدد الحقول في الاستعلام وجعلت خيارها ( أو) حيث ستلاحظ انها متدرجة ومعنى (أو) اي اجراء التصفية بأي معيار يكتب وصرف النظر عن الذي لا يكتب فيه شيء ، أما لو كانت على سطر واحد فحينها تجبر على الكتابة في جميع الحقول الا اذا استخدمنا Like انظر وجرب وحاول db1.rar

وعليكم السلام ورحمة الله وبركاته ومرحبا بك في منتدى اكسس مطلوبك ممكن ويسير بإذن الله وهو كالتالي : - سيكون فتح التقرير من خلال النموذج - نضع في النموذج مربع سرد يحتوي على الحقول المطلوب تصفية التقرير عند الاختيار - انشاء استعلام يكون هو مصدر بيانات التقرير وتكون الحقول في مربع السرد هي المعايير في الاستعلام فقط هذا كل شيء ان لم تتوصل الى الحل ارفق مثالك وليكن على صيغة mdb

ارفع نسخة من المرفق على صيغة mdb

الآن نرجع لمثالك الأول ونعدل فقط على حقول الارقام داخل الكود فقط انظر النتيجة آمل ان تعجبك tast5.rar