Tienda con conversor Dolar/Euro (asp/xml)

[buliwyf]

Código:

<%
set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
Set objLst = Server.CreateObject("Microsoft.XMLDOM")
objHTTP.open "GET", "http://www.ecb.int/stats/eurofxref/eurofxref-daily.xml", false
objHTTP.send
set objXML = objHTTP.responseXML
Set objLst = objXML.getElementsByTagName("Cube") 
 For i = 0 to objLst.length -1
set objnode = objLst.nextNode
divisa=objnode.getAttribute("currency")
valor=objnode.getattribute("rate")
if divisa="USD" then
'aqui si quieres paras el for, porque ya tienes tu string llamado valor con el cambio USD/Euro
response.write objLst.item(i).nodeName&": "&divisa&"= "&valor&"<br>"
End If
Next
%>