المساعدة فى ترحيل الاعضاء الذين مر عليهم 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 سنوات

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

تم تعديل مارس 29, 2018 بواسطه أكسس وبس

[أكسس وبس]

احلى مسا على الحبايب

هو ديما نقف فى نصف الطريق لبنكمل الموضوع للاخر ولا مفيش رد من اصلا

يا اخوانى وين المدد

تم تعديل مارس 29, 2018 بواسطه أكسس وبس

[أكسس وبس]

والله انا منتظر فرج الله فى الليلة المفترجة

[أكسس وبس]

جمعة مباركة عليكوا ان شاء الله

[يوسف مؤذن]

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

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

 

تم تعديل مارس 30, 2018 بواسطه يوسف مؤذن

[يوسف مؤذن]

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

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

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

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

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

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

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

------

الحل 

ابسط مما تقول 

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

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

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

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

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

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

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

و بالتوفيق

فديو توضيحي

جمعية.mdb

[أكسس وبس]

اشكرك يا اخى الكريم ولكن هل قرات اخر مشاركة ليا الموضوع مش موظفين مجرد جمعية وبها اعضاء مشتركين والموضوع لتنظيم الاشتراكات حاول تشوف الملف المرفق انا عاوز الكل الاعضاء يظهروا فى نموذج 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  تعني مرور ثلاث سنوات فاكثر قاعدتك ما فهمتها 

 

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

 

[أكسس وبس]

اشكرك يا اخى مسفر عملت الى قولت عليه ولكن نقل جميع الاعضاء

[مسفر]

حط الشرط  ينقل فقط الانثى 

[أكسس وبس]

مش فاهم حضرتك ينقل الانثى

حضرتك استعلام الالحاق يكون فيه جدول Members مع الاستعلام1

[مسفر]

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

 

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

تم تعديل مارس 30, 2018 بواسطه مسفر

[أكسس وبس]

ممكن بعد اذن حضرتك ترفقه

[مسفر]

جرب اضغط على ترحيل 

New.accdb

[أكسس وبس]

تمام يااخى مسفر مش ناقص الا استعلام حذف من الجدول الرئيسي

[أكسس وبس]

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

ضفت على الكود لحذف من الجدول الرئيسي 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

[أكسس وبس]

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

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

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

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

[مسفر]

اعكس الاستعلامين للإلحاق

 

تم تعديل مارس 31, 2018 بواسطه مسفر

[أكسس وبس]

والله منتظرك

طيب ممكن اجرب لانى قعدت افنش فالبرنامج ومنتظر حد من الاخوان يطلع عليه ويشوف لو فيه سلبيات

[مسفر]

تفضل في نفس الفورم 

 

New.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

 

[مسفر]

بحثت عن الحقل AGE  في جدول Members حسب الكود اللي انت وضعته ما لقيته كيف يحذف بشرط غير موجود في الجدول ؟

WHERE ((Members.AGE >='3

 

 

 

 

 

 

 

 

 

 

 

 

 

ظ

[أكسس وبس]

انا بشتغل على الاستعلام1

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

جمعية.rar