اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر (معدل)

فى النموذج الرئيسى يتم كتابة التاريخ و هو بمثابة تاريخ البداية 
ومن حقل (من) بداية الرقم الذى سنبدأ منه مسلسل الارقام 
الى حقل (الى)  وهو ستنهى عنده مسلسل الارقام
* عدد السجلات تم اخذها من طرح حقل (الى) - (من)


المطلوب فى النموذج الفرعى اضافة مسلسل الارقام  واضافة التاريخ  كما الصورة المرفقة

التاريخ هناك حقل فى النموذج الرئيسى (تباعد التاريخ ) و هو نختار تباعد التاريخ لكل سجل و يكون البداية من حقل التاريخ 
* أن العميل مفروض يحضر كل خمس أيام مثلا 

العمل على زرار الطريقة الجديدة 

زرار الطريقة القديمة يعمل جيداً و لكنه يأخذ وقت كثير فى عد السجلات 


و جَزاكم الله كلَّ خير

Screenshot (37).png

test2023-1.mdb

تم تعديل بواسطه محمد احمد لطفى
  • تمت الإجابة
قام بنشر
3 ساعات مضت, محمد احمد لطفى said:

العمل على زرار الطريقة الجديدة 

في زر الامر ضع التالي

Dim x As Date
Dim a As Integer
Dim rs As DAO.Recordset
x = Forms![TEST1]![Date_M]
Set rs = CurrentDb.OpenRecordset("subx")
For a = Forms![TEST1]![NumberEnd] - 1 To Forms![TEST1]![NumberStart] - 1
rs.AddNew
rs!date1 = x
rs!id = Forms![TEST1]![id1]
rs!serial = Forms![TEST1]![serial]
rs!NumberX = a + 1
x = DateAdd("d", Forms![TEST1]![ChooseDayes], x)
rs.Update
Next a
rs.Close
Set rs = Nothing
Me.Requery

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

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

تحياتي

 

 

لطفي.gif

  • Like 1
  • Thanks 1
قام بنشر
17 دقائق مضت, محمد احمد لطفى said:

أستأذنك ممكن نشوف الطريقة الثانية ممكن تكون افضل

لم اتحدث عن طريقة ثانية

قلت

45 دقائق مضت, متقاعد said:

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

واقصد انه  لو كان زر الامر في النموذج الرئيسي لما احتجنا الى كتابة المسار الكامل للحقول في الرئيسي

rs!serial = Forms![TEST1]![serial]

تكون

rs!serial = meserial

وايضا ممكن الاستعانه بمتغيرات وهكذا من حيث الترتيب

تحياتي

  • Thanks 1
قام بنشر

طريقه باليوم وبالشهر وبآخر الدفعات او دفعه محدده افضل من تكدس قاعدة البيانات بسجلات لا فائده منها من سجل واحد فقط احتمال تكون فكره! :wub:

@محمد احمد لطفى لا تنسى عندي مشكله بموضوع اذا في احد يقدر يساعدني هه :smile:

هذه بطريقه جديده

1.gif.e72ca452143eb9caf7ff5244afb38257.gif

2.gif.27424c60401512e291ddd27606fa5605.gif

هذا من مرفقك وليس من مرفق @Eng.Qassim :wub:

test2023-1.rar

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

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

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

Important Information