3

HtmlAgilityPack を使用してすべてのハイパーリンクを置き換える方法。

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

href 属性だけが残るようにします。URL。

これは可能ですか?

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 に答える