FiveTech Software tech support forums

Has anybody managed to utilize Web Services native in FiveWin without utilizing the MS Web Services Tools? I feel certain it is possible but I don't know where to start.

Byron...

Byron,

What web services do you mean ? A web server ? A web client ?

Byron,

I belive that the easiest way to consume webservices under [x]Harbour is installing the ms soap toolkit that permits inkove it like com objects. Basically creates a com object envolture of a webservice object that permits use it to any language capable to use then com technology. An example of the source code:

lo_serv=Createobject("mssoap.soapclient30") // Soap object creation
lo_serv.mssoapinit("http://www.universalthread.com/WebServi ... .asmx?wsdl") // webservice uri
// invoking web service methods.
lo_serv.someMethod( param1, param2, ... )
lo_serv.Dispose()
lo_serv := nil

To invoke ws without ms soaptoolkit under [x]Harbour is not easy work, you must to 'talk' with webservice with soap directly

If you need some advice i can help you.

regards.

jcleygar wrote:Byron,

I belive that the easiest way to consume webservices under [x]Harbour is installing the ms soap toolkit that permits inkove it like com objects. Basically creates a com object envolture of a webservice object that permits use it to any language capable to use then com technology. An example of the source code:

lo_serv=Createobject("mssoap.soapclient30") // Soap object creation
lo_serv.mssoapinit("http://www.universalthread.com/WebServi ... .asmx?wsdl") // webservice uri
// invoking web service methods.
lo_serv.someMethod( param1, param2, ... )
lo_serv.Dispose()
lo_serv := nil

To invoke ws without ms soaptoolkit under [x]Harbour is not easy work, you must to 'talk' with webservice with soap directly

If you need some advice i can help you.

regards.

I need help!!
I write this example and show error

Error occurred at: 05/07/08, 14:23:14
Error description: Error MSSOAP.SoapClient30/3 DISP_E_MEMBERNOTFOUND: MSSOAPINIT
Args:

Stack Calls
===========
Called from: win32ole.prg => TOLEAUTO:MSSOAPINIT(0)

I installed Soap SDK 3.0 from Ms ;
http://www.microsoft.com/downloads/than ... layLang=en


Can you help me !??

Thank you!
Regards
Rafa Carmona

it obtains to function?

jcleygar wrote:Byron,

I belive that the easiest way to consume webservices under [x]Harbour is installing the ms soap toolkit that permits inkove it like com objects. Basically creates a com object envolture of a webservice object that permits use it to any language capable to use then com technology. An example of the source code:

lo_serv=Createobject("mssoap.soapclient30") // Soap object creation
lo_serv.mssoapinit("http://www.universalthread.com/WebServi ... .asmx?wsdl") // webservice uri
// invoking web service methods.
lo_serv.someMethod( param1, param2, ... )
lo_serv.Dispose()
lo_serv := nil

To invoke ws without ms soaptoolkit under [x]Harbour is not easy work, you must to 'talk' with webservice with soap directly

If you need some advice i can help you.

regards.

Hi, i would like some informations about how to implement web services because i'm starting with it. Can you help me, please? If you have some examples or any link for look it, i would appreciate it

Regards,
Elías Torres.

Elias,

Please review this thread:

http://forums.fivetechsoft.com/viewtopic.php?t=11948

Antonio, nose si es que ando bastante perdido, pero me surge una duda (son muchas la verdad, jeje). Esto sirve para implementar sobre una Pocket PC? o solo son para aplicaciones de escritorio?

Un saludo.

Elías Torres.

Elias,

Hay que comprobar si Windows Mobile proporciona un cliente "SOAP":

oSoapClient := CreateObject( "MSSOAP.SoapClient" )

ó ver si es preciso instalar algún software de Microsoft en el Pocket PC

Antonio, con el siguiente codigo:

#include "FiveWin.ch"

Function Main()

oSoapClient := CreateObject( "MSSOAP.SoapClient" )

return nil

Me reporta el siguiente error:

.....
Creating library test.lib and object test.exp
test.obj : error LNK2001: unresolved external symbol HB_FUN_CREATEOBJECT
test.exe: fatal error LNK1120: 1 unresolved externals
......

Nose si es porque me falta incluir alguna libreria o si es que no está soportada por el lenguaje.

Un saludo.
Elías Torres.

Elías,

Necesitas la versión más reciente de FWPPC que proporciona soporte para OLE automation (CreateObject())