03-25-2012, 06:33 AM
Code:
Set oXML = CreateObject("Microsoft.XMLDOM")
' capture all condition ids
Set oConditionIds = oXML.getElementsByTagName("CONDITION ID")
For iCnt=0 to oConditionIds.Length-1
Print oConditionIds.Item(iCnt).nodeName & "::" & oConditionIds.Item(iCnt).text
Next
Test Automation and QTP - Excel with Ease provides a good reference on working with xml files