Panjka
stranger
Dec 6, 2001, 7:43 AM
Post #1 of 1
(2906 views)
|
|
OLE events handling
|
Can't Post
|
|
Hi, all Perl people!
Could anyone show me the way to handle OLE object events? I tried the following code:
use Win32::OLE qw(EVENTS);
$ie = Win32::OLE->new('InternetExplorer.Application') or die "Oops, cannot start IE";
Then I loaded into IE some file with an HTML form and wanted to track the clicking of <input> buttons.
$ie->Navigate('c:\programming\formex.htm');
while ($ie->Busy) {}
$ie->{Visible} = 1;
Win32::OLE->MessageLoop();
Win32::OLE->WithEvents($ie, \&Ev);
where Ev is the event handling func.
But I could not handle any events.
I will greatly appreciate any advice or recommendation.
Pavel
|
MAIN
SEARCH
WHO'S 
LOG 