Simple VB script to copy emails from one Outlook folder to another