أبو أفنان

للجميع ألف شكر

أخي أبو أنس الحمد لله أننا توصلنا الى حل والطريقة مثل ما ذكرت لك سابق فقط لك التحية

إليك الملف بعد التعديل asd.rar

أعمل استعلام وضع المعيار التالي في حقل التاريخ [أدخل التاريخ الثاني] And [أدخل التاريخ الأول]Between وإن أردت أن تدخل التاريخ عن طريق النموذج أعمل في النموذج المسمى مثلاً ss حقلين مربع الأول باسم ss1 والثاني ss2 وضع المعيار التاليى في الاستعلام Between [forms]![ss]![ss1] And [forms]![ss]![ss2] وتضع التاريخ الأول في حقل ss1 والتاريخ الثاني في حقل ss2 تقبل تحياتي

الرابط غير صحيح

دائما أنت رائع أخي مصلح وأنت بحق مملكة أكواد

أولاً يا حبذا لو وضعت كل سؤال في مشاركة حتي يتمكن من يأتي بعدك ليسهل عليه عملية البحث بالنسبة لسؤالك الاول في شريط الادوات أيقونة تسمى معالجات عناصر التحكم لابد من الضغط عليه ليعمل المعالج سؤالك الثاني أعمل استعلام وضع المعيار التاليى في حقل التاريخ [أدخل التاريخ الثاني] And [أدخل التاريخ الأول]Between وإن أردت أن تدخل التاريخ عن طريق النموذج أعمل في النموذج المسمى مثلاً ss حقلين مربع الأول باسم ss1 والثاني ss2 وضع المعيار التاليى في الاستعلام Between [forms]![ss]![ss1] And [forms]![ss]![ss2] تقبل تحياتي

حمل الملف في الموقع التالي وأرفق رابطه في المنتدي http://www.s22s.com/up/upload.php

جزاك الله خير وبارك الله فيك

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

هذا كود تشغيل الاستعلام وبإمكانك تشغيل الاستعلامات الخمس بزر واحد مع إلغاء رسائل الاكسس stDocName = "اسم الاستعلام" DoCmd.OpenQuery stDocName, acNormal, acEdit ولألغاء رسائل الاكسس ضع هذا الكود قبل تشغيل الاستعلامات DoCmd.SetWarnings False

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

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

أجعل اليوم في حقل والشهر في حقل أخر والسنة في حقل آخر لكلا التارخين ثم أجعل حقل لمجموع الايام وآخر للشهر وآخر للسنة تحياتي

بالنسبة للسؤال الأول قد ينفعك هذا الكود ولكن قم بتعديله حسب ما يناسبك Reports("ReportName").GroupLevel(0).SortOrder = True 'لعمل فرز تصاعدي عن طريق حقل معين داخل تقرير مثلاً Reports("ReportName").GroupLevel(0).SortOrder = False 'لعمل فرز تنازلي عن طريق حقل معين داخل تقرير 'يتم وضع الكود عند حدث الفتح للتقرير. ' ' ''هو رقم العمود داخل المصفوفة ورقم صفر هنا يعنى الفرز حسب أول GroupLevelرقم صفر الذي يوضع بجانب 'عمود داخل التقرير واذا وضعنا الرقم '(1) ' فيكون الفرز طبقاً لثاني عمود بالتقرير وهكذا..... 'ولتطبيق ذلك على نموذج 'IDضع الكود التالي عند حدث النقر لزر الأمر لعمل فرز تصاعدي عن طريق الحقل المسمى Me.OrderByOn = True Me.OrderBy = "[id] ASC" 'ولعمل فرز تنازيلي Me.OrderByOn = True Me.OrderBy = "[id] DESC" إجابة السؤال الثاني وهو حساب العمر تجده هنا http://www.officena.net/ib/index.php?showtopic=3160&hl=العمر تحياتي

أعمل أستعلام وضع معيار عند اسم المالك [اسم الحقل الذي فيه اسم المالك]![اسم النموذج الموجود فيه بيانات المالك]![forms] 2. أنشئ تقرير مصدره هذا الاستعلام . 3. في النموذج ضع زر أمر وأختر تقرير ثم طباعة وكود الطباعة إن أرده "اسم التقرير"=stDocName DoCmd.OpenReport stDocName, acNormal تحياتي

أخي أرفق الملف

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

عملت لك ملف على السريع ss.rar

أخي ضع معيار في الاستعلام في حقل الاسم [اسم الحقل في النموذج]![أسم النموذج]![forms] ليتم فتح الاستعلام أو نموذج حسب أختيارك للاسم إن لم يكن الشرح واضح أرفق مثال ليتم التعديل تقبل تحياتي

أحببت أن أطلعكم على الاصل وهو أكثر من 600 كود في الفيجول أكواد v.6.rar

أحبتي في هذا برنامج وهو جميل جداً جداً لكتابة الاكسس وجدته منذ فترة فقمت بحذف الاكواد الموجود فيه وكتب وجمعت أكواد خاصة بالاكسس والى الآن لم أنتهي من جمع الاكواد ولكن أحببت أن أستعجل في إنزاله ولى عودة لهذا الموضوع مرة إخرى تحياتي أكواد الاكسس.rar

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

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

سامحك الله المنتدى لم يوضع إلا لهذا الغرض راجع كل قسم من أقسا الاكسس وسوف تستفيد إن شاء الله تعالى