honey

سهل احمد العريشي حكيم ياالعريشي .. والله ماقصّرت والله يعطيك على قد ماتعطي تسلم على هالمجهود الطيب والممتاز .... وابشّرك الكود اشتغل معاي 100% THANX :)

سهل احمد العريشي الله يجزيك ألف خير ياخوي ويجزيك عنّا وعنّك بصالح الاعمال بس ياأخوي في مسائلة وهي اني حطيت الكود اللي موجود بالبرنامج فوق لحساب تاريخ آخر تعديل Private Sub Form_BeforeUpdate(Cancel As Integer) If IsNull(Me![DateEntered]) Then Me![DateModified] = Date Else Me![DateModified] = Date End If لكن حسب الظاهر انّي ماعرفت أتعامل معه بالشكل الصحيح ,, فياريت لو تكمّل معروفك ... وتشوف لي طريقة لحساب وقت آخر تعديل بحيث انه يكتبه في مربع نص ولك خالص التقدير والاحترام

ابغى كود أو طريقة ما ممكن من خلالها معرفة تاريخ لآخر تعديل أو إضافة في حقل معين واريد ان يكون التاريخ مسند إلى مربع نص ولكم جزيل الشكر والتقدير

ارغب في إضافة هذا الكود إلى مربع نص ولكن لم اعرف ماهي الطريقه .... أرجو من المختصّين المساعده ولكم جزيل الشكر والتقدير طبعاً in_progress و total عبارة عن عمودين في قاعدة البينات الكود : IF In_progress >= .05 * total يكتب في مربع النص كلمة (( ممتازة )) Else يكتب في مربع النص كلمة (( ضعيفة )) ولكم جزيل الشكر وكامل الامتنان والله يجعلها في ميزان حسناتكم في هذا الشهر الفضيل تقبّلوا شكري وتقديري إلى جميع القائمين على هذا المنتدى الرائع