Dear All,

I am trying to invoke a Secured WebService in WebSphere which requires
me to setOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS

May I know how can I do the similar task using WSE2 SP3?

What needs to me set in RequestSoapContext?

Thanks in advance.

[quoted text, click to view]

Dim objXmlHttp
Dim strPOST, strRESPONSE
Dim lResolve, lConnect, lSend, lReceive
Const SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056

'/ Creacion del Objeto XML para el POST
Set objXmlHttp = CreateObject("MSXML2.ServerXMLHTTP")
'/
'/ Here you set the option
Call objXmlHttp.setOption(2, 13056) 'ignore SSL errors
'/
'/

'/ Se establecen los Timeouts
lResolve = 5 * 1000
lConnect = 5 * 1000
lSend = 15 * 1000
lReceive = 15 * 1000
objXmlHttp.setTimeouts lResolve, lConnect, lSend, lReceive

'/ Aqui se envia la solicitud de la txn
strPOST = "A=5&B=4"

'/ se aplica el POST a la IP correspondiente
objXmlHttp.Open "POST", "http://172.20.1.226/MathService.asmx/Multiply", False
objXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objXmlHttp.send (strPOST)
strRESPONSE = objXmlHttp.responseText
Text1.Text = strRESPONSE
Set objXmlHttp = Nothing


BizTalk Utilities - Frustration free BizTalk Adapters