منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] تاريخ انشاء الملف بالميلادي - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] تاريخ انشاء الملف بالميلادي (/showthread.php?tid=1060)

تاريخ انشاء الملف بالميلادي - ali.alfoly - 24-11-13

السلام عليكم
استخدمة الكود

كود :
MsgBox(IO.File.GetCreationTime("C:\tst.txt").Date)

في معرفة تاريخ انشاء الملف
لاكن لما جربت المشروع علي ويندوز عربي جاب التاريخ الهجري

اريد الحصول علي التاريخ الميلادي مهما اختلف نوع التقويم في نظام التشغيل

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

RE: تاريخ انشاء الملف بالميلادي - ali.alfoly - 24-11-13

وللتوضيح انا ليه عايزه ميلادي مش قصة ميلادي ولا حتي اغريقي
اريد حفظ هذا التاريخ في ملف نصي لكي اقارنه فيما بعد لكي اعرف هل تم التعديل علي الملف ام لا

RE: تاريخ انشاء الملف بالميلادي - m0075 - 24-11-13

تفضل اخي العزيز قمت بعمل مثال لك بالفيجول بيسك 2010

http://www.gulfup.com/?ilkYv5

اتمني لك التوفيق Smile

RE: تاريخ انشاء الملف بالميلادي - ali.alfoly - 24-11-13

جزاك الله خيرا رائع جدا
ورجاء شرح الكود

كود :
Function mw(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String
        Return gDate.ToString(format, New Globalization.CultureInfo("ar-eg"))
    End Function


RE: تاريخ انشاء الملف بالميلادي - m0075 - 24-11-13

(24-11-13, 04:50 AM)ali.alfoly كتب : جزاك الله خيرا رائع جدا
ورجاء شرح الكود

كود :
Function mw(ByVal gDate As Date, Optional ByVal format As String = Nothing) As String
        Return gDate.ToString(format, New Globalization.CultureInfo("ar-eg"))
    End Function

استخدام الاعدادت الاقلمية في تغير صيغة التاريخ
وبهذا الطريقة راح يعرض التاريخ حسب الاعدادت الاقلمية لمصر
وتستطيع اختيار اي دولة فيها التاريخ حسب الاعدادت الاقلمية ميلادي
وتسطيع العكس بالنسبة للهجري اختيار السعودية ar-eg قم بجعلها ar-sa

اتمني تكون وضحت الصورة

RE: تاريخ انشاء الملف بالميلادي - ali.alfoly - 24-11-13

نعم وضحت
جزاك الله خيرا
اسئل الله العظيم ان ينفعك بما علمك
وان يجعله في موازين حسناتك يوم تلقاه