xml - 使用 vbscript 创建 XML 元素时如何避免 xmlns 属性？

Question

添加新元素时，我看到 xmlns 属性添加了空字符串。我怎样才能避免这种情况？我看到的答案很少，但它们要么是 Java 的，要么是 .Net 的。仍然尝试过这些，但它们不起作用。我需要 VBScript 的解决方案。

'load the xml file
Set objXMLDoc = CreateObject("Microsoft.XMLDOM")  
objXMLDoc.load(strFilePath)

'get all <MainError> nodes in the xml
Set mainNode = objXMLDoc.documentElement.SelectNodes("//MainError")

'get child nodes for the first <MainError> node
Set childNodes = mainNode(0).ChildNodes

Set objErrorNode = objXMLDoc.createElement("ChildError")
objErrorNode.text = "somevalue"
mainNode(0).appendChild(objErrorNode)

输出:

<MainError><ChildError xmlns="">somevalue</ChildError></MainError>

Answer 1

如 this answer 中所述对于类似的问题，您可能会得到空的 xmlns 属性，因为父元素之一是使用 namespace 定义的，但您创建的新子元素没有 namespace 。使用 createNode 而不是 createElement 创建与祖先节点具有相同命名空间的子元素。

ns = "..."  '<-- define namespace string here according to whatever
            '    namespace is defined in your XML

Set objErrorNode = objXMLDoc.createNode(1, "ChildError", ns)
objErrorNode.text = "somevalue"
mainNode(0).appendChild(objErrorNode)