hDoc est un htmlDocument = "
<html>
<head/>
<body>
<h2><span>
<p>Texte</p>
</span></h2><h3></h3>
</body>
</html>
"
hNoeud est un htmlNoeud
hNoeudInsertion est un htmlNoeud
hNoeudRecherche est un tableau de htmlNoeud <- HTMLChercheElémentParBalise(hDoc, "h3")
hNoeud <- hNoeudRecherche[1]
hNoeudInsertion..NomBalise = "div"
HTMLInsèrePremierFils(hNoeud, hNoeudInsertion)
hNoeudInsertion..NomBalise = "span"
HTMLInsèreDernierFils(hNoeud, hNoeudInsertion)
Trace(hDoc)
HTMLSupprime(hNoeud)
Trace(hDoc)