[اليوم السابع]

(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 


---

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

  RichTextBox2.Text = System.Text.RegularExpressions.Regex.Match(json, "access_token"":""(.+?)""").Groups.Item(1).Value