Hente/bruge querystring i xsl ?
HejsaJeg har nu ledt som en gal (synes jeg) og prøvet at lave f.eks. links med default.asp?p=1. Hvordan får jeg brugt querystring("p") ?
Og kan det lade sig gøre med xsl eller skal jeg over og bruge xmlDom.loadXML xmlHttp.responseText ?
Mine nuværende filer:
----- XML filen -----
<?xml version="1.0" encoding="UTF-8"?>
<Data>
<Menulist>
<Menu>
<Index>1</Index>
<MenuLink>default.asp?p=1</MenuLink>
<MenuCat>Main</MenuCat>
<MenuShowSub />
<MenuCatNo />
<MenuText>Forside</MenuText>
<MenuHead>Dette er overskriften</MenuHead>
<MenuCont>Dette er brod-teksten</MenuCont>
<MenuSort>1</MenuSort>
<Visible>1</Visible>
</Menu>
<Menu>
<Index>2</Index>
<MenuLink>default.asp?p=2</MenuLink>
<MenuCat>Main</MenuCat>
<MenuShowSub />
<MenuCatNo />
<MenuText>Side 2</MenuText>
<MenuHead>Dette er overskriften til side 2</MenuHead>
<MenuCont>Dette er brod-teksten side 2</MenuCont>
<MenuSort>3</MenuSort>
<Visible>1</Visible>
</Menu>
<Menu>
<Index>3</Index>
<MenuLink>default.asp?p=3</MenuLink>
<MenuCat>Sub</MenuCat>
<MenuShowSub>0</MenuShowSub>
<MenuCatNo>1</MenuCatNo>
<MenuText>Under kategori til forsiden</MenuText>
<MenuHead>Dette er overskriften til sub-menu</MenuHead>
<MenuCont>Dette er brod-teksten til sub-menu</MenuCont>
<MenuSort>2</MenuSort>
<Visible>1</Visible>
</Menu>
</Menulist>
</Data>
----- XSL filen -----
<?xml version="1.0" encoding="UTF-8" ?>
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
<xsl:output method="html"/>
<xsl:template match="/">
<html>
<head></head>
<body>
<table>
<xsl:for-each select="Data/Menulist/Menu">
<xsl:sort select="MenuSort" data-type="number" />
<xsl:if test="Visible=1">
<xsl:if test="MenuCat='Main'">
<tr><td><a href=""><xsl:value-of select="MenuText"/></a></td></tr>
</xsl:if>
<xsl:if test="MenuCat='Sub'">
<xsl:if test="MenuShowSub=1">
<tr><td>- <xsl:value-of select="MenuText"/></td></tr>
</xsl:if>
</xsl:if>
</xsl:if>
</xsl:for-each>
</table>
</body>
</html>
</xsl:template>
</xsl:stylesheet>
----- ASP filen -----
<%
Response.Buffer = True
Dim xml
Dim xsl
Set xml = Server.CreateObject("Microsoft.XMLDOM")
xml.async = false
xml.load (Server.MapPath("books01.xml"))
Set xsl = Server.CreateObject("Microsoft.XMLDOM")
xsl.async = false
xsl.load (Server.MapPath("books01.xsl"))
Response.ContentType = "text/html"
Response.Write "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.01 Transitional//EN"">"
Response.Write (xml.transformNode(xsl))
%>
Mvh. Odie
