Ciao a tutti ragazzi, ho la necessità di estrarre l'xml di una pagina aspx presente su un server.
Ho costruito il seguente codice.Quello che ho fatto è stato caricare la l'xml in un dom e dopo trasformarlo applicandogli il foglio di stile.
Non so dove sto sbagliando, ogni volta ottengo qualche errore.Ecco il codice:
Dim xmlHTTP
Dim xslproc
Dim xsldoc
Dim xslt
dim xmlout
Dim ConfirmationXML
xmlHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlHTTP.open("POST", "http://1.56.4.63/openwork/list.aspx?ListType=13&ListSubType=0&modelid=53&hideactions=all&pageid=1155018048", False)
xmlHTTP.setRequestHeader("Content-type", "application/x-www-form-urlencoded")
xmlHTTP.send()
xsldoc = Server.CreateObject("Msxml2.FreeThreadedDOMDocument.3.0")
xslt = Server.CreateObject("Msxml2.XSLTemplate.3.0")
xmlout = xmlHTTP.responseXML.xml
doc_x.Load(xmlHttp.responseXML)
xsldoc.load("gestione_mandato.xsl")
xslproc = xslt.createProcessor
xslproc.input = doc_x
xslproc.transform()
Ho costruito il seguente codice.Quello che ho fatto è stato caricare la l'xml in un dom e dopo trasformarlo applicandogli il foglio di stile.
Non so dove sto sbagliando, ogni volta ottengo qualche errore.Ecco il codice:
Dim xmlHTTP
Dim xslproc
Dim xsldoc
Dim xslt
dim xmlout
Dim ConfirmationXML
xmlHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlHTTP.open("POST", "http://1.56.4.63/openwork/list.aspx?ListType=13&ListSubType=0&modelid=53&hideactions=all&pageid=1155018048", False)
xmlHTTP.setRequestHeader("Content-type", "application/x-www-form-urlencoded")
xmlHTTP.send()
xsldoc = Server.CreateObject("Msxml2.FreeThreadedDOMDocument.3.0")
xslt = Server.CreateObject("Msxml2.XSLTemplate.3.0")
xmlout = xmlHTTP.responseXML.xml
doc_x.Load(xmlHttp.responseXML)
xsldoc.load("gestione_mandato.xsl")
xslproc = xslt.createProcessor
xslproc.input = doc_x
xslproc.transform()