如何使用VBA添加XML中的第二个子图

Question

您好，我正在尝试将第二个子项添加到xml中，但无法完成，请帮助我。

例子：

<parent1> 
<child> 
    <child2> childname </child2> 
</child> 
</parent1> 

mycode的

  Set objxmlPayloadHeader = xmlDoc.createElement("Parent1") 
      objQueryHeader.appendChild objxmlPayloadHeader 
      Set objxmlPayloadChildHeader = xmlDoc.createElement("Child") 

Answer 1

要构建XML作为你拥有了它上面，这行代码添加到您的代码的末尾：

objxmlPayloadHeader.appendChild objxmlPayloadChildHeader 
    Set objxmlPayloadChild2Header = xmlDoc.createElement("Child2") 
    objxmlPayloadChild2Header.Text = "childname" 
    objxmlPayloadChildHeader.appendChild objxmlPayloadChild2Header