Help for this page

Select Code to Download


  1. or download this
    use Win32::GuiTest qw/SendMessage/;
use Win32::FindWindow;
$window = find_window( basename => 'winword.exe' );
SendMessage($window->hwnd,WM_CLOSE,0,0);
  2. or download this
    use Win32::CtrlGUI;
my $window =Win32::CtrlGUI::wait_for_window(qr/Word/);
$window->send_keys("!fx");
my $window =Win32::CtrlGUI::wait_for_window(qr/Excel/);
$window->send_keys("!fx");