(09-11-19, 10:37 AM)princelovelorn كتب :

السلام عليكم ورحمة الله وبركاته

تفضل أخي هذة دورة بالعربي جيدة في تقنية regex

مكونة من 25 درس على اليوتيوب ستفيدك إن شاء الله

الرابط هنا

تمنياتي لك بالتوفيق والنجاح

(09-11-19, 12:25 PM)AbdoDabak كتب :

كود :

 Dim aa As String = File.ReadAllText("C:\Program Files\auth.json")
       Console.WriteLine(aa)
       Console.Read()
       RichTextBox1.Text = (aa)
       RichTextBox2.Text = System.Text.RegularExpressions.Regex.Match(aa, "access_token"":""(.+?)""").Groups.Item(1).Value

اخي ما هو aa

(09-11-19, 12:25 PM)AbdoDabak كتب : اخي ما هو aa

(09-11-19, 01:34 PM)AbdoDabak كتب : اش بدك تسوي بالكود مشان اعرف كيف اسويلك ياه

(09-11-19, 03:05 PM)AbdoDabak كتب :

اخي اذا بدك متل اللي بالصورة

PHP كود :

Imports System.Text.RegularExpressions
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim aa As String = IO.File.ReadAllText("C:\Program Files\auth.json")
        RichTextBox1.Text = aa
        Dim lbl As String
        For Each a As Match In Regex.Matches(RichTextBox1.Text, "((.*?)\w+:+\w+(.*?))", RegexOptions.Compiled + RegexOptions.Multiline)
            lbl = a.Groups(1).Value
            RichTextBox2.Text = lbl
        Next
    End Sub
End Class 


---

الحمد لله انك لاقيت الحل
ممكن تضع الكود للفائدة