3

如何使用 HtmlAgilityPack 替换所有超链接,例如:

<a href="url">Link</>

这样就只剩下 href 属性了。网址。

这可能吗?

4

1 回答 1

6
Dim Doc as HtmlDocument = new HtmlDocument 
doc.LoadHtml(MyHtml)

Dim links As HtmlNodeCollection = doc.DocumentNode.SelectNodes("//a")

For Each link In links

    Dim att As HtmlAttribute = link.Attributes("href")
    MyHtml = Myhtml.Replace(link.OuterHtml, att.Value)

Next
于 2009-06-12T10:49:41.717 回答