Отобразить выборочные данные с сайта в форме - Visual Basic .NET
Формулировка задачи:
Уважаемые админы и. Мне необходим Ваш совет: как отобразить выборочно информацию с сайта в форме (в виде текста, наверное)
Решение задачи: «Отобразить выборочные данные с сайта в форме»
textual
Листинг программы
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim req As HttpWebRequest = WebRequest.Create("https://www.google.com/")
req.Timeout = 1000
Dim stream1 As Stream = req.GetResponse().GetResponseStream()
Dim reader1 As StreamReader = New StreamReader(stream1, Encoding.Default)
Dim htmlResponse As String = reader1.ReadToEnd
Dim browser1 As New WebBrowser
browser1.ScriptErrorsSuppressed = True
browser1.DocumentText = htmlResponse
browser1.Document.Write(htmlResponse)
stream1.Close()
reader1.Close()
Dim htmlDoc As HtmlDocument = browser1.Document
' И еще... Не знаю насколько это правильно, но без этого работало некорректно
browser1.Dispose()
For Each elementA As HtmlElement In htmlDoc.GetElementsByTagName("div")
Label8.Text += elementA.OuterText & vbCrLf
Next
End Sub