Wx::ActiveX::IE - ActiveX interface for Internet Explorer. (Win32)
use Wx::ActiveX::IE qw(:iexplorer); ............ my $browser = Wx::ActiveX::IE->new( $parent , -1 , wxDefaultPosition , wxDefaultSize ); EVT_ACTIVEX_IE_BEFORENAVIGATE2($this,$browser,\&on_evt_beforenavigate); ............ $browser->LoadUrl("http://wxperl.sf.net"); #OR use Wx::ActiveX::IE; use Wx::ActiveX::Mozilla; use Wx::ActiveX::Browser qw(:browser); ............ my $browserclass = $ShouldIUseIE ? 'Wx::ActiveX::IE' : 'Wx::ActiveX::Mozilla'; my $browser = $browserclass->new( $parent , -1 , wxDefaultPosition , wxDefaultSize ); EVT_ACTIVEX_BROWSER_BEFORENAVIGATE2($this,$browser,\&on_evt_beforenavigate); ............ $browser->LoadUrl("http://wxperl.sf.net");
This will implement the web browser Internet Explorer in your App, using the interface Wx::ActiveX.
This will create and return the browser object.
Attempts to browse to the url, the control uses its internal network streams.
Load the passed HTML string.
Load the passed HTML stream. The control takes ownership of the pointer, deleting when finished.
Sets the charset of the loaded document.
Set the EditMode ON/OFF.
Return true if the EditMode as set on.
Get the text selected in the page. If asHTML is true it return the html codes too.
Get all the text of the page. If asHTML is true it return the html codes too.
Go back in the History.
Go forward in the History (if it goes back before).
Go to the Home Page of the browser.
Go to the default search page of IE.
Refresh the URL. You can set the LEVELs, from 0 to 3, of the refresh:
0 -> Normal*. 1 -> If Expired. 2 -> Continue. 3 -> Completely.
Stop the download process.
Print the page. If Prompt is TRUE, will prompt for configurations, if FALSE will print directly.
Show the Print Preview window.
All the events use EVT_ACTIVEX. For example, the event BeforeNavigate2 can be declared usgin EVT_ACTIVEX:
EVT_ACTIVEX($parent , $IE , "BeforeNavigate2" , sub{...} ) ;
or using the ACTIVEX_IE event table:
EVT_ACTIVEX_IE_BEFORENAVIGATE2($parent , $IE , sub{...} ) ;
To import the events use:
use Wx::ActiveX qw( EVT_ACTIVEX ); use Wx::ActiveX::IE qw(EVT_ACTIVEX EVT_ACTIVEX_IE_NEWWINDOW2 EVT_ACTIVEX_IE_STATUSTEXTCHANGE) ; ... or ... use Wx::ActiveX::IE qw(:iexplorer) ;
You can use a common event table for both Mozilla and IE
use Wx::ActiveX::Browser qw(:browser);
Here is the event table for Wx::ActiveX::IE:
EVT_ACTIVEX_IE_STATUSTEXTCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_DOWNLOADCOMPLETE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_COMMANDSTATECHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_DOWNLOADBEGIN($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_PROGRESSCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_PROPERTYCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_TITLECHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_PRINTTEMPLATEINSTANTIATION($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_PRINTTEMPLATETEARDOWN($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_UPDATEPAGESTATUS($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_BEFORENAVIGATE2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_NEWWINDOW2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_NAVIGATECOMPLETE2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONQUIT($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONVISIBLE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONTOOLBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONMENUBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONSTATUSBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONFULLSCREEN($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_DOCUMENTCOMPLETE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_ONTHEATERMODE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSETRESIZABLE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWCLOSING($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSETLEFT($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSETTOP($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSETWIDTH($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSETHEIGHT($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_CLIENTTOHOSTWINDOW($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_SETSECURELOCKICON($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_FILEDOWNLOAD($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_NAVIGATEERROR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_PRIVACYIMPACTEDSTATECHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_NEWWINDOW3($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_SETPHISHINGFILTERSTATUS($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_IE_WINDOWSTATECHANGED($handler, $axcontrol, \&event_sub);
Here is the event table for Wx::ActiveX::Browser:
EVT_ACTIVEX_BROWSER_STATUSTEXTCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_DOWNLOADCOMPLETE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_COMMANDSTATECHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_DOWNLOADBEGIN($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_PROGRESSCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_PROPERTYCHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_TITLECHANGE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_BEFORENAVIGATE2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_NEWWINDOW2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_NAVIGATECOMPLETE2($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONQUIT($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONVISIBLE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONTOOLBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONMENUBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONSTATUSBAR($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONFULLSCREEN($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_DOCUMENTCOMPLETE($handler, $axcontrol, \&event_sub); EVT_ACTIVEX_BROWSER_ONTHEATERMODE($handler, $axcontrol, \&event_sub);
$obj->MethodName( @args ); or $obj->Invoke( 'MethodName', @args ); AddRef() ClientToWindow(pcx , pcy) ExecWB(cmdID , cmdexecopt , pvaIn , pvaOut) GetIDsOfNames(riid , rgszNames , cNames , lcid , rgdispid) GetProperty(Property) GetTypeInfo(itinfo , lcid , pptinfo) GetTypeInfoCount(pctinfo) GoBack() GoForward() GoHome() GoSearch() Invoke(dispidMember , riid , lcid , wFlags , pdispparams , pvarResult , pexcepinfo , puArgErr) Navigate(URL , Flags , TargetFrameName , PostData , Headers) Navigate2(URL , Flags , TargetFrameName , PostData , Headers) PutProperty(Property , vtValue) QueryInterface(riid , ppvObj) QueryStatusWB(cmdID) Quit() Refresh() Refresh2(Level) Release() ShowBrowserBar(pvaClsid , pvarShow , pvarSize) Stop()
AddressBar (bool) Application (IDispatch) Busy (bool) Container (IDispatch) Document (IDispatch) FullName (wxString) FullScreen (bool) Height (long) HWND (long) Left (long) LocationName (wxString) LocationURL (wxString) MenuBar (bool) Name (wxString) Offline (bool) Parent (IDispatch) Path (wxString) ReadyState (*user defined*) RegisterAsBrowser (bool) RegisterAsDropTarget (bool) Resizable (bool) Silent (bool) StatusBar (bool) StatusText (wxString) TheaterMode (bool) ToolBar (int) Top (long) TopLevelContainer (bool) Type (wxString) Visible (bool) Width (long)
StatusTextChange DownloadComplete CommandStateChange DownloadBegin ProgressChange PropertyChange TitleChange PrintTemplateInstantiation PrintTemplateTeardown UpdatePageStatus BeforeNavigate2 NewWindow2 NavigateComplete2 OnQuit OnVisible OnToolBar OnMenuBar OnStatusBar OnFullScreen DocumentComplete OnTheaterMode WindowSetResizable WindowClosing WindowSetLeft WindowSetTop WindowSetWidth WindowSetHeight ClientToHostWindow SetSecureLockIcon FileDownload NavigateError PrivacyImpactedStateChange NewWindow3 SetPhishingFilterStatus WindowStateChanged
This package only works for Win32, since it use AtiveX.
Wx::ActiveX Wx Wx::ActiveX::Mozilla Wx
Graciliano M. P. <gm@virtuasites.com.br>
Thanks to wxWindows people and Mattia Barbon for wxPerl! :P
Thanks to Justin Bradford <justin@maxwell.ucsf.edu> and Lindsay Mathieson <lmathieson@optusnet.com.au>, that wrote the original C++ classes for wxActiveX and wxIEHtmlWin.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
Mark Dootson <mdootson@cpan.org>
To install Wx::ActiveX, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Wx::ActiveX
CPAN shell
perl -MCPAN -e shell install Wx::ActiveX
For more information on module installation, please visit the detailed CPAN module installation guide.