FiveTech Software tech support forums

... "Shell.Explorer.2" ) oWndChild:oClient = oActiveX // To fill the entire window surface oWndChild:Resize() oActiveX:Do( "Navigate2", "http://www.nfce.se.gov.br/portal/painelMonitor.jsp" ) oActiveX:Silent := .t. ACTIVATE WINDOW oWnd return nil

... PROGID "Shell.Explorer" REDEFINE BUTTON ID 110 OF oDlg ACTION oDlg:end() ACTIVATE DIALOG oDlg CENTERED ON INIT oActiveX:Do( "Navigate2", cLink ) EndIf Return NIL ///////////////// ahora bien el tema es que algunos sitios donde navego chequea la version del navegador que ...

... ID 110 OF oDlg ACTION (VeoAnses(oActiveX:Document:Body:InnerHtml), oDlg:end() ) ACTIVATE DIALOG oDlg CENTERED ON INIT oActiveX:Do( "Navigate2", "http://servicioswww.anses.gov.ar/censite/" ) -------------------------- Function VeoAnses(cTextoHTML) Local cResultado, ...

... en el scrip etc etc y no me muestra nada COMO PUEDO ABRIR LA PAGINA PERO CON CHROME? Te mando el ejemplo que estoy utilizando oActiveX : Do( "Navigate2" , "\" + CurDir() + "\temp.html" ) o tambien function PRUEBA local oDlg, oActiveX DEFINE DIALOG oDlg RESOURCE "Test" ...

Write as html file, use Shell.Explorer Activex to read and display by Navigate2(...) method.
I do not know a better method than this. if there is one, I am equally interested in learning.

... PROGID "Shell.Explorer" REDEFINE BUTTON ID 110 OF oDlg ACTION oDlg:end() ACTIVATE DIALOG oDlg CENTERED ON INIT oActiveX:Do( "Navigate2", nLink ) gracias de antemano Pablo

... "ExecWB", OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER ) oIe = TActiveX():New( oWnd, "Shell.Explorer" ) endif oIe:Do( "Navigate2", cHtmlOrUrl) do while alltrim(oIe:document:readyState) <> 'complete' sysrefresh() waitseconds(.5) enddo if lshow oWnd:oClient ...

... ) oWndWeb:oClient = oActiveX cUrl:="http://www.sefaz.go.gov.br/dare/espontaneo/default.asp?cadastrado=true" oActiveX:Do( "Navigate2", cUrl) oWndWeb:center() While oActiveX:Busy syswait(.2) End oActiveX := oActiveX:Document() oActiveX:All:Item("CCE",0):Value ...

... 10, 30 TO 40, 80 @ 1,1 ACTIVEX oActX OF oDlg PROGID "Shell.Explorer" ACTIVATE DIALOG oDlg ON INIT ( Timer( oDlg, oWnd ), oActX:Do( "Navigate2", "http://www.logicielspro.com/logmaj.php" ) ) NOWAIT RETURN ( NIL ) FUNCTION Timer( oDlg, oWnd ) LOCAL oTime := NIL DEFINE ...

... DIALOG oDlg FROM 10, 230 TO 80, 280 @ 1,1 ACTIVEX oActX OF oDlg PROGID "Shell.Explorer" ACTIVATE DIALOG oDlg ON INIT ( oActX:Do( "Navigate2", "http://www.logicielspro.com/logmaj.php" ) ) NOWAIT RETURN ( NIL )

Prueba con:

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

... 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, ...

Hola Postinelli

lo resolvi reemplazando la instruccion por :

oActiveX:Do("Navigate2","http://www.google.com")

funciona de maravillas...

Gracias

Pues no se que sera pero sigue lo mismo... me abre una ventana/solapa con cada llamada Navigate2 . ¿ Alguna idea mas ? En el MSDN de Microsoft hay esta información: Navigate2 Method Navigates the browser to a location that might not be expressed as a URL, such as a ...

... @ 0, 0 ACTIVEX oActiveX PROGID "Shell.Explorer" OF oWnd oWnd:oClient = oActiveX ACTIVATE WINDOW oWnd ; ON INIT oActiveX:Do( "Navigate2",; "https://www.dixiesales.com/login-us.aspx",,,; GetPostData( "name=1000" ),; "Content-Type: application/x-www-form-urlencoded" ...