Applescript Quicktime Pro 7 "Share>Email>Medium"

Hello,

New to applescript, in need of some automation on the 30 or so Quicktime movies I need to send to my director every day. How do I write script for “Share>Email>Size:Medium”? This is not Export, but a function under File that shrinks it and automatically embeds it in an email.

Can this be written so that say, 5 opened Quicktime Movies can be done at once?

Quicktime Pro 7

Thanks,
Kate

Model: MacBook
AppleScript: 2.3
Browser: Firefox 5.0.1
Operating System: Mac OS X (10.6)