serverside transformation

samme kode i ASP:

Dim objXMLDoc             : Set objXMLDoc = Server.CreateObject( "MSXML2.DOMDocument" )
Dim objXMLFreeThread     : Set objXMLFreeThread = Server.CreateObject( "MSXML2.FreeThreadedDOMDocument" )
Dim objXSLDoc             : Set objXSLDoc = Server.CreateObject( "MSXML2.XSLTemplate")
' Loading XML
objXMLDoc.async = false
objXMLDoc.load( Server.MapPath( "fil.xml" ) )
' Loading XSL
objXMLFreeThread.async = false
objXMLFreeThread.load( Server.MapPath( "fil.xsl" ) )

' Setting stylesheet
objXSLDoc.stylesheet = objXMLFreeThread
' Creating processor
Dim objProcessor : Set objProcessor = objXSLDoc.createProcessor()
' Setting parameter
Call objProcessor.addParameter( "param", "value" )
' Setting xml to transform
objProcessor.input = objXMLDoc

' Transforming
objProcessor.transform()

' output
Dim strOutput : strOutput = objProcessor.output

/nute

nute> det er sikkert helt elementært... og jeg har ikke før arbejdet med asp,
men jeg går ud fra at jeg bare skal erstatte "fil.xml" og "fil.xsl" med de relevante filnavne og så bare lægge hele din kode ind i en asp- tag, dvs.:

<%
Dim objXMLDoc            : Set objXMLDoc = Server.CreateObject( "MSXML2.DOMDocument" )
Dim objXMLFreeThread    : Set objXMLFreeThread = Server.CreateObject( "MSXML2.FreeThreadedDOMDocument" )
Dim objXSLDoc            : Set objXSLDoc = Server.CreateObject( "MSXML2.XSLTemplate")
' Loading XML
[...]
%>

og så bare kalde dokumentet noget med .asp og lægge det på serveren. Men når jeg så åbner det får jeg bare en side med denne asp-kode skrevet ud i stedet for mit transformerede xml-dokument. Why?

yup ... du erstatter bare fil.xml/fil.xsl med henholdsvis din xml og din xsl fil. du behøver hellere ikke dennne linie:

Call objProcessor.addParameter( "param", "value" )

den postet jeg bare som et eksempel hvis du ville sende parametre til din xsl.

Hvis du vil have skrevet ud dit transformerede xml-dok, så skal du lave en response write helt til sidst:

Response.Write( strOutput )

hmm ... du er sikker på at der er asp tilgængelig på din server ?

Ja, jeg har tjekket at der er asp på serveren. Nu svarer den:

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

[dvs. den første Server.CreateObject]
/xml/MA_bib.asp, line 3

System message, messageid = 0x800401f3

så er det nok fordi msxml ikke er installeret på serveren ...

yeps - ligesom den der xml extesnion til php heller ikke er det - øv - skodservere (web10 og b-one)!

du kan prøve dette:

Dim xml : Set xml = Server.CreateObject("Microsoft.XMLDOM")
Dim xsl : set xsl = Server.CreateObject("Microsoft.XMLDOM")

xml.load( "fil.xml" )
xsl.load( "fil.xsl" )
Response.write xml.transformNode(xsl)

nute, det er længe siden, men kan du ikke lægge et svar

- svar -

:-)

ups, det er endnu engang længe siden