Hi All
In the below script we can print event details into console window by
debug_spin(1).
Now how can I print those event details in a text file ?
__________________________________________________________________
use strict;
use Win32::OLE;
use Win32::ActAcc;
sub main
{
print "\n"."aaEvents - Display WinEvents"."\n\n";
print "(runs until interrupted, e.g., by ^C)\n";
Win32::OLE->Initialize();
my $eh = Win32::ActAcc::createEventMonitor(1);
for (;;)
{
print "-----\n";
$eh->debug_spin(1);
}
}
&main;
_________________________________________________
Thanks
Abhra
Abhra Debroy _______________________________________________
Prabodhan Exports Pvt. Ltd .(www.prabodhan.com - Join our QA Club!).
47/4, Aishwarya Resi, Abhinav Parisar,
Erandwane , Pune 411 004 India.
Tel: 91-20-5462035,543 1447( Extn -21)
____________________________________________________________
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]