CONECTAR CON UNA PAGINA WEB

[Manuel Valdenebro]

Queridos amigos,

Podria alguien indicarme como puedo, desde una ventana en Clipper-FiveWin , hacer una llamada a una página web determinada y que esta se abriera en otra ventana?

Muchas gracias.

Manuel

[Paco Garcia]

Hola

Tienes dos posibilidades. Si lo haces mediante un control ActiveX sería asi:

Code: Select all  Expand view

   oActiveX = TActiveX():New( oWnd, "Shell.Explorer" )

   oActiveX:Do( "Navigate", cURl )



La otra forma sería dejar al sistema que lo abra:

Code: Select all  Expand view


#DEFINE SW_SHOW           5

local cLink := "http://www.google.es"
ShellExecute( GetActiveWindow() ,nil,cLink,'','',SW_SHOW)



Un saludo

[R.F.]

A 16 bits no se puede dentro de una ventana propia de la aplicacion.

A 32 bits, como bien explica Paco, puedes hacerlo con un ActiveX.

[Manuel Valdenebro]

Hola
#DEFINE SW_SHOW 5

local cLink := "http://www.google.es"
ShellExecute( GetActiveWindow() ,nil,cLink,'','',SW_SHOW)

Paco, muchas gracias. Me ha funcionado perfectamente.

Un saludo