vb抓取网页内容(我是想一直让他循环找元素,还要找不同网页的元素)

优采云 发布时间: 2021-11-14 18:15

  vb抓取网页内容(我是想一直让他循环找元素,还要找不同网页的元素)

  我想让他循环搜索元素,以及不同网页的元素。如果我每次进入网页时都点击该按钮,它将是*敏*感*词*的。我只想点击按钮,它总是在那里。获取那些网页中的元素,这样我就不用整天看电脑了

  建议:

  1)您应该创建一个列表并以固定格式修复它。例如:

  网站地址+1个空格+要查找的元素

  2)使用文本文件将其保存在与exe相同的目录中。

  3)Form_Load 期间,请动态使用 System.IO.ReadAllLines 读出所有的行,并将它们存储在表单类(string[])类型的公共变量中。同时声明一个WebBrowser类的实体,使用Do...While循环来做(示例代码如下,请根据实际情况更正):

  Public Class gb2

    Dim wb As New WebBrowser

    Dim strings() As String = Nothing

    '下标

    Dim index As Integer = 0

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        '加载全部内容

        strings = System.IO.File.ReadAllLines("C:\\try.txt")

        '声明一个新的WebBrowser实体类

        AddHandler wb.DocumentCompleted, AddressOf SelfCompleted

        Do

            wb.Navigate(strings(index).Split(" ")(0))   '取出空格前面部分,也就是url地址

            While (wb.ReadyState  WebBrowserReadyState.Complete)

                Thread.Sleep(10)

            End While

If (index>strings.Length)

index = 0

End If

        Loop

    End Sub

    Private Sub SelfCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs)

        wb.Document.Window.Frames(0).Document.GetElementsByTagName(strings(index).Split(" ")(0))    '处理你找到的东西

    End Sub

End Class

  QQ我:

  

  下载 MSDN 桌面工具 (Vista,Win7)

  我的博客园

  慈善点击,点击这里

0 个评论

要回复文章请先登录注册


官方客服QQ群

微信人工客服

QQ人工客服


线