Page 1 of 1

VB8: Read data from webpage

Posted: Wed Jul 14, 2010 9:00 am
by gille
How can I read data from a webpage without using the webbrowser control? I use VB 8.

I have already this code but it using a webbrowser, I doesn't want. Because it's slow...
Code: Select all
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        WebBrowser1.Navigate("http://nl.eurobilltracker.com/notes/?id=82644321")
    End Sub

    Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        Dim tables As HtmlElementCollection = Me.WebBrowser1.Document.GetElementsByTagName("table")
        Dim charges As HtmlElement = tables(7)
        Dim rows As HtmlElementCollection = charges.GetElementsByTagName("tr")
        Dim r As HtmlElement = rows(4)
        Dim cells As HtmlElementCollection = r.GetElementsByTagName("td")
        Dim c As HtmlElement = cells(0)

        txtPageSource.Text &= c.InnerText
    End Sub
The result is correct. >>> Marcell 747

Please, help me.