Page 1 of 1

Web Service PocketSoap Sample Working !!!

Posted: Mon Oct 05, 2009 6:11 pm
by toninhofwi
Hi friends,

Now that Microsoft abandoned MSSOAP, the best is use PocketSoap instead, this is a working sample (tested on Harbour only)

---cut---
local oEnvelope := Win_OleCreateObject( "PocketSOAP.Envelope.2" )
local oHttp := Win_OleCreateObject( "PocketSOAP.HTTPTransport.2" )

oEnvelope:EncodingStyle = ""
oEnvelope:SetMethod( "InvertStringCase", "http://www.dataaccess.com/webservicesserver/" )
oEnvelope:Parameters:Create( "sAString", "THIS IS LOWER - this is upper" )

oHttp:Send( "http://www.dataaccess.com/webservicesse ... g.wso?WSDL", oEnvelope:Serialize() )

oEnvelope:Parse( oHttp )

MsgInfo( oEnvelope:Parameters:Item( 0 ):Value )
---cut---

get pocket soap from: http://www.pocketsoap.com/

Regards,

Toninho.

PS: Thanks Luiz Culick for indicate pocketsoap and for teach me.

Re: Web Service PocketSoap Sample Working !!!

Posted: Tue Oct 06, 2009 7:46 pm
by Antonio Linares
Toninho,

Thanks! :-)

Re: Web Service PocketSoap Sample Working !!!

Posted: Mon Sep 27, 2010 6:26 pm
by leonardoinacio
Toninho,

Obrigado pela ótima alternativa !
Funcionou perfeitamente.

O detalhe é que sempre temos que instalar o pacote PocketSopa para que as DLL fiquem registradas correto ?
Você conhece alguma forma de utilizar apenas portando as DLL no diretório da aplicação ?

Obrigado

Re: Web Service PocketSoap Sample Working !!!

Posted: Tue Jun 09, 2015 8:43 pm
by jorjio
Hi,
I have set up pocketSOAP on windows 8.1 but it gives

xLINK: error: Unresolved external symbol '_HB_FUN_WIN_OLECREATEOBJECT referenced from

at compile.

Re: Web Service PocketSoap Sample Working !!!

Posted: Wed Jun 10, 2015 7:28 am
by Antonio Linares
Jorjio,

What xharbour version is it ? It seems as an old one.