HtmlAgilityPack 干扰我的代码（不是 HtmlAgilityPack 问题）

Question

这是我的代码片段：

 Dim content As String = ""
    Dim web As New HtmlAgilityPack.HtmlWeb
    Dim doc As New HtmlAgilityPack.HtmlDocument()
    doc.Load(WebBrowser1.DocumentStream)
    Dim hnc As HtmlAgilityPack.HtmlNodeCollection = doc.DocumentNode.SelectNodes("//div[@class='address']/preceding-sibling::h3[@class='listingTitleLine']")
    For Each link As HtmlAgilityPack.HtmlNode In hnc
      Dim replaceUnwanted As String = ""
      replaceUnwanted = link.InnerText.Replace("&", "&") '
<span style="white-space:pre"> </span>  content &= replaceUnwanted & vbNewLine
    Next
'I have a bunch of code here I removed ------------------------------
      Dim htmlDoc As HtmlDocument = Me.WebBrowser2.Document
      Dim visibleHtmlElements As HtmlElementCollection = htmlDoc.GetElementsByTagName("TD")
      Dim found As Boolean = False
      For Each str As HtmlElement In visibleHtmlElements
        If Not String.IsNullOrEmpty(str.InnerText) Then
          Dim text As String = str.InnerText
          If str.InnerText.Contains(parts(2)) Then
            found = True
          End If
        End If
      Next

我收到 Me.WebBrowser2.Document 错误：

““System.Windows.Forms.HtmlDocument”类型的值无法转换为“HtmlAgilityPack.HtmlDocument” '.

另一个 htmlDoc.GetElementsByTagName：

'GetElementsByTagName' 不是 'HtmlAgilityPack.HtmlDocument' 的成员。

当我不使用 HAP 时，该代码可以正常工作，但我需要导入它来做某事，现在它干扰了这个，请帮忙。

Answer 1

问题是 HtmlAgilityPack 和 System.Windows.Forms 都有一个名为 HtmlDocument 的类型。

您可能只需修复这一行：

' Here the VB compiler must think you mean HtmlAgilityPack.HtmlDocument: '
Dim htmlDoc As HtmlDocument

...将其更改为：

Dim htmlDoc As System.Windows.Forms.HtmlDocument

一般解决此类问题的一个好方法是使用 Imports 语句为具有冲突名称的类型提供别名，如下所示：

Imports AgilityDocument = HtmlAgilityPack.HtmlDocument
Imports FormsDocument = System.Windows.Forms.HtmlDocument

然后您将在代码中使用这些别名之一，而不是键入共享名称。因此，例如：

Dim doc As New AgilityDocument
Dim htmlDoc As FormsDocument = Me.WebBrowser2.Document