在同名的最后一个实例之后插入xml节点

时间:2017-11-10 15:49:19

标签: xml access-vba msxml

我使用的是Microsoft Access,并在VBA中引用了Microsoft XML,v6.0库。我可以成功地将外部XML文件加载到“xd”,这是一个MSXML2.DOMDocument60对象。我想复制LCR元素的内容,并在xd中的最后一个元素之后插入一个新元素。我尝试了各种方法来使用importnode和clonenode,但不知道该怎么做。我更喜欢使用此库中的方法来完成此操作而不是xsl转换。将来,在BAG结束后,除了LCR之外,可能还有其他元素和其他名称。请指教。

<TRANSMISSION>
<BAG>
<LCR id = "" and IsGood = "false"></LCR>
<LCR id = "abc" and IsGood = "false"></LCR>
<ICAT>
</ICAT>
</BAG>
</TRANSMISSION>

预期结果:

<TRANSMISSION>
<BAG>
<LCR id = "" and IsGood = "false"></LCR>
<LCR id = "abc" and IsGood = "false"></LCR>
<LCR id = "" and IsGood = "false"></LCR>
<ICAT>
</ICAT>
</BAG>
</TRANSMISSION>

0 个答案:

没有答案