+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : جلب نص من صفحة ويب (/showthread.php?tid=29122)
جلب نص من صفحة ويب - farfour - 23-03-19
السلام عليكم احبابي في الله ان شاء الله تكونو بخير
كما هو مكتوب في العنوان اريد جلب نص من صفحة ويب
استعملت مكتبة 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