Di seguito posto il codice per estrarre il contenuto di un file XML,

While textReader.Read()
Dim nType As XmlNodeType = textReader.NodeType

' Se il tipo di nodo è un elemento
If nType = XmlNodeType.Element Then
sw.WriteLine("Elemento: " & textReader.Name.ToString())
tx = textReader.ReadString()
sw.WriteLine(tx.ToString())
el = el + 1
End If

End While

Però non mi scrive tutti i campi, per essere più chiaro posto un estratto del risultato e del file XML
Come si nota nel file XML il tag BuyerOrderNumber contiene qualcosa, ma nel file di testo non compare, mentre altri dati si, ovviamente non manca solo il contenuto di quel tag, ma anche altri in modo apparentemente senza senso, anche se non capisco perchè.... Dove sbaglio???


GRAZIE in anticipo

***** file XML

<?xml version="1.0" encoding="ISO-8859-1" standalone="yes"?>
<Order>
<OrderHeader>
<OrderNumber>
<BuyerOrderNumber>5700111916</BuyerOrderNumber>
<ListOfMessageID>
<MessageID>
<IDNumber>20091124163757</IDNumber>
<IDAssignedBy>
<IDAssignedByCoded>Other</IDAssignedByCoded>
<IDAssignedByCodedOther>GruppoTelecomItalia</IDAssignedByCodedOther>
</IDAssignedBy>
</MessageID>
</ListOfMessageID>
</OrderNumber>
<OrderIssueDate>20091124T12:00:00</OrderIssueDate>
.....................
.....................

***** file testo

Elemento: OrderHeader


Elemento: BuyerOrderNumber


Elemento: MessageID


Elemento: IDNumber
20091124163757
Elemento: IDAssignedByCoded


Elemento: IDAssignedByCodedOther
GruppoTelecomItalia
Elemento: OrderIssueDate
20091124T12:00:00
.....................
.....................