تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تحويل قيمة الي تاريخ
#1
اريد تحويل المتغير الاتي الي وقت وتاريخ لأضيفة الي قاعدة البيانات

"الجمعة ٠٨/١٢/٢٠١٧ at ٠٣:٣٦:٠١ م"
الرد
تم الشكر بواسطة:
#2
الارقام الظاهرة في النص ليست ارقام حقيقية ويجب تحويلها الى ارقام حقيقية ثم يتم اقتطاع جزء التاريخ لتحويله
PHP كود :
Dim t As String "الجمعة ٠٨/١٢/٢٠١٧ at ٠٣:٣٦:٠١ م"
Dim d

For Each c As Char In t.ToCharArray
    If AscW
(c) >= &H660 And AscW(c) <= &H669 Then
        t 
t.Replace(cChrW(AscW(c) - &H630))
 
   End If
Next

Dim s 
As String Regex.Replace(t"(\w+)\s?(\d{2}/\d{2}/\d{4})\s?at\s(\d{2}:\d{2}:\d{2}\s\w+)""$2 $3")
If 
IsDate(sThen d CDate(s)

MsgBox(d
الرد
تم الشكر بواسطة: محمد اسماعيل
#3
(22-02-18, 02:24 PM)طالب برمجة كتب : الارقام الظاهرة في النص ليست ارقام حقيقية ويجب تحويلها الى ارقام حقيقية ثم يتم اقتطاع جزء التاريخ لتحويله
PHP كود :
Dim t As String "الجمعة ٠٨/١٢/٢٠١٧ at ٠٣:٣٦:٠١ م"
Dim d

For Each c As Char In t.ToCharArray
    If AscW
(c) >= &H660 And AscW(c) <= &H669 Then
        t 
t.Replace(cChrW(AscW(c) - &H630))
 
   End If
Next

Dim s 
As String Regex.Replace(t"(\w+)\s?(\d{2}/\d{2}/\d{4})\s?at\s(\d{2}:\d{2}:\d{2}\s\w+)""$2 $3")
If 
IsDate(sThen d CDate(s)

MsgBox(d

زادك اللّة من علمة وفضلة ورفع قدرك

الكود تمام
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] هل ممكن كود فيجوال بيسك لزر تغير تاريخ الكمبيوتر للوراء وكود اخر ارجاعه طبيبعي jam3h 13 761 20-09-20, 08:46 PM
آخر رد: jam3h
  عملية جمع قيمة التكست ZaerAllail 10 408 15-09-20, 09:24 PM
آخر رد: ZaerAllail
  [ تمّ الحل ] : جلب قيمة من الريجيستري عبد العزيز البسكري 11 392 10-09-20, 04:01 PM
آخر رد: عبد العزيز البسكري
  [سؤال] تنظيم ارفاق المستندات في قاعدة البيانات Sql واحضار الملفات حسب قيمة البحث محمد العامر 10 592 07-09-20, 12:28 AM
آخر رد: محمد العامر
  [كود] كود لإظهار قيمة في TextBox حسب ما يقابلها من قيمة في combobox momiana1 8 16,810 18-08-20, 12:51 PM
آخر رد: mohammed1994
  [سؤال] هل يمكن تحويل مشروع الي ملف DLL saleh101 1 208 14-08-20, 02:14 AM
آخر رد: asemshahen5
  [سؤال] تحويل نص يحتوي عملية الى عملية حسابية عبد الهادي بهاب 4 289 09-08-20, 02:29 AM
آخر رد: عبد الهادي بهاب
  التعديل على عمود في الداتاقريد فيو دفعة واحد بناء على قيمة معينة جيولوجي مبتدئ 3 331 02-08-20, 02:10 AM
آخر رد: ابراهيم ايبو
  التعديل على عمود في الداتاقريد فيو دفعة واحد بناء على قيمة معينة جيولوجي مبتدئ 0 198 01-08-20, 07:49 PM
آخر رد: جيولوجي مبتدئ
  خصم الكميات الموجوده باكتر من تاريخ NABILWARSAW 14 816 20-07-20, 08:29 PM
آخر رد: WaeLx

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


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