[سعود]

(10-02-21, 03:26 AM)ابو روضة كتب :

(10-02-21, 02:58 AM)سعود كتب :

إقتباس :لكنه يجلب أخر قيمة فقط يعنى جلب الاجابة وترك السؤال 

هذي سهلة لان لا توجد في الصفحة الا نودين :
 <div itemprop="text">
<div itemprop="text">


واحد للسؤال والاخر للجواب تستطيع ترك استخدام جملة For   وتستخدم الاندكس بعد علامة النود

---

PHP كود :

Private Sub getpost()
        Dim h As New HtmlAgilityPack.HtmlWeb
        Dim d As HtmlAgilityPack.HtmlDocument = h.Load("http://islamweb.net/ar/consult/index.php?page=Details&id=2446968", "Get")
        Dim nods As HtmlAgilityPack.HtmlNodeCollection = d.DocumentNode.SelectNodes("//div[@itemprop='text']")
        TextBox1.Invoke(Sub() TextBox1.Text = nods(0).InnerText & vbNewLine & nods(1).InnerText)
        Button1.Invoke(Sub() Button1.Text = "تم")
        Button1.Invoke(Sub() Button1.Enabled = True)
    End Sub 


تسلم إيدك والله أخى سعود ماشاء الله ولا حول ولا قوة إلا بالله...

زادك الله من واسع فضله...

 و اياك و كل من يقرا مشاركتنا هذه