30-10-18, 10:05 PM
(30-10-18, 09:31 PM)elgokr كتب : من الطبيعي سيكون الخطاء فى هذا الجزء
كود :
id='grid-558373'
انا فتحت الرابط وقمت بعرض السورس كود للصفحةوتخيلت نفسى مكان البرنامج وقلت اتخير اجرب الكودوبمجرد البحث على هذه الجملة لم احصل عليه فى السورس كود
حتى بمجرد البحث عن
كود :
grid-
احصل على الجملة فى اشياء مختلفة تماماً عن ما هو مكتوبراجع الامر وتاكد من المسميات وتذكر اى شئ تحتوى على ارقام قد تجدها متغيرة مع كل تحديث للصفحةوهذا ما كنت اتحدث عليه فى الفرق بين ده والاخر![]()
تحياتى لكوتمنياتى لك التوفيق
نعم أخى ولكنى بحاول مع كذا فيديو وصححت الكود بعض الشيئ وللاسف كما هو الحال
الكود الجديد
كود :
Dim wc As New WebClient
wc.Encoding = Encoding.UTF8
Dim html As String = wc.DownloadString("https://www.youtube.com/watch?v=q9yKUiOYj8Y")
Dim doc As New HtmlAgilityPack.HtmlDocument
doc.LoadHtml(html)
For Each n As HtmlAgilityPack.HtmlNode In doc.DocumentNode.SelectNodes("//*[@id='watch7-sidebar-modules']/div[1]/div/div[2]/ul/li/div[2]/a/span/img")
PictureBox1.Load(n.Attributes("src").Value)
Next
