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 = "benoit.filips@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" <ttoews@telusplanet.net> wrote in message
news:t76pk0tk4tn5qtbu2gf4g35cj5qp134ud8@4ax.com...[color=blue]
> "Filips Benoit" <benoit.filips@pandora.be> wrote:
>[color=green]
> >Quotations for a house are made by several salers with an[/color][/color]
Access-interface[color=blue][color=green]
> >on the firms server ( Remote Desktop) . When sending the report by email[/color][/color]
to[color=blue][color=green]
> >the client the firm wants the salers email in the from-property and not[/color][/color]
the[color=blue][color=green]
> >servers email.[/color]
>
> This would depend on the method you are using to send email. If you are[/color]
using[color=blue]
> SendObject that doesn't support such. Other methods, such as CDONTS[/color]
mentioned by[color=blue]
> 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[/color]