ASP CLASSIC | Evocare un web service da una pagina Asp
Dim Cognome, Nome, DataNascita, Sesso, Comune Cognome = “Bianchi” Nome = “Mario” DataNascita = “01/03/1965” Sesso = “M” Comune = “Napoli” Dim StrXml StrXml = “<?xml version=””1.0″” encoding=””utf-8″”?>” & \_ “<soap:Envelope xmlns:xsi=””http://www.w3.org/2001/XMLSchema-instance”” xmlns:xsd=””http://w
Dim Cognome, Nome, DataNascita, Sesso, Comune Cognome = “Bianchi” Nome = “Mario” DataNascita = “01/03/1965” Sesso = “M” Comune = “Napoli”
Dim StrXml
StrXml = “” & _
“<soap:Envelope xmlns:xsi=”“http://www.w3.org/2001/XMLSchema-instance”" xmlns:xsd=““http://www.w3.org/2001/XMLSchema”” xmlns:soap=““http://schemas.xmlsoap.org/soap/envelope/””>" & _
“soap:Body” & _
“<GetFiscalCode xmlns=”“http://www.sorrentino.it/ws/codicefiscale.asmx”“>” & _
“
Set Xml = Server.CreateObject(“Microsoft.XmlHttp”) Xml.Open “get”, “http://www.sorrentino.it/ws/codicefiscale.asmx”, false Xml.SetRequestHeader “Content-Type”, “text/xml” Xml.Send StrXml
Dim ResultText, ResultXml ResultText = Xml.ResponseText ResultXml = Xml.ResponseXml.Xml Set Xml = Nothing
Response.Write(ResultText)