تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة فى جلب كامل الصفحة
#10
(07-06-19, 03:27 AM)سعود كتب : حسب مافهمت انك توصلت لحل وبقي امر التكرار!
صح او اني فهمت خطا ...لاني احتاج وقت عشان افهم التعامل بالويب براوزر.
اذا فعلا فهمي صحيح فيتبقى امر التحقق بما توفر محليا(اي بالاداة التي نستخدمها)
لكن كيف نعرف اننا وصلنا لاخر قيمة بعد تكرار النقر على الزر بالصفحة؟!

لا يا أخى انا جلبتها بالويب براوزر وتمام لكن الويب براوزر بطي جدا 
فحاولت بهذا الكود جلب كامل الصفحة هذه لكن بجبلى اول المواضيع فقط وانا اريده ينزل ما 
بعد كلمة المزيد

PHP كود :
dataGridView1.Rows.Clear()
 
     For i As Integer 1 To NumericUpDown1.Value
          Dim url 
As String = ("https://www.amrkhaled.net/Category/26/استشارات?page=" i)
 
         Dim wc As New WebClient
          wc
.Encoding Encoding.UTF8
          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("//*[@id='section-grid-container']/div[1]/div/div[2]/h3/a")
 
             dataGridView1.Rows.Add("https://www.amrkhaled.net" n.Attributes("href").Value.ToString(), n.InnerText.Trim)
 
         Next
      Next 


تحديدا من هذه الصفحة

https://www.amrkhaled.net/Section/1041/%...8%A7%D8%A1

[url=https://www.amrkhaled.net/Section/1041/%D8%AA%D8%B1%D8%A8%D9%8A%D8%A9-%D8%A7%D9%84%D8%A3%D8%A8%D9%86%D8%A7%D8%A1][/url]
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: مشكلة فى جلب كامل الصفحة - بواسطة elgokr - 15-04-19, 10:01 AM
RE: مشكلة فى جلب كامل الصفحة - بواسطة ابو روضة - 07-06-19, 03:28 AM


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


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