Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- This script can be used to submit e-mail messages to SpamCop.net.
- -- I'd like to have this script look up the contact named SpamCop, and copy the e-mail address found there.
- -- Who knows how?
- -- Please save the script here: ~/Library/Scripts/Applications/Mail
- -- If the Mail directory does not exist, you can make it.
- tell application "Mail"
- set SpamItems to selection
- repeat with SpamItem in SpamItems
- set SpamItemSource to source of SpamItem
- set SpamReport to make new outgoing message with properties {visible:true}
- tell SpamReport
- -- Remove the dashes from 1 of the following lines of code, to use it.
- -- Remove the dashes from the line below to send spam to uce.gov.
- -- make new to recipient with properties {name:"UCE", address:"spam@uce.gov"}
- -- Remove the dashes from the line below to send spam to spamcop.net.
- -- make new to recipient with properties {name:"SpamCop", address:"your SpamCop address"}
- -- You can make your own SpamCop address at https://www.spamcop.net.
- set subject to subject of SpamItem
- if subject of SpamReport is "" then set subject of SpamReport to "Spam Report"
- -- Please enter your own name and e-mail address in the line below.
- set sender to "Your Name <you@yourisp.com>"
- set content to SpamItemSource
- send
- end tell
- delete SpamItem
- end repeat
- end tell
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement