childnotes i VB Script
Hvordan får jeg så læst "<ReplyBody>" og alle dens childnotes?hvordan kan jeg i mit program udskrive :
start
lid: 1234
lid: 5678
ordrenr: 1234
ordrenr: 5678
slut
1: 0000
2: 1111
ordrenr: 0101
ordrenr: 1010
jeg har en xml streng
XML =
<CUAPI>
<CUReply>
<ReplyBody>
<start>
<Lid>1234</Lid>
<Lid>5678</Lid>
<ordrenr>1234</ordrenr>
<ordrenr>5678</ordrenr>
</start>
<slut>
<Lid>0000</Lid>
<Lid>1111</Lid>
<ordrenr>0101</ordrenr>
<ordrenr>1010</ordrenr>
</slut>
.......
Så har jeg mit "VB program", som ikke virker!! :-(
set xmlDoc=CreateObject("Microsoft.XMLDOM")
xmlDoc.async="false"
xmlDoc.loadXML(text)
for each x in xmlDoc.documentElement.childNodes
document.write(x.nodename)
document.write(": ")
document.write(x.text & "<br>")
next
************************************