Reading XML Nodes

[Lucid]

First off, sorry if this is something that has been answered somewhere on the forum. I've been poking around for a while and have come up empty. My brain also is not wanting to wrap around an issue I'm having. I've got a large number of XML data that I have to parse in order to pull out specific bits of info from each. I can't seem to figure out the code to get the child nodes I need (my XML lingo is a little fuzzy too)

Here is an example of the XML I'm trying to read:

<?xml version="1.0" encoding="UTF-8"?><computer><general><id>000</id><name>MyMachine</name></general><software><licensed_software><name>Adobe Acrobat Pro XI</name><name>Adobe Acrobat X</name><name>Adobe Illustrator CS6</name><name>Google Chrome</name><name>Microsoft Office</name></licensed_software></software></computer>

And here is a code snippet I've been messing with to try and figure out what my problem/solution is:

Local $oXML = ObjCreate("Microsoft.XMLDOM")
$oXML.setProperty("SelectionLanguage", "XPath")
;$oXML.loadxml(<DataReturnedFromAnotherQueryFromREST>) ;I'm reading from a stream and not an actual file in production
$oXML.load("MySampleFile.xml") ;Loading an actual file is just for testing purposes
Local $oItem = ""
Local $oSoftware = $oXML.selectNodes("//software/licensed_software")
For $oItem In $oSoftware
    ConsoleWrite("This spits out a glob of squished together info: " & $oItem.text & @CRLF)
Next

So how do I pull out each "name" node so they're separate and not globbed together? I've tried using selectSingleNode and some other variations, and I can't seem to get what I need. Can someone shed some light on what I'm overlooking (I have a feeling it's pretty simple). Thanks!

 

[mLipok]

When you use selectNodes then you get all nodes Elements which fits your XPath , but not nodes inisde the XPath.

So you get exactly one node

<licensed_software>

To go deeper you should check childs nodes

 

Try to read here:

https://msdn.microsoft.com/en-us/library/ms763798(v=vs.85).aspx

 

And here is your working example:

_Example()

Func _Example()
    ; Error monitoring. This will trap all COM errors while alive.
    ; This particular object is declared as local, meaning after the function returns it will not exist.
    Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc")
    Local $oXML = ObjCreate("Microsoft.XMLDOM")
    $oXML.setProperty("SelectionLanguage", "XPath")
    ;$oXML.loadxml(<DataReturnedFromAnotherQueryFromREST>) ;I'm reading from a stream and not an actual file in production
    $oXML.load("MySampleXML.xml") ;Loading an actual file is just for testing purposes
    Local $oSoftware_enum = Null
    Local $oSoftware_coll = $oXML.selectNodes("//software/licensed_software")
    Local $oChilds_coll = Null
    For $oSoftware_enum In $oSoftware_coll
        $oChilds_coll = $oSoftware_enum.childNodes
        For $oChild_enum In $oChilds_coll
            ConsoleWrite("This spits out a glob of squished together info: " & $oChild_enum.text & @CRLF)
        Next
    Next
EndFunc   ;==>_Example

; User's COM error function. Will be called if COM error occurs
Func _ErrFunc($oError)
    ; Do anything here.
    ConsoleWrite(@ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _
            @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _
            @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _
            @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _
            @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _
            @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _
            @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _
            @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _
            @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _
            @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode) & @CRLF & @CRLF)
EndFunc   ;==>_ErrFunc

 

btw.
You should also look here:  XMLWrapperEx.au3 - BETA
You could find there many interesting functions.

 
 

Edited March 21, 2016 by mLipok
typo

[Lucid]

mLipok, thanks for the example and links! That helped me get it figured out.

[jdelaney]

Another route (there are always millions of ways of doing this kind of thing):

$sXML = '<?xml version="1.0" encoding="UTF-8"?><computer><general><id>000</id><name>MyMachine</name></general><software><licensed_software><name>Adobe Acrobat Pro XI</name><name>Adobe Acrobat X</name><name>Adobe Illustrator CS6</name><name>Google Chrome</name><name>Microsoft Office</name></licensed_software></software></computer>'
Local $oXML = ObjCreate("Microsoft.XMLDOM")
$oXML.LoadXML($sXML)

Local $oNames = $oXML.selectNodes("//software/licensed_software/name")
For $oName In $oNames
    ConsoleWrite($oName.text & @CRLF)
Next