Another tip

'Change Sender name and reply address
'The receiver can see the original mail address in the properties if he want
.SentOnBehalfOfName = """SenderName"" "


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Ron de Bruin" wrote in message ...
Hi Maurizio

You are correct



--
Regards Ron de Bruin
http://www.rondebruin.nl



"Maurizio" wrote in message ups.com...
I've used:

.SentOnBehalfOfName = "

It works!!!!!

Regard Maurizio

Ron de Bruin ha scritto:

Not possible with Outlook

With CDO you can do it
http://www.rondebruin.nl/cdo.htm

--
Regards Ron de Bruin
http://www.rondebruin.nl



"Maurizio" wrote in message ps.com...
Hi, I use this code to send multiple email, but I get a "run time error
438" with .From field, as if it isn't supported.

Does anyone known the solution?


Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.From = "
.To = IndirizzoEmail
.Subject = Oggetto
.Body = TestoEmail
.OriginatorDeliveryReportRequested = False
.Display
End With
Set OutMail = Nothing