+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : اريد جلب هذا الرابط (/showthread.php?tid=22881)
اريد جلب هذا الرابط - ابو روضة - 11-12-17
السلام عليكم اخوتى
ممكن لو سمحتم ازاى اجلب رابط داخل التكست بوكس من خلال صفحة
يعنى اريد هذا الرابط https://twitter.com/i/videos/939527663730950147?embed_source=facebook
بال HtmlAgilityPack او RegExr
حاولت بهذا ولم ينجح
كود :
html = wc.DownloadString(TextBox1.Text)
Dim doc As New HtmlAgilityPack.HtmlDocument
doc.LoadHtml(html)
For Each n As HtmlAgilityPack.HtmlNode In doc.DocumentNode.SelectNodes("/html/head/meta[19]")
TextBox2.Text = (n.InnerText)
Next