تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
جلب اسماء وروابط هذه الصفحة بالHtmlAgilityPack
#1
السلام عليكم ورحمة الله وبركاته
اخوتى بحاول اجلب روابط هذه الصفحة 


باسمائها لكن الاسماء تأتى دون الروابط

وهذا صور للمشروع والمشروع مرفق اتمنى الحل الله يكرمكم




كود :
 Dim url As String = "http://fatwa.islamweb.net/fatwa/index.php?page=FatwaCategory&CatId=186"
       Dim wc As New WebClient
       wc.Encoding = Encoding.Default
       Dim html As String = wc.DownloadString(url)
       Dim doc As New HtmlAgilityPack.HtmlDocument
       doc.LoadHtml(html)
       For Each n As HtmlAgilityPack.HtmlNode In doc.DocumentNode.SelectNodes("//div[@class='contents']/a[@href]")
           ListBox1.Items.Add(n.InnerText)
           lst.Add(n.Attributes("href").Value)
       Next


الملفات المرفقة
.zip   اسلام ويب.zip (الحجم : 133.6 ك ب / التحميلات : 6)
الرد
تم الشكر بواسطة:
#2
تفضل أخي سامي
كود :
lst.Add("http://fatwa.islamweb.net/fatwa/" & n.Attributes("href").Value)
الرد
تم الشكر بواسطة: ابو روضة , elgokr , elgokr
#3
(19-09-18, 08:23 AM)911 كتب : تفضل أخي سامي
كود :
lst.Add("http://fatwa.islamweb.net/fatwa/" & n.Attributes("href").Value)

الله يكرم اصلك أخى ويبارك بعمرك فعلا نجحت
هو ما ينفعش انزع هذا الاسم من بين الاسماء " رقم الفتوى "

الرد
تم الشكر بواسطة: 911 , 911 , elgokr , elgokr
#4
كود :
ListBox1.Items.Add(Regex.Match(n.InnerText, ".+").Value)
الرد
تم الشكر بواسطة: ابو روضة , elgokr , elgokr
#5
(19-09-18, 08:40 AM)911 كتب :
كود :
ListBox1.Items.Add(Regex.Match(n.InnerText, ".+").Value)

شكرا لك أخى الكريم وجزاك الله كل خير فعلا نجحت
الرد
تم الشكر بواسطة: 911 , 911 , elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Bug [VB.NET] نزول الى اسفل الصفحة WebBrowser mervandzz 1 67 17-11-18, 03:30 AM
آخر رد: elgokr
  جلب اسماء هذه الصفحات براوبطها ابو روضة 7 159 15-11-18, 10:04 PM
آخر رد: elgokr
  جلب كامل الصفحة ابو روضة 2 116 08-11-18, 06:29 PM
آخر رد: ابو روضة
  جلب صورة أى فيديو بالHtmlAgilityPack ابو روضة 8 184 31-10-18, 10:46 PM
آخر رد: elgokr
  [VB.NET] مشكلة في استخراج روابط هذه الصفحة بال HtmlAgilityPack mervandzz 2 129 13-10-18, 03:53 PM
آخر رد: mervandzz
  شريط اخباري عن المواد في الصفحة الرائيسية القشه 7 361 14-07-18, 01:07 PM
آخر رد: YousefOkasha
  عرض اسماء الاجهزة داخل الشبكة المحلية atefkhalf2004 10 358 30-06-18, 08:48 PM
آخر رد: elgokr
  تصغير حجم الصفحة في webbrowser ? hichem1 6 217 09-06-18, 01:59 AM
آخر رد: hichem1
  [سؤال] جلب روابط هذه الصفحة ابو روضة 2 179 04-02-18, 05:25 AM
آخر رد: ابو روضة
  [سؤال] كيف اعمل سحب عشوائي مابين عدة اسماء Nete0 19 653 31-01-18, 03:17 PM
آخر رد: Basil Abdallah

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم