SecureXML Web Service Client Source Code

In order to run this code, you need to install MS-SOAP toolkit on your Windows 2000 machine. Both Windows 2000 Professional and Server are supported.

<%@ LANGUAGE = JScript %>
<%

var WSDL_URL = "http://www.securexml.net/SecureXML/SecureXML.asmx?wsdl"

var soapclient

if (!Application("SecureXMLClient")) {

soapclient = Server.CreateObject("MSSOAP.SoapClient30")
soapclient.ClientProperty("ServerHTTPRequest") = true
soapclient.mssoapinit(WSDL_URL)

Application.Lock
if (!Application("SecureXMLClient")) {
Application("SecureXMLClient") = soapclient
}
Application.UnLock
} else {
soapclient = Application("SecureXMLClient")
}

var inputXML, res
inputXML = Request("inputData")

if (inputXML == "") {
res = "No input Provided"
Response.Write(res)
} else {
res = soapclient.SecureXMLVerify(inputXML)
Response.ContentType="text/xml"
Response.Write(res)
}
inputXML = ""
%>