[ابو روضة]

(29-08-17, 08:46 PM)سعود كتب :

(29-08-17, 08:14 PM)ابو روضة كتب :

اول تجربة لاقتناص جزء من ردى الاخير

ماشاء الله
باي تقنية Regex Or html
ممكن الكود

بمتابعة شرح الاخ الشاكى وفهم جزئيات من شرحكم هنا الان

كود :

Dim url As String = "http://vb4arb.com/vb/showthread.php?tid=21515&page=2"
       Dim hWeb As HtmlAgilityPack.HtmlWeb = New HtmlAgilityPack.HtmlWeb
       Dim doc As HtmlAgilityPack.HtmlDocument = hWeb.Load(url, "GET")
       Dim node As HtmlAgilityPack.HtmlNode = doc.DocumentNode.SelectNodes("//*[@id='pid_104835']/div[1]")(0)
       Label1.Text = node.InnerText

بحب اتعامل انا جدا مع XPath