Merge XML and XSL with ASP

[RFH Reseller: Rappie]

My problem is that I want to sort some nodes of a XML file I have and use asp to convert it to html. I'm also using a XSL template to sort the XML node results, since there no way (to my knowledge) to sort XML nodes other then by use of XSL.

The reason I’m using ASP to convert the results to HTML, instead of using the XSL file directly with XML is because I would like to edit/alter some of the results.

I’ve been using this script which helped me in the right direction (I think).

Dim objXML
Dim objXSL
Dim strHTML
 
'Load the XML File
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.load(Server.MapPath("xmlxsl.xml"))
 
'Load the XSL File
Set objXSL = Server.CreateObject("Microsoft.XMLDOM")
objXSL.async = False
objXSL.load(Server.MapPath("xmlxsl.xsl"))
 
' Transform the XML file using the XSL stylesheet
strHTML = objXML.transformNode(objXSL)
 
Set objXML = Nothing
Set objXSL = Nothing
 
' Spit out the resulting HTML... the data comes from the
' .xml file, but the formatting of the results depends
' completely upon the .xsl file.
Response.Write strHTML

But this script doesn’t allow me to edit/alter the results before they are spited out as HTML.

Any suggestions on how to approach??

[Staff: Warren Ashcroft]

Why cant you use objXML to edit the XML data?

[RFH Reseller: Wise Webs]

Try this. I just hand wrote it so their may an error or 2 in it. But it should work.

Dim objXML
Dim objXSL
Dim strHTML

'Load the XML File
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.async = False
objXML.load(Server.MapPath("xmlxsl.xml"))

'Load the XSL File
Set objXSL = Server.CreateObject("Microsoft.XMLDOM")
objXSL.async = False
objXSL.load(Server.MapPath("xmlxsl.xsl"))

' Transform the XML file using the XSL stylesheet
Set objResult = Server.CreateObject("Microsoft.XMLDOM")
objResult.async = False
objResult.validateOnParse = false

objXML.transformNodeToObject(objXSL,objResult)

' Now edit the objResult

[RFH Reseller: Rappie]

Why cant you use objXML to edit the XML data?

I would love to use objXML to edit the data, but i also need de XSL (i think) to sort the data.

....

Microsoft VBScript compilation error '800a0414'


Cannot use parentheses when calling a Sub
/xml/test.asp, line 14

objXML.transformNodeToObject(objXSL,objResult)
----------------------------------------------^

I'am not sure what to make of this error, there is not much of a Sub.
Any clue on this one?

[Staff: Warren Ashcroft]

Change

objXML.transformNodeToObject(objXSL,objResult)

To

objXML.transformNodeToObject objXSL, objResult

You only use (parantheses) when the call returns data and you want to use it, IE:

variable = objXML.transformNodeToObject(objXSL,objResult)