[trakktour]

(16-11-19, 09:15 PM)3booody كتب : السلام عليكم ورحمة الله وبركاته

كود :

Dim divs = WebBrowser1.Document.Body.GetElementsByTagName("div")
       For Each d As HtmlElement In divs
           If d.GetAttribute("className") = "epg-number" Then
               MsgBox(d.InnerText)
           End If
       Next

ربي يحفظك يا فنان 
مزيد من التألق ان شاء الله
ألا يوجد طريقة اخرى بدون ويب بروزر؟