Utiliser HtmlAgilityPack modifier balises de lien hypertexte

Question

Comment utiliser HtmlAgilityPack pour remplacer tous les liens hypertextes, .: par exemple

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

de sorte que seul l'attribut href reste. l'url.

Est-ce possible?

Answer 1

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