ParseXml.asp

<%
dim myXml 'assume that this is populate with an XML string

dim oXml
Set oXml = Server.CreateObject("MSXML2.DOMDocument.6.0")  'don't forget to use Set
oXml.LoadXML(myXml)

dim node
Set node = oXml.selectSingleNode("//@ShoeSize")       'don't forget to use Set
response.write "Shoe Size: " & node.text & "<br />"   'outputs: "Shoe Size: 13<br />"
Set node = oXml.selectSingleNode("//@City")           'don't forget to use Set
response.write "City: " & node.text & "<br />"        'outputs: "City: Funkytown, USA<br />"
%>