CDO.Message

A

Andrea

Hi all,
I'm using this procedure in order to send mail:

Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")

With iMsg
Set .Configuration = iConf
.To = "(e-mail address removed)"
.CC = ""
.BCC = ""
.From = """Max"" <[email protected]>"
.Subject = "Mail Subject"
.TextBody = "Text Example"
.AddAttachment "C:/Temp/" & WBname
.Send
End With

all works fine on my computer, but in office I receive this error message:

RUN TIME ERROR (80040220)
Configuraton Value "SendUsing" is invalid.

Please, can someone tell me what is the cause?

Thanks in advance
JFM
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads


Top