[farfour]

السلام عليكم احبابي في الله ان شاء الله تكونو بخير
كما هو مكتوب في العنوان اريد جلب نص من صفحة ويب
استعملت مكتبة xnet

كود :

       While True
           Using request As New HttpRequest

               request.UserAgent = Http.ChromeUserAgent
               request.Proxy = Nothing
               request.IgnoreProtocolErrors = True
               request.Cookies = New CookieDictionary(False)
               request.AddParam("amountgen", TextBox1.Text)

               Dim res As String = request.Post("http://netflixgen.nicotroll.com/index.php").ToString
               Dim farfour As Match = Regex.Match(res, "rows=""10"" cols=""50"">(.*?)</textarea><button")
               TextBox2.Text = farfour.groups(1).Value

           End Using
       End While

ممكن تعديل على الكود و شكرا