CONECTAR CON UNA PAGINA WEB

Post Reply
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

CONECTAR CON UNA PAGINA WEB

Post by 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
User avatar
Paco Garcia
Posts: 172
Joined: Fri Oct 07, 2005 12:00 pm
Contact:

Post by Paco Garcia »

Hola

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

Code: Select all | Expand

   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

 
#DEFINE SW_SHOW           5

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



Un saludo
R.F.
Posts: 840
Joined: Thu Oct 13, 2005 7:05 pm

Post by 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.
Saludos
R.F.
User avatar
Manuel Valdenebro
Posts: 706
Joined: Thu Oct 06, 2005 9:57 pm
Location: Málaga-España

Post by Manuel Valdenebro »

Paco Garcia wrote: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
Post Reply