DOMDocument - createTextNode, encoding issue

问题:

I have a problem with createTextNode method e special characters like '>', '<':

Dim xmlDoc As DOMDocument
Dim codeXML as String
Dim n As IXMLDOMNode

codeXML = '<data>value</data>'
Set n = xmlDoc.createTextNode(codeXML)

I need a result like this:

<main><data>value</data></main>

but I get

<main>&lt;data&gt;value&lt;/data&gt;</main>

How can I solve that problem?

Thank you very much.

回答1:

One way would be to create a second Document to serve as the XML parser for these XML literals. You can use LoadXML to pass the string in and get validated XML objects. You can then Import the node to the original/main DOM Document you are building.