منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
جلب جزء من نص بال HtmlAgilityPack - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : جلب جزء من نص بال HtmlAgilityPack (/showthread.php?tid=27116)

جلب جزء من نص بال HtmlAgilityPack - ابو روضة - 26-10-18

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

اخوتى اريد أخذ جزء نص معين من نص كبير كما بهذه الصورة تماما



أخ فاضل هنا دلنى على كود جلبه بالريجيكس


                                                            
كود :
Dim s As String = Regex.Match(sourceString, "(?<=""access_token"":"").+?(?="")").Value


لكن انا اريد جلبه بال HtmlAgilityPack لو تسمحو..

الموقع

https://pastebin.com/raw/fK79BjW7


RE: جلب جزء من نص بال HtmlAgilityPack - rnmr - 26-10-18

جرب هذا

مكتبة HtmlAgilityPack تستخدم مع كود Html

وهذا كود Json والمفروض تستخدم معه مكتبة Json

قراءة معلومات json من الموقع

RE: جلب جزء من نص بال HtmlAgilityPack - asemshahen5 - 27-10-18

كود :
'جرب هذا الكود لا تغير به شيء كل علامتي "" تعتبر علامة واحدة
      TextBox1.Text = TextBox1.Text.Replace("{""session_key"":""5.FnyaTGplwinltg.1500937603.36-100019841194676"",""uid"":100019841194676,""secret"":""03d84a000698019b89a323b550fa"",""access_token"":""", "")
      TextBox1.Text = TextBox1.Text.Replace(""",""machine_id"":""gn12WTgkGjbDs7x_oTZhqteM"",""confirmed"":true,""identifier"":""6b98fc84\u0040mailna.biz""}", "")