TEXT TO m.lcXML noshow <RESPONSE_GROUP MISMOVersionID="2.4"> <RESPONDING_PARTY /> <RESPOND_TO_PARTY /> <RESPONSE ResponseDateTime="2009-04-07T14:06:32-05:00"> <RESPONSE_DATA> <FLOOD_RESPONSE MISMOVersionID="2.4"> <MORTGAGE_TERMS LenderCaseIdentifier="2009000234567" /> <FLOOD_DETERMINATION FloodCertificationIdentifier="0904001705" /> </FLOOD_RESPONSE> </RESPONSE_DATA> <RESPONSE_DATA> <FLOOD_RESPONSE MISMOVersionID="2.4"> <MORTGAGE_TERMS LenderCaseIdentifier="2009000234567" /> <FLOOD_DETERMINATION FloodCertificationIdentifier="0903017337" /> </FLOOD_RESPONSE> </RESPONSE_DATA> <STATUS _Code="S0015" _Condition="Success" _Description="Pending list request processed" _Name="Processed" /> </RESPONSE> </RESPONSE_GROUP> ENDTEXT Local xDom As 'MsXml2.domdocument' xDom = Createobject('MsXml2.domdocument') xDom.LoadXML( m.lcXML ) loSelNodes = xDom.selectNodes('.//@FloodCertificationIdentifier') For Each loNode In loSelNodes ? loNode.nodeTypedValue EndforCetin