كيف يمكن التحكم في تاريخ المدخلات بحيث لاتتجاوز

صمم جدول وليكن باسم ( TblDate) وبه حقل باسم ( DateChk)

أكتب التاريخ الذي لا ترغب في أن يتجاوزه المستخدم في الحقل

اذهب إلى أي نموذج به حقل التاريخ الذي لا تريده أن يتجاوز التاريخ في الجدول ولنفرض أن اسم الحقل (UsetDT)

أكتب في حدث ( بعد التحديث ) ما يلي :

اقتباس

dim DChK as date

DCHK = Dlookup("[DateCHK]","TblDate"(

If user dt + 30 > Dchk then

Msgbox( " التريخ الذي أدخلته لا حق لتاريخ كذا")

end if

ربما تحتاج إلى ضبط الكود يمينا أو يسارا

تحياتي

اقتباس

dim DChK as date

DCHK = Dlookup("[DateCHK]","TblDate"(

If user dt + 30 > Dchk then

Msgbox( " التريخ الذي أدخلته لا حق لتاريخ كذا")

end if

عفوا فكتابة الكود يبدو أنها ملخبطة ( بكسر الباء )

إليك مثالا مرفقا

DateXp.rar

اخي حديث الزمان وكل الازمان

الف شكر علي اهتمامك

ماتفضلت به رائع

وجزاك الله خيرا عليه

بس

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

حالة ادخال تاريخ اقل من التاريخ المحدد

املي ان يتم التحديد بفترة

تبدا من اول الشهر وتتنتهي باخره

وعلي العموم اليك المثال

السلام عليكم

اخي الكريم حديث الزمان انا فهمت فكرة اخي moha1670 واريد ان اوضحها لك ( بعد اذن اخي moha1670 )

على سبيل المثال وليكن عندنا شركة صغيرة وتأتيها فواتير نثرية , وكل فاتورة لها تاريخ معين صدرت به

مثلا : فاتورة تاريخها 1/1/2004 يعني ان هذة الفاتورة صدرت بشهر 1 وليس بشهر 2 أو 3

هو يريد ان يمتلك نموذج به حقل يسمى بـ الفترة وهي الشهر الذي صدر به الفاتورة والحقل الثاني تاريخ الفاتورة وهو تاريخ اليوم المحدد الذي صدرت به الفاتورة بحث اذا كانت عندنا فاتورة بتاريخ 25/6/2004 من الطبيعي ان نكتب في حقل الفترة (6) لأنها شهر 6 ونكتب في حقل تاريخ الفاتورة 25/6/2004

الخلاصة : اذا كتبنا بـ حقل الفترة رقم مختلف عن تاريخ الفاتورة لا يقبل .

مثال : الفترة : (7)

تاريخ الفاتورة : 16/7/2004

( عملية صحيحة )

الفترة : (7)

تاريخ الفاتورة : 16/8/2004

(عملية غير صحيحة )

لا يكون طولنا عليكم واتمنى اني اصبت في نقل المعلومه الصحيحة

ننتظر الرد

إليك الملف بعد التعديل حسب شرح الأخ طلال

DateXpAmmended.rar

مشكور الاخ الكريم طلال حامد

والشكر موصول لحديث الزمان

ارجو ان يوضح المثال المرفق ما اعنية

date 1.rar

في الانتظار

أشكر الأخوان على حبهم لمساعدة الآخرين

وبعد إذنكم اسمحوا لي بالتعقيب :

عندما نريد أن نختبر قيمة للقبول بها أولا لدينا أسلوبان :

1- من خلال خاصية قاعدة التحقق من الصحة

2- من خلال الكود : هنا يجب أن نكتب كود التحقق في حدث BeforeUpdate أو (قبل التحديث) ونعين قيمة المتحول Cancel إلى True إذا كانت القيمة مرفوضة أما إذا وضعنا الكود في حدث بعد التحديث فإنه يصبح عديم الفائدة إذا أن القيمة قد تم تخزينها فعلاً في القاعدة ..

وقد عملت التعديل المطلوب على الملف المرفق وهذا هو

date 1.rar

في انتظارك من بدري

مشرفنا العزيز مهند عبادي

الف شكر

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

هو المطلوب بالضبط

بارك الله في علمك

ونفع بك

والف شكر للمن ساهم ولو بامحاوله في الحل