FiveTech Software tech support forums

... = TActiveX():New( oChildWnd, "Shell.Explorer.2" ) oActivex:Silent := .T. oChildWnd:oClient = oActiveX oActiveX:Do( "Navigate2", cSite ) ACTIVATE WINDOW oChildWnd RETURN NIL // FIN / END Regards, saludos.

... = TActiveX():New( oChildWnd, "Shell.Explorer.2" ) oActivex:Silent := .T. oChildWnd:oClient = oActiveX // oActiveX:Do( "Navigate2", "http://www.fivetechsoft.com" ) //oActiveX:Do( "Navigate2", "https://app.pedidosbcn.com/tienda/tiendadepizzas" ...

oDlg:oClient:=TActiveX():New(oDlg, "Shell.Explorer.2", 0, 0, oDlg:nWidth, oDlg:nHeight) oDlg:oClient:Do("Navigate2", "https://www.website/") do while .T. oDk:=oDlg:oClient:GetProp("Document") if valtype(oDk)="U".or.oDk:ReadyState!="complete" ...

... a veces NO retu .f. END WITH OBJECT oIE :Visible := .F. :ToolBar := .F. :FullScreen := .F. :Invoke( "Navigate", cURL ) END WITH TRY oIE:Navigate2( clinkSing ) CATCH oErr1 TRY oIE:Navigate( clinkSing ) CATCH oErr2 MsgWait("Error al tratar de firmar documento","No firmo",2) ...

... = TActiveX():New( oChildWnd, "Shell.Explorer.2" ) oActivex:Silent := .T. oChildWnd:oClient = oActiveX oActiveX:Do( "Navigate2", "http://www.fivetechsoft.com" ) oActivex:SetFocus() ACTIVATE WINDOW oChildWnd RETURN NIL // FIN Regards, saludos.

... PIXEL TRUEPIXEL   @ 20,20 ACTIVEX oActivex PROGID "Shell.Explorer.2" SIZE 260,260 OF oDlg   oDlg:bInit := { || oActivex:Navigate2( TrueName( "temp.html" ) ) }   ACTIVATE DIALOG oDlg CENTERED  https://imagizer.imageshack.com/v2/xq90/924/nNE29n.png ...

... oIE :Visible := .F. :ToolBar := .F. :StatusBar := .F. :MenuBar := .F. :FullScreen := .F. :Invoke( "Navigate", cURL ) END WITH TRY oIE:Navigate2( cUrl ) CATCH oErr TRY oIE:Navigate( cUrl ) CATCH oErro END END WHILE oIE:Busy SysWait(1) SysRefresh() Loop END HB_IDLESLEEP( 1 ) nPos:=0 ...

... TActiveX():New( ohtmlDlg, "Shell.Explorer.2" ) ohtmlDlg:oClient = oActiveX // To fill the entire window surface oActiveX:Do("Navigate2",cPath+"MiHtml.htm") ACTIVATE WINDOW ohtmlDlg RETUR NIL

... TActiveX():New( ohtmlDlg, "Shell.Explorer.2" ) ohtmlDlg:oClient = oActiveX // To fill the entire window surface oActiveX:Do("Navigate2",cPath+"MiHtml.htm") ACTIVATE WINDOW ohtmlDlg RETUR NIL

... ) WITH OBJECT oIE :Visible := .f. :ToolBar := .f. :StatusBar := .f. :MenuBar := .f. :FullScreen := .f. :Left:=150 :Top:=150 END WITH oIE:Navigate2("http://www.simjcloud.com/testing/leaflet/html/index.html?latfrom=37.899926&lngfrom=-4.731114&latto=37.587115&lngto=-4.639551") ...

... "CL" cTemp := cFilePath(GetModuleFilename(GetInstance()))+"google\Temp.html" MemoWrit( cTemp, cHtml ) oActiveX:Do( "Navigate2", cTemp ) return Nil func GoogleOk( cDirecc ) cDirecc := Upper(cDirecc) cDirecc := Trim(StrTran( cDirecc, '.', '')) cDirecc := Trim(StrTran( ...

En efecto tendría que ser oActiveX:DO( "Navigate2", cDir ) lo otro es un "defecto" al copiar y pegar el código en el mensaje . :D Como "Test" comenta el" on init" a ver si te da error o se queda en la ventana ...

Amigo ya probé tu codigo. Primeramente me arrojó error de sintaxis en la línea ON INIT ( oActiveX:DO( "Navigate2", cDir ) y recordando lo que lei anoche, el amigo cristóbal navarro recomendaba sustituir ":" por ":" de manera que quedara ...

... la llamo así: oActiveX = TActiveX():New( oWndWeb, "Shell.Explorer" ) oWndWeb:oClient = oActiveX oWndWeb:Resize() oActiveX:Do( "Navigate2", cWeb ) He buscado un poco por la red y no doy con ello, y lo que encuentro en este foro por ahora tampoco. Gracias,

... "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 FUNCTION ...