Email with MS Access and CDO: showdialog before sending

[john]

I have the following example code. I'm using CDO as I need to specify the
sender.

Set objMessage = CreateObject("C DO.Message")
objMessage.Subj ect = "Example CDO Message"
objMessage.From = my************@ dot.com
objMessage.To = te*********@dot .com
objMessage.Text Body = "This is some sample message text."
objMessage.Send

which works, but I have 2 questions:

1. I added the code <<showDialog:=F alse>(behind objMessage.Send )
as I want to view the message before I confirm sending. The code is not
accepted.
How can I make this work?

2. I notice that emails that are being send don't end up in my 'sent box'.
Is that possible to achieve?

Thanks in advance,
john

[lyle fairfield]

"john" <hg*@neckso.com wrote in
news:77******** *************** ***@cache120.mu ltikabel.net:

I have the following example code. I'm using CDO as I need to specify
the sender.

Set objMessage = CreateObject("C DO.Message")
objMessage.Subj ect = "Example CDO Message"
objMessage.From = my************@ dot.com
objMessage.To = te*********@dot .com
objMessage.Text Body = "This is some sample message text."
objMessage.Send

which works, but I have 2 questions:

1. I added the code <<showDialog:=F alse>(behind objMessage.Send )
as I want to view the message before I confirm sending. The code is
not accepted.
How can I make this work?

2. I notice that emails that are being send don't end up in my 'sent
box'. Is that possible to achieve?

Thanks in advance,
john

Perhaps, you are trying to use two object models interchangeably .

Typically CDO does not interact directly with Outlook or your default e-
mail program, although it may use values set in Outlook Express.
TTBOMK CDO does not include an object, property or method called
"showDialog "

It would be helpful if you tell us what you are trying to accomplish and/or
show us the whole module, using copy and paste.

--
lyle fairfield

Ceterum censeo Redmond esse delendam

[john]

"lyle fairfield" <ly******@yahoo .caschreef in bericht
news:te******** *********@read2 .cgocable.net.. .

"john" <hg*@neckso.com wrote in
news:77******** *************** ***@cache120.mu ltikabel.net:

>I have the following example code. I'm using CDO as I need to specify
the sender.

Set objMessage = CreateObject("C DO.Message")
objMessage.Sub ject = "Example CDO Message"
objMessage.Fro m = my************@ dot.com
objMessage.T o = te*********@dot .com
objMessage.Tex tBody = "This is some sample message text."
objMessage.Sen d

which works, but I have 2 questions:

1. I added the code <<showDialog:=F alse>(behind objMessage.Send )
as I want to view the message before I confirm sending. The code is
not accepted.
How can I make this work?

2. I notice that emails that are being send don't end up in my 'sent
box'. Is that possible to achieve?

Thanks in advance,
john

Perhaps, you are trying to use two object models interchangeably .

Typically CDO does not interact directly with Outlook or your default e-
mail program, although it may use values set in Outlook Express.
TTBOMK CDO does not include an object, property or method called
"showDialog "

It would be helpful if you tell us what you are trying to accomplish
and/or
show us the whole module, using copy and paste.

--
lyle fairfield

Ceterum censeo Redmond esse delendam

The above code (in a button's click) is all there is and that works. I'm
trying to accomplish 2 things:

1. The user needs to be able to send a message on behalf of another (not
person-related) mailbox for which he is authorised.

2. The user needs to see the message first before he confirms to send it.

With the sendobject- and Outlook mailmethods I'm not able to set the
'sender' or 'From' property.

Thanks,
john

[lyle]

On Oct 7, 9:36 am, "john" <[e-mail] mwrote:

"lyle fairfield" <lylef...@yahoo .caschreef in berichtnews:te* *************** *@read2.cgocabl e.net...

"john" <[e-mail] mwrote in
news:77******** *************** ***@cache120.mu ltikabel.net:

I have the following example code. I'm using CDO as I need to specify
the sender.

Set objMessage = CreateObject("C DO.Message")
objMessage.Subj ect = "Example CDO Message"
objMessage.From = myemailaddr...@ dot.com
objMessage.To = testaddr...@dot .com
objMessage.Text Body = "This is some sample message text."
objMessage.Send

which works, but I have 2 questions:

1. I added the code <<showDialog:=F alse>(behind objMessage.Send )
as I want to view the message before I confirm sending. The code is
not accepted.
How can I make this work?

2. I notice that emails that are being send don't end up in my 'sent
box'. Is that possible to achieve?

Thanks in advance,
john

Perhaps, you are trying to use two object models interchangeably .

Typically CDO does not interact directly with Outlook or your default e-
mail program, although it may use values set in Outlook Express.
TTBOMK CDO does not include an object, property or method called
"showDialog "

It would be helpful if you tell us what you are trying to accomplish
and/or
show us the whole module, using copy and paste.

--
lyle fairfield

Ceterum censeo Redmond esse delendam

The above code (in a button's click) is all there is and that works. I'm
trying to accomplish 2 things:

1. The user needs to be able to send a message on behalf of another (not
person-related) mailbox for which he is authorised.

2. The user needs to see the message first before he confirms to send it.

With the sendobject- and Outlook mailmethods I'm not able to set the
'sender' or 'From' property.

Thanks,
john

E-mail security is set up to prevent, more-or-less, what you want to
do. I suppose you could expose the message for editing in an Access
form and include a button which would send or abort it.
(Your code requires quotation marks around literals, the to and from
addresses.)

[john]

E-mail security is set up to prevent, more-or-less, what you want to

do. I suppose you could expose the message for editing in an Access
form and include a button which would send or abort it.
(Your code requires quotation marks around literals, the to and from
addresses.)

Thanks.
About the quotation marks, I accidentally removed them while changing the
email addresses for the newsgroup post.

john