Scambiare dati tra due server con SOAP: il server
Come mi ha gentilmente fatto notare uno degli iscritti, Ruggero Rossi, e come indicato, ad esempio, nello script #135, la versione 3 del parser XML offre un suppporto migliore.
Per utilizzare dunque la nuova versione del parser è sufficiente usare 'MSXML2.ServerXMLHTTP' in luogo di 'Microsoft.XMLHTTP'.
Completiamo dunque il discorso su SOAP, con il server.
Il server, come anticipato, si limiterà a prendere l'ora corrente dal client e a mostrare, insieme a quest'ultima, anche quella locale.
<%
Response.Buffer=true
Response.ContentType = "text/xml"
set XMLdom = server.CreateObject("Microsoft.XMLDOM")
XMLdom.load(Request)
set res = XMLdom.documentElement.childNodes.item(0).childNodes.item(0)
returnXML = returnXML & "<SOAP:Envelope xmlns:SOAP=""urn:schemas-xmlsoap-org:soap.v1"">"
returnXML = returnXML & "<SOAP:Body>"
returnXML = returnXML & "<message>"
returnXML = returnXML & "<results>"
returnXML = returnXML & "Da te sono le " & res.childNodes.item(1).text
returnXML = returnXML & ". Qui sono le ore " & Time()
returnXML = returnXML & "</results>"
returnXML = returnXML & "</message>"
returnXML = returnXML & "</SOAP:Body>"
returnXML = returnXML & "</SOAP:Envelope>"
' CONTROLLO CHE L'AUTORE SIA CORRETTO
' SI POSSONO IMPLEMENTARE ANCHE ALTRI TIPI DI CONTROLLO
if res.childNodes.item(0).text = "ASPItalia.com" then
Response.Write returnXML
end if
' PULIZIA
set XMLdom = Nothing
%>Commenti
Per inserire un commento, devi avere un account.
Fai il login e torna a questa pagina, oppure registrati alla nostra community.
Approfondimenti
Nessuna risorsa collegata
