Thanks, but no success yet!
W2000
office2000
Added ref to 'Microsoft CDO for NTS 1.2 Library'
No code error
BUT NO emails send
Please help!
Dim oEMail As Object
Set oEMail = CreateObject("CDONTS.NewMail")
oEMail.From = strFromEmail
oEMail.To = "be***********@pandora.be"
oEMail.BodyFormat = CdoBodyFormatText
oEMail.Body = "Insert some useful text here"
oEMail.Importance = CdoHigh
'oEMail.AttachFile = "C:\filename.txt"
oEMail.Send
Filip
"Tony Toews" <tt****@telusplanet.net> wrote in message
news:t7********************************@4ax.com...
"Filips Benoit" <be***********@pandora.be> wrote:
Quotations for a house are made by several salers with an
Access-interfaceon the firms server ( Remote Desktop) . When sending the report by email
tothe client the firm wants the salers email in the from-property and not
theservers email.
This would depend on the method you are using to send email. If you are
using SendObject that doesn't support such. Other methods, such as CDONTS
mentioned by Peter do support such.
Microsoft Access Email FAQ
http://www.granite.ab.ca/access/email.htm
Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm