By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
429,558 Members | 1,373 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 429,558 IT Pros & Developers. It's quick & easy.

If solved = true then Thanksł

P: n/a
Dear All,

3 attempt for your help wit this code.
No errors but no emails send!
What are the conditions to use CDONTS?

( The company doen't want replys to the server!!"

Filip

Thanksł
************************************************** *******************
On Error GoTo errHandling
Dim strFromEmail As String
Dim oEMail As Object
Set oEMail = CreateObject("CDONTS.NewMail")
oEMail.From = "nobody"
oEMail.To = "be***********@pandora.be"
oEMail.BodyFormat = CdoBodyFormatText
oEMail.Body = "Insert some useful text here"
oEMail.Importance = CdoHigh
oEMail.Send

Exit Sub

errHandling:
MsgBox Err.Number & " " & Err.Description
************************************************** *********************

Nov 13 '05 #1
Share this question for a faster answer!
Share on Google+

This discussion thread is closed

Replies have been disabled for this discussion.