FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Webservice desde FWH
Posts: 182
Joined: Wed Nov 08, 2006 11:44 PM
Webservice desde FWH
Posted: Sat May 12, 2012 05:02 PM
Hola en la consulta que hice sobre el tema, en el metodo hay una modificacion que hice probando
y que no esta en el original de la clase


*****************************
METHOD New(conexion,buffersize) CLASS TdWebService
DEFAULT buffersize:=3200
::=buffersize
xDll:=LoadLib32("wininet.dll")
// esta linea fue modificada por mi para probar ::hOpen = InternetOpen("TdWebService", 1,"User","Password", 0)
// esta es la linea original ::hOpen = InternetOpen("TdWebService", 1,,, 0)
RETURN Self

*****************************

Continue the discussion