منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

(17-02-18, 12:23 PM)طالب برمجة كتب : [ -> ]رقم الهاتف أحيانا يكون بكلمة (لرقم) وأحيانا (من رقم) مسألة اقتناص رقم الهاتف والكود ليست دقيقة دائما فقد تتغير الكلمات والمسافات والأقواس

PHP كود :

Dim txt As String = IO.File.ReadAllText("D:\SMS\SMS١٥٠٢٢٠١٨_٠٤_٥٣_٤١.txt")

Dim arr() As String = (From m In Regex.Matches(txt, "\d+,.+") Select CStr(m.Value)).ToArray
For Each a In arr
    Dim r = a.Split(",")

    Dim tel As String = Regex.Match(r(4), "(?<=(من رقم|لرقم)\s?\(?\s?)\d{10,}").Value
    Dim code As String = Regex.Match(r(4), "(?<=(رقم العملية)\s?\(?\s?)\d{10,}").Value

    Dim lst As New List(Of String)(r)
    lst.Add(tel)
    lst.Add(code)

    Me.DataGridView1.Rows.Add(lst.ToArray)
Next 


في اللاين الخاص بملف الرسالة في اول اللاين كلمة (تم استلام ) دة اساسي بالرسالة في حالة استلام رصيد وهي ادق لو استخدمناها واقنصنا الرقم بعد كدة
وممكن طلب اخر
عايز احفظ البيانات بجملة insert بحيث ارجع اعدل واعمل ابديت عليها