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/WebService/universalthread.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/WebService/universalthread.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.

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/WebService/universalthread.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.

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())