LER PARTE ESPECIFICA DE UM SITE E COLOCAR NA LABEL
Juro que já tentei de tudo, vi vários tópicos aqui no fórum e não achei oque precisava, eu preciso ler a data
especificamente desse site: http://horaagora.com/
Por que? Por que a data aà é indicada por algum outro meio sem ser lendo a data do nosso computador, os outros sites se mudarem a data do computador a data no site também muda, esse aà tem outro centro de referencia, preciso pegar a data e coloca-la em uma label, alguém poderia me ajudar? Já tentei ler HTML e retirar tudo que não tenha o corpo de uma data, porém a data não aparece no HTML. Preciso da ajuda de vocês.
Obrigado.
especificamente desse site: http://horaagora.com/
Por que? Por que a data aà é indicada por algum outro meio sem ser lendo a data do nosso computador, os outros sites se mudarem a data do computador a data no site também muda, esse aà tem outro centro de referencia, preciso pegar a data e coloca-la em uma label, alguém poderia me ajudar? Já tentei ler HTML e retirar tudo que não tenha o corpo de uma data, porém a data não aparece no HTML. Preciso da ajuda de vocês.
Obrigado.
Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
TextBox1.Text =WebBrowser1.Document.GetElementsByTagName([Ô]td[Ô]).Item(7).InnerText
End Sub
TextBox1.Text =WebBrowser1.Document.GetElementsByTagName([Ô]td[Ô]).Item(7).InnerText
End Sub
Cara,
Eu consegui pegar assim:
Eu consegui pegar assim:
Dim indice as UInt16 = 0
Dim Hora as string = [Ô][Ô]
deNovo:
Hora = WebBrowser1.Document.GetElementsByTagName([txt-color=#e80000][Ô]div[Ô][/txt-color]).Item(indice).InnerText
If Hora.Contains([Ô]Feedback[Ô]) Then
indice += 1
GoTo deNovo
Else
Label1.Text = Hora
End If
Faça seu login para responder