Why not try using the new resend command
(from the notes.html of v2.2)
The resend function resends an email message to the specified email without
alteration, leaving the original "To:" and "From:" fields intact. The
recipient and sender email addresses specified with resend are assigned to the
fields "Delivered-To:" and "Return-Path:" within the resent email. Messages
resent must be passed to resend as a single string value containing the email.
Example:
resend [EMAIL PROTECTED] [EMAIL PROTECTED] some-message
Resend is useful for relaying email without affecting the email content or its
header. For example, use resend to forward your email to another computer
without changing the header. It should only be used to resend valid email
messages.
------------------
My examples
resend [EMAIL PROTECTED] [EMAIL PROTECTED] {Subject: This is the subject^/This is the
body}
or you can flesh out the header a bit more if you want
resend [EMAIL PROTECTED] [EMAIL PROTECTED] {From: "Me" <[EMAIL PROTECTED]> ^/ To: "You"
<[EMAIL PROTECTED]>^/ Subject: This is the subject ^/This is the body}
Resend will not parse or alter the contents of the message at all, which is
really cool.
Cheers,
Allen K
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, November 15, 1999 6:20 PM
Subject: [REBOL] 'Send command change suggestion ... Re:(4)
> pekr wrote:
> > Now look:
> > -------------
> >
> > header: make system/standard/email [
> > from: [EMAIL PROTECTED]
> > to: [EMAIL PROTECTED]
> > Date: to-idate now
> > Subject: "So this is subject ...."
> > Body: "And this should be one and only body"
> > ]
>
> But there is no body in the email header! See:
>
> >> probe system/standard/email
>
> make object! [
> To: none
> CC: none
> BCC: none
> From: none
> Reply-To: none
> Date: none
> Subject: none
> Return-Path: none
> Organization: none
> Message-Id: none
> Comment: none
> X-REBOL: {2.2.0.3.1 "The Internet Messaging Language (TM)
> WWW.REBOL.COM"}
> MIME-Version: none
> Content-Type: none
> Content: none
> ]
>
> So this:
>
> send/header [EMAIL PROTECTED] {My Message is here!} header
>
> is done correctly by REBOL. The 'subject from the 'header is used.
>
> > send/header header-obj should be the syntax - specify everything
> inside the object... But well, I am not sure REBOL is capable of
> missing some arguments to functions...
>
> Better is:
>
> Mail!: make system/standard/email [
> Body: string!
> Send: func ["sends mail as appropriate"] [; blah blah blah]
> ]
>
> My_Mail: make Mail! [
> From: [EMAIL PROTECTED]
> To: [EMAIL PROTECTED]
> Date: to-idate now
> Subject: "So this is subject ...."
> Body: "And this should be one and only body"
> ]
>
> My_Mail/Send
>
> What do you think?
>
> This enhancement to 'send:
> send Email-Address My-Message /subject "My subject line is this!"
> would be reasonably easy to do, I believe.
>
> Any one want to do either of these two in the next day or two and send
> it in to this list?
>
> Andrew Martin
> Object oriented...
> [EMAIL PROTECTED]
> http://members.xoom.com/AndrewMartin/
> Online @ 33,600 Baud!
> -><-
>
>
