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 Removed)"
.CC = ""
.BCC = ""
.From = """Max"" <(E-Mail Removed)>"
.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

Read the information on my site Andrea
http://www.rondebruin.nl/cdo.htm

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Andrea" <(E-Mail Removed)> wrote in message news:460f7960$0$36450$(E-Mail Removed)...
> 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 Removed)"
> .CC = ""
> .BCC = ""
> .From = """Max"" <(E-Mail Removed)>"
> .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
>
>