Getting a CDONT parameter

[Simon Wigzell]

My website sends automatic emails from many (25) different places. I want to
send a second email by reading the parameters of the first one. I don't want
to have to repeat and maintain the assignment of the second email
From,To,Subject fields so I am just using an include at each point in the
code where I send an email:

Set MyCDONTSMail = CreateObject("C DONTS.NewMail")
MyCDONTSMail.Bo dyFormat= 0
MyCDONTSMail.Ma ilFormat= 1
MyCDONTSMail.Fr om= fr************* *@whatever.com
MyCDONTSMail.To = to*******@whate ver.com
MyCDONTSMail.Su bject="some subject"
MyCDONTSMail.Bo dy= "some text":
%>
<!--#include file="SendFollo wUpEmail.asp" -->
<%
MyCDONTSMail.Se nd
set MyCDONTSMail=no thing
-------------------------------------------------------------------------------
The SendFollowUpEma il.asp just wants to take the From,To,Subject parameters
that are defined in the original email and add a different body:

Set MyCDONTSMail2 = CreateObject("C DONTS.NewMail")
MyCDONTSMail2.B odyFormat= 0
MyCDONTSMail2.M ailFormat= 1
MyCDONTSMail2.F rom= MyCDONTSMail.Fr om
MyCDONTSMail2.T o= MyCDONTSMail.To
MyCDONTSMail2.S ubject=MyCDONTS Mail.Subject
MyCDONTSMail2.B ody= "some new text"
MyCDONTSMail2.S end
set MyCDONTSMail2=n othing

It chokes on this:

MyCDONTSMail2.F rom= MyCDONTSMail.Fr om

Object doesn't support this property or method: 'MyCDONTSMail.F rom'

Seems to me MyCDONTSMail.Fr om is only a string, why can't I retrieve its
value? More to the point though - how can I retrieve its value?

Thanks!

[Roland Hall]

"Stefan Berglund" wrote in message
news:0q******** *************** *********@4ax.c om...
: On Thu, 02 Feb 2006 06:46:33 GMT, "Simon Wigzell" <si**********@s haw.ca>
wrote:
: in <dVhEf.534342$k i.526673@pd7tw2 no>
:
: >Well - I couldn't have been more explicit describing my problem and what
I
: >wanted to know, yet my problem remains unanswered and unadressed,
meanwhile
: >I have been given some unrelated and useless advice, so yes, you are
: >probably right.
:
: Oh I understand. This is something like "My mind is made up. Don't
confuse me
: with the facts!"
:
: No problem.

I like that response! Sorry Simon.

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp

[Roland Hall]

"Simon Wigzell" wrote in message news:Sy8Ef.4095 06$2k.270920@pd 7tw1no...
: My website sends automatic emails from many (25) different places. I want
to
: send a second email by reading the parameters of the first one. I don't
want
: to have to repeat and maintain the assignment of the second email
: From,To,Subject fields so I am just using an include at each point in the
: code where I send an email:
:
: Set MyCDONTSMail = CreateObject("C DONTS.NewMail")
: MyCDONTSMail.Bo dyFormat= 0
: MyCDONTSMail.Ma ilFormat= 1
: MyCDONTSMail.Fr om= fr************* *@whatever.com
: MyCDONTSMail.To = to*******@whate ver.com
: MyCDONTSMail.Su bject="some subject"
: MyCDONTSMail.Bo dy= "some text":
: %>
: <!--#include file="SendFollo wUpEmail.asp" -->
: <%
: MyCDONTSMail.Se nd
: set MyCDONTSMail=no thing
: -------------------------------------------------------------------------------
: The SendFollowUpEma il.asp just wants to take the From,To,Subject
parameters
: that are defined in the original email and add a different body:
:
: Set MyCDONTSMail2 = CreateObject("C DONTS.NewMail")
: MyCDONTSMail2.B odyFormat= 0
: MyCDONTSMail2.M ailFormat= 1
: MyCDONTSMail2.F rom= MyCDONTSMail.Fr om
: MyCDONTSMail2.T o= MyCDONTSMail.To
: MyCDONTSMail2.S ubject=MyCDONTS Mail.Subject
: MyCDONTSMail2.B ody= "some new text"
: MyCDONTSMail2.S end
: set MyCDONTSMail2=n othing
:
: It chokes on this:
:
: MyCDONTSMail2.F rom= MyCDONTSMail.Fr om
:
: Object doesn't support this property or method: 'MyCDONTSMail.F rom'
:
: Seems to me MyCDONTSMail.Fr om is only a string, why can't I retrieve its
: value? More to the point though - how can I retrieve its value?

There is a lot of ways to do it. As you said the values are not known so
just pass variables to it when the values are known. It could even be
session variables.

What you do it make it a subroutine.

sub sendMail(mailFr om, mailTo, mailSubject, mailBody)
Set MyCDONTSMail = CreateObject("C DONTS.NewMail")
MyCDONTSMail.Bo dyFormat = 0
MyCDONTSMail.Ma ilFormat = 1
MyCDONTSMail.Fr om = mailFrom
MyCDONTSMail.To = mailTo
MyCDONTSMail.Su bject = mailSubject
MyCDONTSMail.Bo dy= mailBody
end sub

With the follow up, just pass the different values to it.
sendMail "[e-mail] m", "yo*@yourdomain .com", "My Subject", "Here is my
message!"

If your message body is formatted, pass it as a variable.

--
Roland Hall
/* This information is distributed in the hope that it will be useful, but
without any warranty; without even the implied warranty of merchantability
or fitness for a particular purpose. */
Technet Script Center - http://www.microsoft.com/technet/scriptcenter/
WSH 5.6 Documentation - http://msdn.microsoft.com/downloads/list/webdev.asp
MSDN Library - http://msdn.microsoft.com/library/default.asp