FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour consulta shell.explorer
Posts: 105
Joined: Thu Oct 20, 2005 12:29 PM
consulta shell.explorer
Posted: Thu Sep 29, 2011 12:02 AM

Hola a todos.

Necesito conectarme usando activex a una direccion en internet y esperar una respuesta desde la misma, el problema es que no tengo idea como saber cuando se recibio la respuesta.

Por ejemplo, si hago esto y espero que muestre la respuesta visualmente, funciona.

oActiveX:Do( "Navigate2", cUrl )
msgstop( "Espere a recibir respuesta....!" )
cRespuesta := oActiveX:Document:body:innerHTML
? cRespuesta

pero, al quitar msgstop me da un error que dice que el metodo body no existe, esto es porque la respuesta aun no se ha recibido.

Gracias de antemano.

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: consulta shell.explorer
Posted: Thu Sep 29, 2011 07:25 AM

Prueba con:

oActiveX:Do( "Navigate2", cUrl )
while oActiveX:Document == nil
SysRefresh()
end
cRespuesta := oActiveX:Document:body:innerHTML
? cRespuesta

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 105
Joined: Thu Oct 20, 2005 12:29 PM
Re: consulta shell.explorer
Posted: Thu Sep 29, 2011 12:14 PM

Antonio Gracias.

Continue the discussion