09/12/2002, 07:13
|
 | | | Fecha de Ingreso: noviembre-2001 Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 23 años, 5 meses Puntos: 0 | |
| a ver si te sirve
function Retornar()
dim Xmldoc
'Crea objeto Xml
set Xmldoc = server.CreateObject("Microsoft.XMLDOM")
'Lee el documento XML del cliente
if not xmldoc.load(server.MapPath("tu_directorio/tu_archivo_xml.xml ")) then
call TimeOut
else
set Retornar = xmldoc
end if
end function
dim obj_xmltotal, dato_salida
set obj_xmltotal = Retornar()
dato_salida = obj_xmltotal.selectsinglenode("Cube currency").text
ahora si quieres retornar todo usa nodos con for each
|