Question

所以我使用for循环来改变网页/ page = 1，示例

For i As Integer = NumericUpDown1.Value To NumericUpDown2.Value
    Pnumber = i
    Scrape()
Next

和

 Dim base As String = ComboBox1.Text & Pnumber
    Dim Webget = New HtmlWeb()
    Dim doc = Webget.Load(base)
    For Each node As HtmlNode In doc.DocumentNode.SelectNodes("//tbody//td//a[contains(@href, 'player')]")
        If Not ListBox1.Items.Contains(node.InnerHtml) Then
            ListBox1.Items.Add(node.InnerHtml)
        End If
    Next
    Label2.Text = "Count: " & ListBox1.Items.Count

前几页工作，但它抛出异常，我怎么能改变页面的其他方式idk ...或等待它完成报废？哦，我可以使用睡眠，但它会减慢过程。

它不会帮助你但是：

未处理的类型＆＃39; System.NullReferenceException＆＃39;发生在Scrapper 2.exe中附加信息：对象引用未设置为对象的实例。

它在此行中抛出错误For Each HtmlNode in doc.DocumentNode.SelectNodes（＆＃34; // tbody // td // a [contains（@href，＆＃39; player＆＃39;）] ＆＃34）

htmlagilitypack循环页面

0 个答案: