NodeList iteration and node edit

[Cuperman]

I am iterating through a nodelist, and trying to edit node attributes
based on conditions that are met.

As soon as the first condition is met, the For Next loop finishes, even
when there are more nodes left in the list, so subsequent updates are
not completed.

Any one know what causes this?

My loop code is included

Thanks, Mark

=============== =============== ============

For Each originalnode As XmlNode In nodelist

Dim OldStartTime, OldEndTime As DateTime
OldStartTime =
CType(originaln ode.Attributes( "start_time").V alue, DateTime)
OldEndTime =
CType(originaln ode.Attributes( "end_time").Val ue, DateTime)
Dim OldType As String =
originalnode.At tributes("type" ).Value
Dim OldId As Integer =
CType(originaln ode.Attributes( "staff_attendan ce_id").Value, Integer)

If NewStartTime < OldEndTime AndAlso NewEndTime >
OldEndTime AndAlso NewStartTime > OldStartTime Then
'adjust end time of original
originalnode.At tributes("end_t ime").Value =
NewStartTime.To String("yyyy-MM-dd HH:mm")
m_XmlModified = True

ElseIf NewStartTime < OldStartTime AndAlso NewEndTime <
OldEndTime AndAlso NewEndTime > OldStartTime Then
'adjust start time of original
originalnode.At tributes("start _time").Value =
NewEndTime.ToSt ring("yyyy-MM-dd HH:mm")
m_XmlModified = True

ElseIf NewStartTime < OldStartTime AndAlso NewEndTime >
OldEndTime Then
'delete original
xmlDeleteAttend anceNode(OldId)

ElseIf NewStartTime > OldStartTime AndAlso NewEndTime <
OldEndTime Then
'split the original item by adjusting the end time of
the original
originalnode.At tributes("end_t ime").Value =
NewStartTime.To String("yyyy-MM-dd HH:mm")

'and then insert a new item at the end
Me.xmlInsertAtt endanceNode(Sta ffName, 0, NewEndTime,
OldEndTime, OldType)

End If

Next

=============== =============== =============

[joshlrogers]

Yup, I have a bug post here:

http://lab.msdn.microsoft.com/produc...a-06ef839bd322

You essentially have to do a count of the number of nodes then iterate
it through using it as if it were an array. Here is what I had to do
using this...

For i As Int16 = 1 To CShort(xmlOther .ChildNodes.Cou nt)
xmlOther.Remove Child(xmlOther. ChildNodes(0))
Next

Josh