Como puedo manejar el IEXPLORE
Posted: Fri Nov 14, 2008 9:44 pm
Amigos como hago para poner un boton en el INTERNET EXPLORER
QUE EJECUTE EL SALVADO DE UNA pagina
esta funcion me carga la pagina
FUNCTION IEWindow(DIRE)
LOCAL oWnd, oActiveX
DEFINE Window oWnd
oActiveX := TActiveX__():New( oWnd, "Shell.Explorer.2" )
oActiveX:Navigate( DIRE )
oWnd:oClient := oActiveX:oControl
oActiveX:BeginMap()
oActiveX:AddMap( 108, { |p1,p2| oWnd:SetText( "Cargando " + Str( p1 ) + " De " + Str( p2 ) ) } )
oActiveX:EndMap()
Activate Window oWnd
RETURN NIL
/*-----------------------------------------------------------------------------------------------*/
perocomo hago para ponerle un boton que me guarde la pagina
GRacias
QUE EJECUTE EL SALVADO DE UNA pagina
esta funcion me carga la pagina
FUNCTION IEWindow(DIRE)
LOCAL oWnd, oActiveX
DEFINE Window oWnd
oActiveX := TActiveX__():New( oWnd, "Shell.Explorer.2" )
oActiveX:Navigate( DIRE )
oWnd:oClient := oActiveX:oControl
oActiveX:BeginMap()
oActiveX:AddMap( 108, { |p1,p2| oWnd:SetText( "Cargando " + Str( p1 ) + " De " + Str( p2 ) ) } )
oActiveX:EndMap()
Activate Window oWnd
RETURN NIL
/*-----------------------------------------------------------------------------------------------*/
perocomo hago para ponerle un boton que me guarde la pagina
GRacias