عبد الله قدور قام بنشر مايو 21 مشاركة قام بنشر مايو 21 السلام عليكم ورحمة الله وبركاته عندما اقوم بوضع تاريخ في متغير public من نوع تاريخ يتم اعتماده بالتنسيق الامريكي شهر يوم سنة فإذا كان التاريخ غير صحيح يعتمده يوم شهر سنة هنا نقع في مشكلة انه احيانا يأخذ التاريخ صحيح واحيانا لا فما الحل حتى نستطيع جعل الاكسس يعتمد نظام التاريخ يوم شهر سنة في كل الحالات رابط هذا التعليق شارك More sharing options...
kkhalifa1960 قام بنشر مايو 21 مشاركة قام بنشر مايو 21 استاذ @عبد الله قدور اليك محاولتي . Option Compare Database Option Explicit Dim Date1 As Date Dim xx xx = Format([Date1], "dd/mm/yyyy") رابط هذا التعليق شارك More sharing options...
عبد الله قدور قام بنشر مايو 21 الكاتب مشاركة قام بنشر مايو 21 14 دقائق مضت, kkhalifa1960 said: استاذ @عبد الله قدور اليك محاولتي . Option Compare Database Option Explicit Dim Date1 As Date Dim xx xx = Format([Date1], "dd/mm/yyyy") للاسف عند استخراج النتيجة يبقى التاريخ mm/dd/yyyy رابط هذا التعليق شارك More sharing options...
kkhalifa1960 قام بنشر مايو 21 مشاركة قام بنشر مايو 21 استاذ @عبد الله قدور ممكن مرفق. رابط هذا التعليق شارك More sharing options...
kkhalifa1960 قام بنشر مايو 21 مشاركة قام بنشر مايو 21 استاذ @عبد الله قدور اليك محاولتي الثانية بالمرفق التالي . Date Public Function.rar رابط هذا التعليق شارك More sharing options...
عبد الله قدور قام بنشر مايو 21 الكاتب مشاركة قام بنشر مايو 21 (معدل) سأشرح لك المشكلة بالتفصيل تقوم اساس المشكلة باختيار سعر الصرف من جدول اسعار الصرف يقوم المستخدم للبرنامج بادخال سعر الصرف في حال تغييره كما في الصورة التالية الان عند اعداد اي تقرير مالي يجب تقييم العمليات على اساس سعر الصرف حسب تاريخ العملية مثال عندنا عملية دفع بتاريخ 1-4-2024 يجب على البرنامج اعتماد سعر الصرف 32.60 عملية دفع جديدة بتاريخ 2-4-2024 يجب ان يعتمد البرنامج على سعر الصرف 32.6 (لان تاريخ العملية ليس له تعديل في جدول اسعار الصرف ، فالمنطق يقول ان سعر الصرف بقي كما هو في اليوم السابق ) الان نحن نستمر في استخدام سعر صرف 32.6 الى تاريخ 6-4-2024 بتاريخ 7-4-2024 نبدأ باستخدام سعر صرف 32.1 حتى تاريخ 24-4-2024 بتاريخ 25-4-2024 نبدأ باستخدام سعر صرف 32.4 حتى تاريخ 30-4-2024 المشكلة الان عندما اقوم بوضع تاريخ العملية في متغير من نوع date يعتمد تنسيق التاريخ شهر يوم سنة ولا استطيع مقارنة التاريخ مع الجدول باستخدام الدالة dlast بسبب ان التواريخ عندي يوم شهر سنة والتاريخ المعتمد في المتغير date هو شهر يوم سنة الان هل يمكن جعل المتغير من نوع date يعتمد تنسيق يوم شهر سنة طبعا تغيير التنسيق باستخدام format لم احصل على نتيجة ولا باستخدام cdate ولا dateserial ولا datevalue تم تعديل مايو 21 بواسطه عبد الله قدور رابط هذا التعليق شارك More sharing options...
Moosak قام بنشر مايو 21 مشاركة قام بنشر مايو 21 أنظر هنا أستاذ @عبد الله قدور 🙂 2 رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر مايو 24 مشاركة قام بنشر مايو 24 مشاركة جانبية متأخرة مع الأساتذة ( أن تصل متأخراً خير من أن لا تصل ابدأ )، جرب هذه الفكرة اخي @عبد الله قدور ، ننشئ دالة عامة في مديول ونستخدم هذا الكود الذي يعيد تنسيق التاريخ بالشكل DD/MM/YYYY :- Public Function ParseDate(inputDate As String) As Date Dim dayPart As String Dim monthPart As String Dim yearPart As String dayPart = Mid(inputDate, 1, 2) monthPart = Mid(inputDate, 4, 2) yearPart = Mid(inputDate, 7, 4) ParseDate = DateSerial(CInt(yearPart), CInt(monthPart), CInt(dayPart)) End Function ونستدعيه على سبيل المثال كالآتي ( المتغير اختياري وعلى سبيل المثال ) :- Dim myDate As Date myDate = ParseDate("24/05/2024") ودمتم 🤗 1 رابط هذا التعليق شارك More sharing options...
عبد الله قدور قام بنشر مايو 24 الكاتب مشاركة قام بنشر مايو 24 (معدل) 12 ساعات مضت, Foksh said: مشاركة جانبية متأخرة مع الأساتذة ( أن تصل متأخراً خير من أن لا تصل ابدأ )، جرب هذه الفكرة اخي @عبد الله قدور ، ننشئ دالة عامة في مديول ونستخدم هذا الكود الذي يعيد تنسيق التاريخ بالشكل DD/MM/YYYY :- بعد جهد في هذا المجال وصلت الى قناعة ان المشكلة في تعريف المتغير من نوع date هذا المتغير ما ان تم استخدامه فان التاريخ المعتمد هو شهر يوم سنة فإذا فشل في اعتماد ذلك اعتمد يوم شهر سنة فوصلت لحل هو عدم استخدام المكتبة date ابدا قمت بتحويل التاريخ الى رقم على الشكل التالي تاريخ 01/05/2024 الى 20240501 هكذا يحافظ هذا الرقم على نفس ترتيب التواريخ واستخدم متغير من نوع long بدلا من date ووضعت العمود في جدول وجعلته محسوب كما في الصورة والنتيجة كانت ولتذهب مكتبة date بما فيها الى الجحيم تم تعديل مايو 24 بواسطه عبد الله قدور 1 رابط هذا التعليق شارك More sharing options...
Foksh قام بنشر مايو 24 مشاركة قام بنشر مايو 24 13 دقائق مضت, عبد الله قدور said: ولتذهب مكتبة date بما فيها الى الجحيم بطريق آخر ،، المهم نجاح الفكرة و وصولك الى حل يعالج مشكلتك ، بالتوفيق أستاذ @عبد الله قدور 1 رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان