Downloads Tutorial Mac OS X
Infomosaic products are not available to new customers after 08/29/2008. Read White Papers, Case Studies and Articles
Existing customers may contact support for any technical questions as long as their annual maintenance contract is active. The license management site will remain active until 12/31/08. Please download all your licenses before that.
Google
Web
infomosaic.net






SecureXML Web Service Client VBScript 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. The signed XML input is read from file "TwoSignatures.xml". The response received from the web service is stored as "RTwoSignatures.xml" file. You can download a complete client bundle with all input files by clicking here.

Dim soapclient
Dim fileObject
Dim signedXML
Dim signedXMLFile
Dim res

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


'Create SoapClient
Set soapclient = CreateObject("MSSOAP.SoapClient30")
soapclient.ClientProperty("ServerHTTPRequest") = True
soapclient.mssoapinit WSDL_URL


Set fileObject = CreateObject("Scripting.FileSystemObject")

Set signedXMLFile = fileObject.OpenTextFile("TwoSignatures.xml")
signedXML = signedXMLFile.ReadAll()
res = soapclient.SecureXMLVerify(signedXML)
Set signedXMLFile = fileObject.CreateTextFile("RTwoSignatures.xml", true)
signedXMLFile.Write(res)

MsgBox("Done")

 

 

 

All contents are Copyright © 2000--2008 Infomosaic Corporation. All rights reserved.
Page last updated on Friday, August 29, 2008

Success Stories

Google
Web
infomosaic.net