الأعضاء الكرام
السلام عليكم ورحمة الله وبركاته
في البرنامج المرفق يوجد في أعلى النموذج ثلاثة خلايا أريد أن أضع Grade ووأكتب بداية التاريخ FromDate ونهاية التاريخ ToDate وبكبسة الزر Result يتم إدراج أول السنة وآخرها سنة بسنة وحتى الوصول إلى التاريخ المطلوب...
موضح ذلك بالصورة المرفقة .... :blush:
تقبلوا تحياتي ولكم الأجر والثواب من الله تعالى
تم تعديل هذه المشاركة بواسطة أيمن الزعبي في 3 نوفمبر 2010 في 07:12
وعليكم السلام ورحمة الله وبركاته ..
أخي أيمن باقي عليك أنت أن تضع ضابط للحقول قبل تنفيذ الامر ..
تحياتي ..
تفضل اخى
لاحظ انه تم تعديل اسماء حقلى التاريخ فى الجدول
لان الاسمين الموضوعين منك من الكلمات المحجوزة فى الاكسس
اعتذر اليك اخى ابو عدنان لم ارى مشاركتك سوى اليوم
الاخ ايمن
معك استاذنا ابو عدنان
و بالتوفيق
تم تعديل هذه المشاركة بواسطة Abo_Yossof في 4 نوفمبر 2010 في 21:37
زادك الله من فضله .....
"بصراحة جمايلك مغرقانه" أخي أبو يوسف :blush:
لكن... في مشكلة إنه
مثلا إذا تم إدخال التاريخ (6/7/2001 مثلا) في منتصف شهر معين في خانة FromDate فإن يتم احتساب السنة من بدايتها في خانة dForm وليس من تاريخ الذي أدخلته
ونفس الوضع بالنسبة لخانة ToDate إن تم إدخال تاريخ شهر معين (16/6/2009) مثلا فإنه يتم احتساب آخر سنة للتاريخ*/*/
*********
عفوا أخي محمد أبو عدنان ..... بوركت عزيزي
الله يجزيك كل خير ... لم انتبه إلى مثالك المعدل ..... :blush:
ولكن أيضا يوجد مشكله وهي أنه لا يتم احتساب سنة بسنة من بدايتها وحتى نهايتها ووصولا إلى التاريخ المطلوب بل إن كل سنة تنتهي من منتصفها
تم تعديل هذه المشاركة بواسطة أيمن الزعبي في 4 نوفمبر 2010 في 07:01
أيمن الزعبي كتب:عفوا أخي محمد أبو عدنان ..... بوركت عزيزي
الله يجزيك كل خير ... لم انتبه إلى مثالك المعدل ..... :blush:
ولكن أيضا يوجد مشكله وهي أنه لا يتم احتساب سنة بسنة من بدايتها وحتى نهايتها ووصولا إلى التاريخ المطلوب بل إن كل سنة تنتهي من منتصفها
أخي أيمن لم أتقيد بالصورة التي ارفقتها بالضبط وتركت مصدر الانتهاء بالنسبة لليوم والشهر حسب المعطيات واذا تريدها تحديدا 31/12 فالكود سهل جدا وواضح ويمكنك التلاعب به كما تشاء هذا بالنسبة لتفكيك التاريخ وجمعه من جديد.
على كل الأحوال هذا التعديل الجديد كما في الصورة تماما ..
تحياتي ..
:blink: السلام عليكم ... محمد أبو عدنان ...
سلمت وسلم يمناك ... بصراحة الموضوع تمام عشرة على عشرة
قمت بتنفيذه على برنامج وكانت النتيجة تمام ...
لكن عندما أقوم بفتح النموذج الذي قمت بتطبيق هذا الموضوع عليه عن طريق النموذج الرئيسي .... لا يعمل
ولكن إذا فتحته منفردا يعمل ...
حاولت ولم أجد الحل .. أرجو مساعدتي ........ :blink: :blink: :blink:
وعليكم السلام ورحمة الله وبركاته ..
طولت الغيبة :wink:
بسيطة أخي الكريم عند اضافة السجلات يجب تخزين رقم الملف لاحظ الفرق والتعديل ..
لك تحياتي ..
اعتذر اليك اخى ابو عدنان لم ارى مشاركتك
الى بعد ان اضفت مشاركتى
الاخ أيمن
و بعد اذن اخى ابو عدنان
يجب اضافة رقم الملف
عموما التعديل موجود بالمرفق
و هذا الكود يؤدى نفس العملية
Dim i As Integer, d1, d2, dx As Date
d1 = Me.DFrom
dx = Me.Dto
For i = Year(Me.DFrom) To Year(Me.Dto)
d2 = DateAdd("yyyy", 1, d1) - 1
If dx < d2 Then d2 = dx
CurrentDb.Execute ("insert into Promotions ( [Grade], [From], [To],[FileNo] ) values ('" & Me.DGrade & "',#" & d1 & "#,#" & d2 & "#,'" & Me.FileNo & "');")
d1 = DateAdd("d", 1, d2)
Next
Me.Requery
MsgBox "تمت العملية بنجاح"تم تعديل هذه المشاركة بواسطة Abo_Yossof في 7 نوفمبر 2010 في 14:42
هلا بأخي الحبيب أبو يوسف ..
تعتذر عن ماذا يا رجل .. تقدم لنا الحلوى وتعتذر :P
بارك الله بك والله أنا من يجب أن يعتذر على تقصيري معك وكنت أتمنى أن أكون أفضل من ذلك ولكن هذه هي الامكانيات التي عندي :wink: ..
لك مني دعوة صادقة بهذه الأيام المباركة ... الله يبارك فيك ويرحم والديك وان شاء الله ترافقهم في الفردوس الأعلى قول آمين ..
لك تحياتي ..
تم تعديل هذه المشاركة بواسطة محمد أبو عدنان في 7 نوفمبر 2010 في 21:15
بصراحة ... ما ألذ هذه الحلويات التي قدمتموها لنا ... ما شاء الله عليكم
أتقدم بالشكر الجزيل لعمالقة هذا المنتدى الأخ محمد أبو عدنان وأخي أبويوسف ... بوركتم
حصل معي شئ في البرنامج وهو عندما قمت بتعبئة التواريخ من 1/1/1999م ولغاية 15/4/2004 مشي الموضوع تمام ..... وبعدها قمت بإعادة التبعئة مرة أخرى من 16/4/2004 ولغاية 12/10/2010م
والذي حصل هو أن السنوات في التعبئة الثانية ظهرت من يوم وشهر الإدخال ... وليس من بداية السنة ... (موضح بالصورة)
أرجو التعديل أن تظهر من بدايتها ... :blush: :blink:
تم تعديل هذه المشاركة بواسطة أيمن الزعبي في 8 نوفمبر 2010 في 06:51
أيمن الزعبي كتب:حصل معي شئ في البرنامج وهو عندما قمت بتعبئة التواريخ من 1/1/1999م ولغاية 15/4/2004 مشي الموضوع تمام ..... وبعدها قمت بإعادة التبعئة مرة أخرى من 16/4/2004 ولغاية 12/10/2010م
والذي حصل هو أن السنوات في التعبئة الثانية ظهرت من يوم وشهر الإدخال ... وليس من بداية السنة ... (موضح بالصورة)
أرجو التعديل أن تظهر من بدايتها ... :blush: :blink:
الموضوع بسيط أخي أيمن تابع التعديل بالمرفق ..
لك تحياتي ..
أيمن الزعبي كتب:ألف شكر أخي محمد أبو عدنان ...
مشكلة جديدة ظهرت ... بداية السنوات التي تظهر من بدايتها وليس من تاريخ الإدخال ....
أنظر الصورة :blink: :blink:
بسيطة ولا يهمك :wacko:
تحياتي ..
أخي محمد أبو عدنان ... جمايلك غرقتني والله .... :lol:
والموضوع صار عشرة على عشرة ....
+100
مشكوريين ... الله يكثر من أمثالك :) :) :)
جزاك الله خيرا اخى أبو عدنان
و بالتوفيق اخ أيمن
بارك الله فيك أخي أبو يوسف ...
ألف شكر لحضرتك .... أستاذنا :sleep:
بارك الله فيك أخي أبو يوسف ...
ألف شكر لحضرتك .... أستاذنا :sleep:
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…