SelectSingleNode fails with MS XML 4.

Hi!

Currently, I am experiencing some problems with selecting nodes.
I am invoking the XML parser using:

Set objXMLParser = CreateObject("Msxml2.DOMDocument.4.0")

objXMLParser.ASync = False
objXMLParser.PreserveWhiteSpace = False
objXMLParser.ResolveExternals = False
objXMLParser.ValidateOnParse = True



Then, later in the code, I use:

Set objXMLChild = Nothing
Set objXMLChild = objXMLItems.ChildNodes.Item(lngCounter)
           
If Not objXMLChild Is Nothing Then
  Select Case objXMLChild.NodeName
    Case "TotalResults"
      lngTotalNumberOfResults = CLng(objXMLChild.Text)
    Case "Item"

      Set objXMLSubChild = Nothing
      Set objXMLSubChild = objXMLChild.SelectSingleNode("LargeImage")

      If Not objXMLSubChild Is Nothing Then
        Set objXMLLargeImageURL = Nothing
        Set objXMLLargeImageURL = objXMLSubChild.SelectSingleNode("URL")
        If Not (objXMLLargeImageURL Is Nothing) Then
          astrLargeImageURL(1) = objXMLLargeImageURL.Text
        End If
      End If
  End Select
End If



However,

If Not objXMLSubChild Is Nothing Then

always returns false.

If I change the initialization part from

Set objXMLParser = CreateObject("Msxml2.DOMDocument.4.0")

to

Set objXMLParser = CreateObject("MSXML.DOMDocument")

everything works as expected. Any idea what could be wrong?

Regards,
Sebastian