FiveTech Software tech support forums

... = TActiveX():New( oWnd, "Shell.Explorer" )    oWnd:oClient := oActiveX // To fill the entire window surface    oActiveX:Do( "Navigate2", "https://www.dixiesales.com/login-us.aspx" ) ACTIVATE WINDOW oWnd MAXIMIZED return(nil) The above code takes me to where ...

...     cTextoHTML:="Error"   End Try y en la variable cTextoHTML tengo el texto deseado... Pero en el caso de oActiveX:Do("Navigate2",cURL) no se como se hace...

Hola JmGarcia:

Depende del proxy que tengas, pero simplemente tienes que asignar en tu salida el puerto interno y en el proxy configurar el redirecionamiento de dicho puerto al real, es decir, mapearlo.

un saludo
JLL

¡¡¡ Socorro !!!

Help !!!

... usuario y contraseña, claro :mrgreen: ). Lo necesito para con la clase TActivex en la que uso instrucciones de este estilo oActiveX:Do("Navigate2",cURL) No me funciona cuando ejecuto el programa detras de un proxy... :cry: :cry: :cry: no se ve el contenido de la URL.

Me respondo. Usando el oIE:=Createobject("InternetExplorer.Application"), oIE:Navigate2(cUrl), etc. Efectivamente... Como a mi solo me interesa la distancia me vale con tener la página web en una variable string con cTextoHTML:=oHttp:ResponseText() Si quieres ...

Me respondo. Usando el oIE:=Createobject("InternetExplorer.Application"), oIE:Navigate2(cUrl), etc.

Saludos,

... etc... y capturar la pagina de retorno con funciones de oIE:=Createobject("InternetExplorer.Application") oIE:Navigate2(cUrl) oIE:Document:body:innerHTML() oIE:Document:body:innerText() etc... y coger la distancia. Creo haberme explicado, gracias.

... () GoHome Method void GoHome () GoSearch Method void GoSearch () Navigate Method void Navigate (string, Variant, Variant, Variant, Variant) Navigate2 Method void Navigate2 (Variant, Variant, Variant, Variant, Variant) PutProperty Method void PutProperty (string, Variant) QueryStatusWB Method ...

Hello Enrico,
Thank you again. With trial and error I found out how to do.
If someone is interested:

oDoc := oActiveX:GetProp( "Document" )
oText := oDoc:GET("body" )
msginfo( oText:GET("innerText" ))
Best regards,
Otto

Hello Enrico,

thank you for your help.
Should your code also work on a password protected page.

Is cFile the content of the page.

Thanks in advance
Otto

This is a working sample: FUNCTION MAIN()    ? GETURL( "http://www.emagsoftware.it/gratis.htm" )    RETURN NILFUNCTION GETURL( cUrl )    LOCAL cFile := SUBSTR( cUrl, RAT( "/", cUrl ) + 1 )    LOCAL oU...

Could someone show me how to save the content of a internet page to a variable.
Thanks in advance
Otto

... = "cerrar" ; 2) En la aplicación FiveWin, cuando abrimos la página con activeX, añadimos lo siguiente: oActiveX:Do( "Navigate2",(CurDrive() + ":\"+CurDir()+"\temp.htm") ) oActiveX:bOnEvent = { | event, aParams, pParams | EventInfo( event, ...

... y consecuentemente, ninguna de sus propiedades. En un ejemplo, en el módulo donde programo el dialogo, he puesto: oActiveX:Do( "Navigate2",(CurDrive() + ":\"+CurDir()+"\tem.htm") ) oActiveX:SetProp( "cSalir", .t. ) pero despues, en la página, ...