Save selected Entourage message (drag and drop style)

Hi,

I’m trying to find an applescript for Entourage 2004 that will let me save selected messages in their .eml format to a specific folder on my hard drive. I’ve searched high and low and and only found several that save them as text files (Microsoft even provides one out of the box). But I’m looking for something that will mimmic the drag and drop method, which keeps the Outlook Express format and automatically converts all colons subject line to dashes in the saved filename.

Basically I’m trying to find an applescript companion to simplify saving spam messages to a mac folder that then get parsed by another app.

Any pointers?


set storageFolder to (choose folder)
tell application “Microsoft Entourage”
set themessage to the current messages
save themessage in storageFolder
log themessage
end tell

Whys soesn’t this work in Mail?