Help! CDO.Send returns error '8004020f' -- why???

O

Owen

Hi, can somebody help me please... I'm trying to set up a very simple
asp page that sends me an email when it runs. This is just to try and
get CDOSYS working so I can send out emails from my website.

Everything is fine right up until I execute the ".Send" method.
What could be wrong? What does the error mean?

The output from the source below is:
"test1 error '8004020f'

/mailtest.asp, line 34"

Here it is:
---------------- START ----------------------------
<!--METADATA TYPE="typelib" UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Type Library" -->
<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODB Type Library" -->
<%
DIM sBody, sFrom, sSender, sSubject, sTo, x
sBody = "Test content body"
sFrom = "(e-mail address removed)" ' (binarybaby.co.uk is my website domain)
sSender = "(e-mail address removed)"
sSubject = "Test"
sTo = "(e-mail address removed)"

' mail section - setup of cdo for 2000
DIM iMsg, Flds, iConf
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields

Flds(cdoSendUsingMethod) = cdoSendUsingPort
Flds(cdoSMTPServer) = "127.0.0.1"
Flds(cdoSMTPServerPort) = 25
Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
Flds.Update

With iMsg
Set .Configuration = iConf
.To = sTo
.From = sFrom
.Sender = sSender
.Subject = sSubject
.TextBody = sBody

response.Write "test1" ' << gets this far

.Send ' << this is where it falls over :eek:(

response.Write "test2" ' << doesnt get this far
End With

response.Write "sent the mail to " & sTo
%>
------------------- END -------------------------


Any help would be great.
Thanks!

Owen
 
R

Ray at

What is the error description? I don't have them memorized yet. Perhaps
you need to give your IUSR account permission to write files to
\inetpub\mailroot\pickup.

Ray at work
 
O

Owen

Ray at said:
What is the error description? I don't have them memorized yet.

LOL! I dont know the description, thats the whole point! I dont know
what the error means because the output doesnt provide a description.
:eek:) Thats why I'm asking for help!

But I have managed to stop the error occurring now by removing the
"Flds..." lines. I now have another problem which I'll put in a
different thread.


Owen
 
D

Dave Karmens

um...
if err.number <> 0 then
response.write err.number & vbcrlf & vbcrlf
response.write err.description & vbcrlf
response.end
end if
 
Y

Yan-Hong Huang[MSFT]

Hello Owen,

Thanks for posting in the group.

Based on the description, the code returns error 8004020f when calling send
method, right?

Firstly, let's see the meaning of the error code in CDO For Exchange 2000
or CDO For Windows 2000£º

Error Name: CDO_E_RECIPIENTS_REJECTED
Value: 0x8004020FL
Remarks: The server rejected one or more recipient addresses. The server
response was: %1.

The Possible Causes are:

1) General access denied, sender access denied ? the sender of the message
does not have the privileges necessary to complete delivery.
2) You are trying to relay your mail via another SMTP server and it does
not permit you to relay.
3) The recipient might have mailbox delivery restrictions enabled. For
example, a recipient¡¯s mailbox delivery restriction was sent to receive
from a Distribution List only and non-member¡¯s email will be rejected with
this error

I noticed that you have opened a new post on this topic. I will follow up
you there with more information that I have found.

Thanks.

Best regards,
Yanhong Huang
Microsoft Community Support

Get Secure! ¨C www.microsoft.com/security
This posting is provided "AS IS" with no warranties, and confers no rights.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Members online

No members online now.

Forum statistics

Threads
473,769
Messages
2,569,578
Members
45,052
Latest member
LucyCarper

Latest Threads

Top