Отобразить выборочные данные с сайта в форме - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д