ظهور التاريخ القادم للاجازة السنوية

تفضل اخي الكريم : خالد

ضع في مربع النص للإجازة القادمة هذا التعبير

=IIf([Vacation]='annual leave';DateAdd("yyyy";1;[EndDate]))

في حالة كانت الإجازة سنوية ( يتم الحساب ويظهر التاريخ )

في حالة اي اجازة اخرى ( يكون الحقل فارغ )

za-Vacation.rar

بالتوفيق

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

خالد يحي الامام كتب:

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

اخي الفاضل : خالد

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

Private Sub Form_AfterUpdate()
Dim strSQL As String
DoCmd.SetWarnings False
strSQL = "UPDATE Table1 SET Table1.NextVacation = forms!FORM!NVacation WHERE (((Table1.ID)=forms!FORM!id))"
DoCmd.RunSQL strSQL, dbFailOnError
DoCmd.SetWarnings True
End Sub

za-Vacation-LAST.rar

بالتوفيق

لكي الشكر والتقدير استاذتي هذا هو المطلوب وسوف اجربه على البرنامج واذا ظهرت اي مشكلة برفع الملف إن شاء الله واكرر الشكر

بعد التحية استاذتي كما ذكرت واجهتني مشكلة لا اعرف السبب هل باعتبار النموذج فرعي ام ماذا مرفق الملف النموذج باسم search deleave ولكي مني كل الشكرDataleave.rar

للرفع والتذكير

تفضل اخي الكريم

الملف بعد التعديل بناء على طلبك

فقط اتبع الخطوات الثلاث

za-Dataleave-UP.rar

بالتوفيق