ابوخليل

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

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

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

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

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

لنقل جدول محدد : DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\Database1.mdb", acTable, "Table1", "Table1" وهذا لنقل استعلام محدد DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\Database1.mdb", acQuery, "Query1", "Query1" واذا اردت جعل القاعدة الجديدة في الملف الحالي اي بجانب قاعدة البيانات لنفرض ان المسار هو "C:\Database1.mdb" فسيكون بعد التعديل :: CurrentProject.Path & "\Database1.mdb"

الاخ الكريم فادي تحية طيبة وبعد لاشك ان الأفضل كبداية : الالمام نوعا ما بطريقة انشاء البرامج وخاصة المستودعات والمبيعات وهنا في الروابط ادناه بعض البرامج الجاهزة والدروس حول هذا الموضوع علما ان المنتدى يحتوي على الكثير منها فقط اعمل خاصية البحث http://www.officena.net/ib/?showtopic=37251 http://www.officena.net/ib/?showtopic=20387 http://www.officena.net/ib/?showtopic=31429 http://www.officena.net/ib/index.php?showtopic=45579 http://www.officena.net/ib/index.php?showtopic=18692 http://www.officena.net/ib/index.php?showtopic=45453 http://www.officena.net/ib/?showtopic=43975 http://www.officena.net/ib/index.php?showtopic=49815 http://www.officena.net/ib/index.php?showtopic=27203 وهنا دروس مرئية لتعليم اكسس http://www.officena.net/ib/index.php?showtopic=51157 بعد الاطلاع والتجربة والمحاولة وواجهتك بعض الصعوبات يمكنك ارفاق ما وصلت اليه حتى نتمكن من مساعدتك

انظر هنا فقد تستفيد من هذا الموضوع 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

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