تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طريقة تحويل نص الى تاريخ
#1
لدى تاريخ بصيغة String
و أرغب فى تحويله الى date
لأن فى كل مرة أحاول أدخلة لقاعدة البيانات DATE يقول لى فى رسالة خطأ :
Conversion from string " 13/ 3/ 2016" to type 'Date' is not valid

محتاج رأيكم
الرد
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته
PHP كود :
Dim strDate As String TextBox1.Text
        Dim MyDate 
DateTime.ParseExact(strDate"dd-MM-yyyy"Nothing)
        
TextBox2.Text MyDate 

نرجو من الأخ الكريم إرسال مشروع مصغر عن الفكرة للتعديل عليه وشكرا.
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#3
أخى العزيز  khodor1985 
خالص التقدير لك
الموضوع كله كما ترى بالصورة 3 متغيرات :
( واحد لليوم  (Str(day_Renamed  .....   و الثانى للشهر (Str(mth .....  و  الأخير للسنة (Str(yr  )
و طبعا كلهم string ...
المطلوب كما ذكرت اذاى أحولهم الى تاريخ SHORTDATE
طبعا وضعت الكود اللى تكرمت و أرسلته هنا فى مشاركتك لكن للأسف لم يعمل كما فى الصورة

الرد
تم الشكر بواسطة:
#4
نعم صحيح، لقد وقعت في الفخ، لم تعدل على الـ Format
تنسيق التاريخ في المتغير الأول StrDate يحتوي على "/"
أما في المتغير الثاني MyDate يحتوي علي : "-"

التعديل على الكود :
PHP كود :
Dim StrDate as string str(day_Renamed) & "/" str(mth) & "/" str(yr)
Dim MyDate DateTime.ParseExact(StrDate,"dd/MM/yyyy",Nothing)
Label17.Text MyDate 

أتمنى لك التوفيق
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#5
أخى العزيز ... تعبتك معى
لكن أنظر الصورة الحالية ... واضح أنه لا يوجد حل !!!!!!!!!!!!
الرد
تم الشكر بواسطة:
#6
الأكواد :
PHP كود :
Dim strDate As String txtDay.Text "/" txtMonth.Text "/" txtYear.Text
        Dim MyDate 
DateTime.ParseExact(strDate"dd/MM/yyyy"Nothing)
 
       txtDate.Text MyDate 

النتيجة :
   

المرفق :

.rar   khodor1985 - ConvertDate.rar (الحجم : 72.7 ك ب / التحميلات : 34)

وهذه طريقة ثانية :
PHP كود :
Dim StrDate As String str(Day_Renamed) & "/" str(mth) & "/" str(yr)
Dim MyDate DateTime.Parse(StrDate)
Label17.Text MyDate 
إسرائيل إلى زوال ... وسوف تثبت الأيام ذلك ... قريباً إن شاء الله.
الرد
تم الشكر بواسطة:
#7
أخي الفاضل :

جرب الكود التالي :

 في قسم التصريحات ضع

كود :
Imports System.Globalization

ثم اكتب الكود في العمليات كالآتي :


كود :
Dim strDate As String = TextBox1.Text
       Dim MyDate = DateTime.ParseExact(strDate, "d/M/yyyy", CultureInfo.CurrentCulture)
       TextBox2.Text = MyDate
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#8
السلام عليكم...

لماذا لا تستعمل الدالة DateSerial مع المتغيرات مباشرةً...

PHP كود :
Dim MyDate As Date DateSerial(yrmthDay_Renamed)
Label1.Text MyDate

' أو

Dim MyDate As Date = DateSerial(yr, mth, Day_Renamed)
Label1.Text = MyDate.ToString("dd/MM/yyyy") 

نرجو الاستفادة و السلام.
بِسْمِ اللهِ الرَّحْمَنِ الرَّحِيمِ ( وَ مَا تُقَدِّمُوا لِأَنفُسِكُم مِّنْ خَيْرٍ تَجِدُوهُ عِندَ اللهِ هُوَ خَيْراً وَ أَعْظَمَ أَجْراً ) صَدَقَ اللهُ الْعَظِيمُ
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#9
PHP كود :
dim date1 as date = new date txtYear.Text txtMonth.Text txtDay.Text
الرد
تم الشكر بواسطة: khodor1985 , khodor1985
#10
http://vb4arb.com/vb/thread-14118.html
اسم معرفي : محمد يحيى
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  طريقة عمل عداد لمستخدمين البرنامج YousefOkasha 5 96 منذ 1 ساعه مضت
آخر رد: YousefOkasha
  هل هناك طريقة لتسريع هذا الكود ابو روضة 1 48 19-06-18, 09:45 AM
آخر رد: elgokr
  ترتيب الملفات في المجلد حسب تاريخ التعديل مع حذف الاقدم atefkhalf2004 3 47 06-06-18, 04:56 PM
آخر رد: mrnooo2000
  [سؤال] طريقة استيراد جداول بملف اكسل الى قاعدة البيانات mysql safox 1 55 06-06-18, 03:10 AM
آخر رد: سعود
Wink سؤال لاساتذتنا الكرام اريد طريقة لاستبدال النقطة "." بالفاصلة "," . kalammoufid 2 69 05-06-18, 04:43 PM
آخر رد: kalammoufid
  تحويل مشروع من 32 الى 64 رسول555 2 61 05-06-18, 01:18 AM
آخر رد: boudyonline
Question [سؤال] هل يوجد طريقة للحصول على الموقع الحالي (خط الطول والعرض)؟ السندبااد 10 185 05-06-18, 01:06 AM
آخر رد: السندبااد
Exclamation [نقاش] هل من طريقة للتعامل مع الأكواد للمشروع عن طريق الإنترنت ؟ YousefOkasha 12 213 04-06-18, 03:17 AM
آخر رد: YousefOkasha
  ما هي افضل طريقة لعمل جدول مجموعات متفرعة قاسم 6 97 02-06-18, 02:13 AM
آخر رد: sendbad100
  [VB.NET] ماهي احسن طريقة لانشاء التقارير في فيجول دوت نت 2010 من قاعدة بيانات اكسس zahraa mahdi 6 119 31-05-18, 03:00 AM
آخر رد: elgokr

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم