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
************************************