sub clearSecurity { # As of Outlook 2000 SP2, MS has added a security component that prevents any code # run from accessing Outlook's inner properties. To impede that technical protection # we need to clear the security popup window. my $securityHandle = 0; while (1) # keep on running the test { sleep(5); # sleep 5 seconds to wait for popup window to come up (should there be one) $securityHandle = LTG::dialog::findSecurityWindow(); LTG::dialog::clearSecurityWindow($securityHandle) if ($securityHandle); } }