Not sure which object to use to load xml into xsl

[Chuck]

Hello,
I am having trouble loading the returned XML from a Webservice into my XSL.
Any suggestions would be appreciated.


' Build custom HTTP header
xmlServerHttp.open "POST", "https://.../Site.asmx", False ' False = Do not
respond immediately
xmlServerHttp.setRequestHeader "Content-Type", "text/xml; charset=utf-8"
xmlServerHttp.setRequestHeader "Content-Length", Len(SoapBodyStr)
xmlServerHttp.setRequestHeader "SOAPAction",
"http://tempuri.org/GetSiteDetail"
xmlServerHttp.send(SoapBodyStr)

set xmlServerHttp = nothing

Dim oXmlsrc, oRootNode, oXslsrc, newXML, re, oXslTemplate, oXslProcessor
' If you're using an XSLTemplate and XSLProcessor object,
' you have to use the FreeThreaded versions of DOMDocument

Set oXmlsrc=CreateObject("MSXML2.FreeThreadedDOMDocument.4.0")
Call oXmlsrc.setProperty("ServerHTTPRequest", True) <<<<<<<<<<<< <<<<
should this be changed to xmlServerHttp?
oXmlsrc.async=False

Set oXslsrc=CreateObject("MSXML2.FreeThreadedDOMDocument.4.0")
Call oXslsrc.setProperty("ServerHTTPRequest", True) <<<<<<<<<<<<<<<<<
should this be changed to xmlServerHttp?
oXslsrc.async=False

Set oXslTemplate = Server.CreateObject("MSXML2.XSLTemplate.4.0")

' If I haven't posted the form first, then load my unaltered XML.
' If I'm posting info to resort or edit, then build my XML from that.

'On Error Resume Next 'debugging code

If Request.Form("acctname") = "" Then
Call oXmlsrc.load(???????)
<<<<<<<<<<<<<<<<<<<<<<<<< what object should be here?
'Response.Write "<!-- " & oXmlSrc.xml & " -->" 'debugging code
newXML=oXmlsrc.xml
Set re=new regexp
re.pattern=" xmlns.+?>"
newXML=re.replace(newXML,">")
Call oXmlsrc.loadxml(newXML)
else
....

 

[Anthony Jones]

Hello,
I am having trouble loading the returned XML from a Webservice into my XSL.
Any suggestions would be appreciated.

Reply in microsoft.public.xml