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

[Abdelaziz Osman]

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

مرفق محتوى اكسيس  باسم tab20  به جدول باسم tab20  داخل الجدول ثلاث حقول الاسماء كالتالى

pan   &  lan  &  van

يتم تغذية هذه الحقول يوميا بالبيانات من قبل المستخدمين 

المطلوب طريقة تلقائية لتفريغ نلك الحقول الثلاثة فقط من البيانات دون غيرها داخل tab20  ، عند بداية كل عام ميلادى جديد

على سبيل المثال عند تاريخ 1/1/ yyyy من كل عام عند بدأ تشغيل tab20 فى هذا التاريخ من كل عام

ولسيادتكم جزيل الشكر والتقدير

tab20.rar

[Foksh]

انشيء استعلام تحديث واختر من الجدول الحقول التي تريد تفريغها ، واجعل نوع الاستعلام استعلام تحديث ، وعند قيمة ( تحديث إلى ) ضع علامتي التنصيص "" فقط .

وعند اي حدث مثلاُ اجعله ينفذ الاستعلام

جرب وأخبرني بالنتيجة

[Abdelaziz Osman]

@Foksh معلمنا   بالغ التحية

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

على سبيل المثال اذا بدأ تشغيل قاعدة البيانات فى العام 2024 يبدأ تشغيل الاستعلام مروه واحدة فقط وهكذا اذا انتقلنا للعام 2025  وهكذا

[Foksh]

في النموذج الرئيسي الذي يعمل أول نموذج في مشروعك قم بإدراج مربع نص مصدره ()Date واجعل الحدث عند فتح النموذج جملة شرطية إنه اذا كانت قيمة مربع النص ( التاريخ ) يساوي 1/1/2024 أن يعمل الإستعلام فقط.

أيضاً كفكرة جرب هذه الجملة الشرطية في النموذج الذي يعمل كأول نموذج في مشروعك ...

If Year(Date()) = year(date())+1 Then
    DoCmd.OpenQuery "اسم_الاستعلام"
End If

حيث ()date الثانية تمثل حقل فيه تاريخ سابق تم تسجيله في جدول للمقارنة بين التاريخ الحالي لليوم وتاريخ سابق.

وغداً إن شاء الله وكان في العمر بقية ، سأرفق لك ملف كما طلبت

تم تعديل نوفمبر 7, 2023 بواسطه Foksh
توضيح وتصحيح

[kkhalifa1960]

تفضل أخي @Abdelaziz Osman محاولني فقط أدخل تواريخ قبل العام الحالي وشغل الاستعلام (Query1) وشوف الناتج .

tab20-1.mdb

[Foksh]

تفضل هذا التعديل كما طلبت ، عند بداية كل سنة سيقوم بحذف السجلات التي حددتها فقط .

 

Reset_Tbl.accdb

[Abdelaziz Osman]

جزالك الله خيرا  معلمنا @Foksh

تم تعديل نوفمبر 7, 2023 بواسطه Abdelaziz Osman