تقييم الموضوع :
  • 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

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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ماهي طريقة تغيير لون خلية معينة في الكريستال ريبورت حسب قيمة معينة جيولوجي مبتدئ 3 97 , 02:59 PM
آخر رد: baha
  ممكن تحويل الكود لحلقة تكرار m.n.hakami 2 74 , 12:25 AM
آخر رد: m.n.hakami
  أريد تحويل مشروعي من اكسس الى sql Dr.Sherif Alazizi 20 7,239 08-11-19, 01:27 PM
آخر رد: ggtt17121985
  مشكلة اضافة قيمة للريجسترى ابو روضة 6 155 06-11-19, 12:50 AM
آخر رد: ابو روضة
  ادخال الوقت الحالى + تاريخ الادخال mmali127 3 163 03-11-19, 12:14 PM
آخر رد: mmali127
  [VB.NET] مشكلة جلب قيمة من موقع معين farfour 0 66 31-10-19, 04:17 PM
آخر رد: farfour
  [VB.NET] مشكلة جلب قيمة من موقع معين الماجيك مسعد 4 152 30-10-19, 11:38 PM
آخر رد: الماجيك مسعد
  مقارنة تاريخ علي هيئة نص في قاعدة بياناتا سيكول بالتاريخ الحالي makky 1 104 24-10-19, 12:13 AM
آخر رد: اسامه الهرماوي
  تحقق عن قيمة فى الداتا جريد مع قيمة فى داتا جريد اخري mostafa12 3 175 13-10-19, 03:42 AM
آخر رد: mostafa12
  مساعده في تحويل هذه المعادله الى لغه فيجوال mostafa12 1 128 06-10-19, 08:29 PM
آخر رد: mostafa12

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


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