ابا جودى

هذه هى النتيجة

جرب الطريقة دى Photo.zip

وجدت الحــــــــــــــــــــــل Replace(Replace(Format(Now(), "hh:mm:ss am/pm"), "am", "صباحاً "), "pm", "مساءًا")

كل الشكر والتقدير استاذى العزيز ومعلمى القدير استاذ @Shivan Rekany يحتاج القليل من التعديل ليكون IIf(Format(Now(), "hh") >= 12, Format(Now(), "hh:mm:ss" & " مساءا "), Format(Now(), "hh:mm:ss" & " صباحا ")) ولكن اسمح لى سيدى انا وصلت لهذه النتيجة وكتبت هذا الكود ولكن سيدى ان تنسيق الوقت يكتب معه صباحا ومساء فقط عندما يعمل بنظام 12 ساعه ولكن هذا الكود يظهر التسيق بنظام 24 ساعة ما اريده هو نظام 12 ساعة ومعها صباحا او مساء

مثال اليوم تقريبا لا غنى عنه وهو للتأكد من وجود ملف معين فى مسار محدد نضع الكود الاتى فى موديول حتى نقدر على استخدامه من اى مكانه ' As Boolean ' Boolean: ياخذ نوعين من القيم True و False (طوله 2 بيت ) Public Function FileExist() As Boolean 'strPath = "full path\File Name.Extension" strPath = "D:\My Work\officena.mdb" ' مسار الملف كاملا متبوع بامتداد الملف If Dir(strPath) <> Empty Then FileExist = False Else: FileExist = True ' هنا نمرر المسار على دالة Dir ليتعرف البرنامج عليه ان كان موجود ام لا End Function وللتجربة والتأكد نمرره الى صندوق الرسائل كالاتى MsgBox(FileExist)

بغض النظر عن انك مخالف فى عنوان الموضوع الذى لا علاقة له بالموضوع انا سوق اطرح الاجابة ولكن رجاء فى المرة القادمة حاقظ على اختيار العنوان المناسب لتحافظ على القوانين المنظمة للمشاركات داخل المنتديات تكاليف1.accdb

اهلا اخى وحبيبى الغالى اولا شكرا على التوضيح جزاكم الله خيــرا ولكن لاحظ ال ـ format Format(now(), "hh:nn:ss AM/PM")

اساتذتى الكرام تحية طيبة عطرة كيف يكون التسيق للوقت على هذا الشكل >>------>> (10:20:12 ) صباحا بدون ما حد يتعصب على عارف احيانا اسال اسئله غبيه ولكن انا اعتز بلغتى العربية واريد ان تكون الواجهة عربية 100 % اعرف ان التسيق يكون Format(now(), "hh:nn:ss AM/PM") ما اريده هو استبدال AM/PM بـ صباحا او مساء بغض النظر عن اعدادت الويندوز

مقارنه_الاكسس.rar

طيب بغض النظر عن ان ممكن تحقيق ده بالكود والحسابات والارقام لتحديد المكان من غير تعقيد وببساطه شوف المرفق ده اتفضل تغيير مكان الصورة.mdb

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

ده حتي ما فى عفاريت فى شهر رمضان

شكرا لك وأنا فى طريقى للحل بإذن الله حيث اننى أتممت 80 % من الحل اخى الكريم اولا اتمنى من الله تعالى ان يهيئ لكم من امركم رشدا ويزرقكم الحل ان شاء الله وقد يكون طرحك لأفكار النسبة التى وصلت اليها درب يستطيع ان يسلكه من قد يريد تقديم المساعدة فيأتى الله بالحل على يديه  وسأقوم برفع الفكره بعد انهائها ليستفيد من يبحث عن مثل ذلك جزاكم الله خيرا وكمال قال رسول الله صل الله عليه وسلم (المؤمن يألف ويؤلف، ولا خير فيمن لا يألف ولا يؤلف، وخير النَّاس أنفعهم للنَّاس) اسأل الله تعالى ان ينفع بنا وبكم دمتم بكل الخير والصحة والسعادة ان شاء الله ورمضان كريم وانتم الله اقرب

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