estoy intentando leer un archivo xml desde asp, como veis en el xml la estructura varía un poco de los ejemplos que he visto por los foros, he probado multitud de combinaciones pero no logro que la página asp muestre los datos del xml.
Esteseria el xml:
Código:
<?xml version='1.0'?> <DATOSFARMA NOMBRE='ABC' LUGAR='QWERTY' SRV='ALJ'> <FARMACIA> <FM MED='DOL'> <DIST AB='A' CD='UNO' /> <DIST AB='B' CD='DOS' /></FM> <FM MED='DAL'> <DIST AB='C' CD='TRES' /> <DIST AB='D' CD='CUATRO' /></FM> </FARMACIA> <DATOSGEN> <DTGEN CD='CINCO' /> <DTGEN CD='SEIS' /> </DATOSGEN> </DATOSFARMA>
Este el xsl:
Código:
Este el asp:<?xml version="1.0" ?> <xsl:stylesheet xmlns:xsl="ht tp://w ww.w3.org/1999/XSL/Transform" version="1.0"> <xsl:template match="/"> <table border="1"> <xsl:for-each select="DATOSFARMA"> <tr> <td> <xsl:value-of select="NOMBRE" /> </td> <td> <xsl:value-of select="LUGAR" /> </td> <td> <xsl:value-of select="SRV" /> </td> </tr> </xsl:for-each> </table> </xsl:template> </xsl:stylesheet>
Código:
Este seria solo un ejemplo facil, que no logro hacer funcionar, de lo que estoy intentando hacer.<% Dim objXML Dim objXSL Dim strHTML 'Cargo el archivo XML Set objXML = Server.CreateObject("Microsoft.XMLDOM") objXML.async = False objXML.load(Server.MapPath("farma.xml")) 'Cargo el archivo XML Set objXSL = Server.CreateObject("Microsoft.XMLDOM") objXSL.async = False objXSL.load(Server.MapPath("farma.xsl")) ' Transformo el archivo XML usando la hoja de estilos XSL strHTML = objXML.transformNode(objXSL) Set objXML = Nothing Set objXSL = Nothing 'Saco el HTML resultante ... los datos provienen 'de los archivos. xml, pero el formato de los 'resultados depende completamente del archivo .xsl Response.Write strHTML %>
Gracias de antemano a todos.