[ابو روضة]

السلام عليكم اخوتى.
جلبت مواضيع من هذا الموقع https://www.muhtwa.com/aqwal/amthal/


 لكن الكلام ظهر بشكل غريب هكذا






وهكذا الكود المستعمل

كود :

  Dim url As String = ("https://www.muhtwa.com/aqwal/amthal/") '& i
       Dim wc As New WebClient
       wc.Headers.Add("user-agent", "Mozilla/5.0")
       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("//h2[@class='entry-title']/a")
           ListBox1.Items.Add(n.InnerText.Trim)
           lst.Add("https://www.muhtwa.com/" & n.Attributes("href").Value)

           Me.Text = ListBox1.Items.Count
       Next

وكلما حاولت بالويب براوزر يتم اغلاق البرنامج حين الدخول للموقع