如何使用XPATH或其他技术从VB.net中的网站提取数据?

时间:2013-02-02 04:29:05

标签: vb.net xpath web

我正在尝试在VB.net中编写一个简单的应用程序来从网站收集信息,然后让应用程序将结果通过电子邮件发送给我。目的是在更换碳粉时从打印机收集页数。我有我需要的数据的XPATH,但我还没有弄清楚如何在VB中使用它。 (我的编程经验很少。)

到目前为止,我已将应用程序登录到打印机门户并显示包含我需要的信息的网页。此信息的XPATH是:

// * [@ ID = “内容”] / DIV [3] / DIV /表/ tbody的/ TR [1] / TD

任何人都可以帮我提取并解析这个表格单元格中的数字吗?

感谢你们给予的任何帮助!!

1 个答案:

答案 0 :(得分:0)

你可以使用streamreader!看看这个例子:

        Dim inStream As StreamReader
        Dim webRequest As WebRequest
        Dim webresponse As WebResponse


        webRequest = webRequest.Create("YOUR URL TO THE PAGE GOES HERE")
        webresponse = webRequest.GetResponse()
        inStream = New StreamReader(webresponse.GetResponseStream())
        Dim sourcecode As String = inStream.ReadToEnd()
        Dim x1 As Integer = sourcecode.IndexOf("<td>Nr. of toner changed:") + 25 '25 is the number of characters in the string to search
        Dim x2 As Integer = sourcecode.IndexOf("times </td>") 'what comes right after your search string. has to be unique in the page

        dim nuberofchanges as integer = sourcecode.Substring(x1, x2 - x1)

希望这有帮助! :)