[REBOL] NQL-Bye.r
From: ryanc::iesco-dms::com at: 23-Apr-2001 11:44
My response to to the NQL affair:
REBOL [
file: %NQL-Bye.r
purpose: "Sends message to all of NQLi staff."
]
my-email-address: ask "Enter your email address: "
my-name: ask "Enter your name/signature: "
nql-addresses: [
[info--nqli--com]
[marketing--nqli--com]
[investors--nqli--com]
[press--nqli--com]
[employment--nqli--com]
[webmaster--nqli--com]
[dave--gomez--nqli--com]
]
message: rejoin [
{Re: Unsolicited Email
Dear NQLi,
Please do not send unsolicited emails to my address }
my-email-address
{. Please do not share or rent any information associated with my email
address, }
{and remove it from your database.
Thank you for your prompt compliance,
} my-name
]
foreach address nql-addresses [
either error? try [ send address message ] [
print [ "Error notifying" address ]
] [
print ["Notified" address]
]
]
confirm "Notification completed."