ابوخليل

ارفق مثالك حتى يستطيع اخوانك مساعدتك

سيكون البحث لآخر سنة فقط اجعل مصدر النموذج استعلام وفعل خاصية الفرز التنازلي تذكير مرة اخرى : البحث في حقل منفصل افضل ملحوظة : حذفت البيانات من الجداول لتخفيف العبء ترقيم3.rar

المرحلة التالية : اعداد البرنامج للمستخدم - تم عمل نموذج لادخال مشترك جديد - انشاء قائمة مختصرة للطباعة ( عند فتح التقرير انقر بزر الفأرة الأيمن ) - عمل نموذج البداية - استخدام وحدة نمطية خاصة لاخفاء اطارات اكسس عند فتح نموذج البداية الصندوق.rar

تفضل يتم اظهار البيانات للرقم المدخل اذا كان مكررا ترقيم2.rar

ممكن على ان الافضل الفصل التواصل هنا والفكرة بمجملها تتلخص بالتالي : فك الربط 1- ازالة علامة السالب من الجدولين 2- اضافة السنة الى الحقلين اعادة الربط يتبقى عملية الادخال هل تدخل السنة آاليا في الترقيم بدون تدخل من المستخدم ؟ وعملية البحث : هل نبحث عن الرقم واكسس يضيف السنة آليا ؟ لا اخفيك : عملت تجربة ازالة السالب فحصلت على 5 سجلات تكررت مرتين لكني الآن ساحاول تحقيق طلبك بجعل الحقل للبحث ان وجد وللادخال ان لم يوجد

لا بأس ابا الوليد زمن الاجابة : مفتوح حاول مرة أخرى

اقرب وايسر طريق للحل جزاك الله خيرا

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

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

المطلوب غير واضح مطلوب زيادة في الشرح وحسب ما فهمت من طلبك انظر الاستعلام داخل المثال مستخلص 2.rar

اخي محسن تحية طيبة وبعد : كما ترى نحن معك نحاول معالجة وضع معين بعد العمل على قاعدة البيانات ولاشك هناك فرق بين التأسيس وبين التعديل في طلبك الثاني : حسب التطبيق المعمول لست بحاجة لاظهار الرقم ( من وجهة نظري كتابة اكواد للبحث عن سجلين متشابهين فيه زيادة عبء ) لانه اذا ظهرت رسالة تقول ان هذا الرقم سبق ادخاله فما الفائدة من اظهاره في الرسالة فنحن نستنتج التكرار بناء على الخطأ الحاصل If Err.Number = 3022 Or Err.Number = 3058 Then فالرقم 3022 خاص بمخالفات المفاتيح والفهرسة والعلاقات والرقم 3058 خاص بالحقول الفارغة فاذا وجد احد الخطأين ظهرت لنا الرسالة بوجود التكرار والخطأ يظهر بعد التطبيق على حقلين اثنين هما الرقم والتاريخ اما طلبك الاول فهو غير منطقي لانه عند ازالة علامة السالب سيوجد ارقاما متشابهة ولكن طلبك هذا اوحى لي فكرة قد تعجبك _ ولكنها تقلب عملنا السابق رأسا على عقب حيث سنبدأ من الصفر ما رأيك ؟

ليست دوال بل هي معايير ( تصفية حسب الاختيار من مربع التحرير في النموذج ) وقد وصلت معك في هذا الدرس الى مطلوبك الاول (في موضوعك السابقhttp://www.officena.net/ib/index.php?showtopic=54716#entry345897 ) وهو كيفية معرفة واستخراج الذين لم يدفعوا الاشتراك ما دمت كذلك وقد استوعبت الدروس الفائتة فقد جاء دور المعلم ليناقش تلميذه واجابة الطالب هي التي تحدد مدى استيعابه . ومدى الاستمرار في الدرس السؤال : في الخطوة الاخيرة وفي نموذج البحث يتم اختيار العملية من مربع العملية وفي مربع نوع العملية يتم التصفية تبعا لما تم اختياره من مربع العملية المطلوب : اعمل هذا الشيء في المثال المرفق الزمن : 24 ساعة db1.rar

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

اسم مربع النص = RowNum اسم الوحدة النمطية = RowNum كيف ؟؟

لكن عندي شوية استفسارات عن شرح عمل الدوال المستخدمة في الاستعلام والغرض منها.. الموضوع درس فاعرض كل ما عندك حول الموضوع من دون استئذان ايضاً..لماذا لا يستبدل الزرين في اسفل نموذج البحث بزر (ok) او (بحث) ليتم البحث عن الاشياء التي تم اختيارها في النموذج. وشكراً.. سننظر ذلك في المرفق التالي

تفضل مطلوبك هنا http://www.officena.net/ib/?showtopic=42659

ولى سؤال أخر ... كيف يمكن نزع السنة من التاريخ ووضعها فى حقل معين كما فى مثالك السابق ... باستخدام استعلام تحديث استنادا الى الجدول تختار الحقل المراد تحديثه تكتب في حقل ( تحديث الى ) احدى الجملتين التاليتين : DatePart("yyyy";[fDate]) Year([fdate]) باعتبار fDate هو حقل التاريخ في الجدول

تأكد من أمان الماكرو قم بتخفيضه الى الحد الادنى انظر هنا اداة تقوم بالمهمة : http://www.officena.net/ib/?showtopic=37777

تفضل Copy.rar

الخطوة التالية : البحث نبحث فيها عن الذين دفعوا اشتراكاتهم وعن من لم يدفع وعن من صرف له تصفية شاملة او حسب نوع الدفع او نوع المصروف وكذك من خلال الشهر والسنة الاضافات 1- استعلام QryMr 2- نموذج frmSearch 3- تقريرين صندوق6.rar

عمل جميل جدا .. جزيت خيرا ولتكون الاستفادة اكثر تم تحويل المرفق الى صيغة mdb ممنوع حقل فارغ.rar

استاذ انه قريب مما هو مطلوب ولن الاغلاق ليس كما هو مطلوب بل هو ما طلبت : فلم تذكر التناقص او التراجع ولا يغلق بنفس طريقة الفتح ؟ الآن تم تحقيق طلبك الاخير في المثال المرفق مع الشرح Option Compare Database Const i As Double = 4000 'هذا الرقم هو المسؤول عن زيادة ونقص حجم النموذج Dim x As Boolean 'وسيط نعم/لا متغير كشرط لتشغيل العداد Private Sub Form_Open(Cancel As Integer) Me.InsideHeight = 0 ' الارتفاع يساوي صفر عند الفتح Me.InsideWidth = 0 'العرض = صفر عند الفتح x = False ' الوسيط=لا عند الفتح End Sub Private Sub Form_Timer() ' عداد النموذج وقد جعلنا قيمته عند الحدث = 100 If x = False Then ' اذا كان الوسيط = لا Call Enlarg ' شغل التكبير Else ' وإلا Call Redu ' شغل التصغير End If End Sub Private Sub Enlarg() ' وحدة نمطية تزيد الطول والعرض 100 كل 0.1 من الثانية If i > Me.InsideHeight Then Me.InsideHeight = Me.InsideHeight + 100 Me.InsideWidth = Me.InsideWidth + 100 Else x = True End If End Sub Private Sub Redu() ' وحدة نمطية تنقص الطول والعرض 100 كل 0.1 من الثانية If Me.InsideHeight > 0 Then Me.InsideHeight = Me.InsideHeight - 100 Me.InsideWidth = Me.InsideWidth - 100 End If If Me.InsideHeight < 10 Then ' اذا كان الارتفاع اقل من 10 DoCmd.Close ' اغلق النموذج DoCmd.OpenForm "frm2", acNormal ' وافتح النموذج رقم2 End If End Sub تكبير وتصغير متدرج.rar

جزاك الله خيرا استاذ سليم اخونا حمدي انظر هنا ستجد بغيتك http://www.officena.net/ib/index.php?showtopic=37285

الآن ارفقت لك المرفق مع ادوات التعديل كل ما عليك عمله هو نقل الاستعلامين الى قاعدة بياناتك ولكن لا تشغل استعلام التحديث Q_Up حتى تجري التغييرات التالية : 1- انشاء حقل id ترقيم تلقائي في الجدول Order وعدل في الخصائص مفهرس= نعم بدون تكرار 2- انشاء حقل رقمي s_id في الجدول Order Detail 3- شغل استعلام التحديث Q_Up 4- انتقل الى الجدول Order Detail وتأكد من وجود البيانات في الحقل s_id 5-اذهب الى العلاقات : أ- احذف العلاقة الأولى التي بين OrderID في الجدولين ب- اربط العلاقة الجديدة بين id و s_id هنا انتهينا ويمكنك الان التخلص من الاستعلامات وحذفها db44.rar