اذهب الي المحتوي
أوفيسنا

المساعدة فى ترحيل الاعضاء الذين مر عليهم 3 سنوات من التاريخ الحالى


الردود الموصى بها

معلش اريد توضيح اكتر لان المشاركة طالت واخذت من وقت المنتدى والاحبة اكتر من اللازم

نفترض عضو

اشترك لعام 2012/2013 والاشتراك يبدأ من 1/7/2012 حتى 30/6/2013

اشترك لعام 2013/2014 والاشتراك يبدأ من 1/7/2013 حتى 30/6/2014

اشترك لعام 2014/2015 والاشتراك يبدأ من 1/7/2014 حتى 30/6/2015

لو نظرنا للعضو ابراهيم والبيانات الاساسية تم تسجيلها على جدول البيانات Members والاشتراكات الثلاثة فى جدول Eshtrak هنا ثلاث تواريخ نهاية اشتراك فى الحقل DateEshtrakend فى جدول Eshtrak

30/6/2013

30/6/2014

30/6/2015

عملت استعلام1 وقمت باختيار اخر تاريخ للاشتراك وهو 30/6/2015 بكده سوف نختار كل عضو واخر تاريخ نهاية اشتراك ثم قمت بعمل معادلة للحصول على السنوات ومن ثم اضغط على ترحيل لكل من وصل 3 سنوات

ارجو ان  وصلت طلبى

تم تعديل بواسطه أكسس وبس
رابط هذا التعليق
شارك

السلام عليكم و رحمة الله و بركاته 

هل تريد أن يقوم البرنامج بهذا الاجراء بشكل يومي ...
أي تلقائياً .. أم انك ترغب بتنفيذه بعد النقر على أحد الازرار

 

تم تعديل بواسطه يوسف مؤذن
رابط هذا التعليق
شارك

السلام عليكم و رحمة الله و بركاته
بعد الإطلاع على الجدوال المنية و البنية ..
اخبرك بان العملية حسب طلبك غير ممكنة

اولا استخدمت رقم التعريف بالموظف أو العضو أو سمه ماشئت ( ترقيم تلقائي )و هنا بدأ الخطأ

ثم ربطت الاشتراكات مع مع الاعضاء ( أم حسب ما سميته الموظفون ) برقم التعريف ( و الذي هو رقم تلقائي )  - و هذا خطأ آخر

ثم تطلب أن يتم نقل نقل العضو لجدول آخر و هو Member 

عملية النقل يعني أنك ترغب بعمل حذف للموظف ( حسبما اسميه من جدول الموظفين )

و هنا الخطأ الثالث .. هذا سيؤدي لحذف كافت الاشتراكات للسنوات السابقة من سجل الاشتراكات

و عندما ترغب بإعادة الموظف ( لن تعود الاشتراكات ) 

------

الحل 

ابسط مما تقول 

نقم بإضافة حقل جديد بأسم ( موقوف ) على سبيل المثال من نوع Ballon قيمته صح أو خطأ

ثم تبني استعلام للموظفين بظهر كافة البيانات بشرط أن يكون حقل ( موقوف ) False

ثم إذا ما تم التوقف عن الاشتراك لمدة ثلاثة اعوام 

يقوم البرنامج بصورة تلقائية أو يدوياً حسب رغبتك بوضع علامة (صح ) في حقل ( موقوف ) 

بهذا لن يظهر الاسم ضمن الاشتراكات

و للإستعلام عن الاعظاء الموقوفين ( تبني نفس الاستعلام السابق ) و لكن على تكون قيمة حقل ( موقوف ) True

و إنتهت المعضلة التي تتطالب بها 

و بالتوفيق

فديو توضيحي

جمعية.mdb

  • Like 1
رابط هذا التعليق
شارك

اشكرك يا اخى الكريم ولكن هل قرات اخر مشاركة ليا الموضوع مش موظفين مجرد جمعية وبها اعضاء مشتركين والموضوع لتنظيم الاشتراكات حاول تشوف الملف المرفق انا عاوز الكل الاعضاء يظهروا فى نموذج Up3Years وبعد كده اضغط على المفتاح ترحيل كل من ساوى 3 سنوات او زاد يتم ترحيله ما اريده من اخوانى هو مساعدتي فى المعادلة واشكركم

اقتباس

معلش اريد توضيح اكتر لان المشاركة طالت واخذت من وقت المنتدى والاحبة اكتر من اللازم

نفترض عضو

اشترك لعام 2012/2013 والاشتراك يبدأ من 1/7/2012 حتى 30/6/2013

اشترك لعام 2013/2014 والاشتراك يبدأ من 1/7/2013 حتى 30/6/2014

اشترك لعام 2014/2015 والاشتراك يبدأ من 1/7/2014 حتى 30/6/2015

لو نظرنا للعضو ابراهيم والبيانات الاساسية تم تسجيلها على جدول البيانات Members والاشتراكات الثلاثة فى جدول Eshtrak هنا ثلاث تواريخ نهاية اشتراك فى الحقل DateEshtrakend فى جدول Eshtrak

30/6/2013

30/6/2014

30/6/2015

عملت استعلام1 وقمت باختيار اخر تاريخ للاشتراك وهو 30/6/2015 بكده سوف نختار كل عضو واخر تاريخ نهاية اشتراك ثم قمت بعمل معادلة للحصول على السنوات ومن ثم اضغط على ترحيل لكل من وصل 3 سنوات

ارجو ان  وصلت طلبى

 

New.rar

رابط هذا التعليق
شارك

ايه يا اخوانى والله مستعجلللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللللل

رابط هذا التعليق
شارك

سوي استعلام الحاق مبني على جدول Members  واستعلام 1 وحط الشرط تحت age >=3  والحقه بجدول Members2 

 ونفس الطريقة بجدول الاشتراكات  بكذا يسوي ترحيل للجدولين المحددين بدون حذف العضو من الجدول الرئيسي 

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

 

هذا والله اعلم 

 

رابط هذا التعليق
شارك

اللي واضح في الجدول عندي ان احد الاعضاء وهو انثى وصل إلى  4 سنوات وكم شهر أي اكبر من ثلاث سنوات عند انشاء استعلام مبني على جدول Members  بمحتوياته كاملا واستعلام واحد فقط حقل age وضعنا تحت الحقل شرط وهو >=3  نتج عنه ترحيل هذا العضو مع بقائه في جدول Members 

 

استعلام الالحاق يكون من الجدول والاستعلام 1 معا 

تم تعديل بواسطه مسفر
رابط هذا التعليق
شارك

اخى واخوانى الكرام

ضفت على الكود لحذف من الجدول الرئيسي Members و Eshtrak طالما انه سوف يتم الترحيل منهم الى جدول Members2 و Eshtrak2 ولكن لم تظبط معي عند الضغط تظهر رسالة يطلب مني ادخال رقم فى حقل age ولا يبالى ان كانت اكبر من 3 سنوات او اقل من 3 سنوات

DoCmd.SetWarnings False
If AGE >= 3 Then
DoCmd.OpenQuery "AA"
DoCmd.OpenQuery "DD"
Dim MySql As String
MySql = "DELETE Members.IDMem, Members.Member_name FROM Members WHERE ((Members.AGE >='3'))"
DoCmd.RunSQL MySql
Me.Refresh

 

Copy of New1.rar

رابط هذا التعليق
شارك

السلام عليكم كمل جميلك يجزيك الله خيرا لسه فى حاجة تانية

لما يدفع المتأخرات والغرامات يرجع للجدول الرئيسي

السلام عليكم كمل جميلك يجزيك الله خيرا لسه فى حاجة تانية

لما يدفع المتأخرات والغرامات يرجع للجدول الرئيسي

رابط هذا التعليق
شارك

وفى حاجة اطلعت على الرد عاوزين نرحل ثم الحذف من الجدول Members و الجدول Eshtrak

اقتباس

ضفت على الكود لحذف من الجدول الرئيسي Members و Eshtrak طالما انه سوف يتم الترحيل منهم الى جدول Members2 و Eshtrak2 ولكن لم تظبط معي عند الضغط تظهر رسالة يطلب مني ادخال رقم فى حقل age ولا يبالى ان كانت اكبر من 3 سنوات او اقل من 3 سنوات

DoCmd.SetWarnings False
If AGE >= 3 Then
DoCmd.OpenQuery "AA"
DoCmd.OpenQuery "DD"
Dim MySql As String
MySql = "DELETE Members.IDMem, Members.Member_name FROM Members WHERE ((Members.AGE >='3'))"
DoCmd.RunSQL MySql
Me.Refresh

 

Copy of New1.rar

 

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information