CDO doesn't send email

[Salim Afþar]

Hi,
I'm using CDO object to send email but it doesn't send any email and it does
not give an error.
My code look like this:

Dim iMsg2
Dim iConf2
Dim Flds2
Const cdoSendUsingPor t = 2
set iMsg2 = CreateObject("C DO.Message")
set iConf2 = CreateObject("C DO.Configuratio n")
Set Flds2 = iConf.Fields
' Set the CDOSYS configuration fields to use port 25 on the SMTP server.
With Flds2
.Item("http://schemas.microso ft.com/cdo/configuration/sendusing") =
cdoSendUsingPor t
'ToDo: Enter name or IP address of remote SMTP server.
.Item("http://schemas.microso ft.com/cdo/configuration/smtpserver") =
"My_SMTP_Server "

..Item("http://schemas.microso ft.com/cdo/configuration/smtpconnectiont imeout"
) = 10
.Update
End With
' Apply the settings to the message.
With iMsg2
Set .Configuration = iConf
.To = "<[e-mail] m>" 'ToDo: Enter a valid email address.
.From = "fr**@bla.c om" 'ToDo: Enter a valid email address.
.Subject = "This is a test CDOSYS message (Sent via Port 25)"
.HTMLBody = "Test"
.Send
End With
' Clean up variables.
Set iMsg2 = Nothing
Set iConf2 = Nothing
Set Flds2 = Nothing

I have checked that a new file called "NTFS_f3a93f240 1c34ab30000013f .EML" is
created in the folder "C:\Inetpub\mai lroot\Queue\"

Also if I try to use CDO 1.x version I get an error.The code look like this:

Dim objNewMail

Set objNewMail = Server.CreateOb ject("CDONTS.Ne wMail")

objNewMail.From = "my****@myserve r.com"
objNewMail.To = "my****@myserve r.com"

objNewMail.Subj ect = "Test Subject"
objNewMail.Body = "Test Body"
objNewMail.Send

Set objNewMail = Nothing

Response.Write "Email has been sent"

I think the problem arises from SMTP Server.How can I understand that my
SMTP Server works fine?

Thanks,
Salim

[Ray at]

Have you looked in the event log to see if your server is unable to resolved
the recipient's domain?

Is the SMTP service running, or have you restarted it?

Ray at work

"Salim Afþar" <sa****@luckyey e.com> wrote in message
news:uY******** ******@TK2MSFTN GP11.phx.gbl...

I have checked that a new file called "NTFS_f3a93f240 1c34ab30000013f .EML" is created in the folder "C:\Inetpub\mai lroot\Queue\"

[Salim Afþar]

How can I understand SMTP service is running?
I looked at the Internet Information Services and the Default SMTP Virtual
Server is running.
And also I looked at Event Viewer and saw this error:
Message delivery to the remote domain 'opet.com.tr' failed for the following
reason: An internal DNS error caused a failure to find the remote server.
Thanks a lot,
Salim

"Ray at <%=sLocation% >" <as*@me.forit > wrote in message
news:ug******** ******@TK2MSFTN GP11.phx.gbl...

Have you looked in the event log to see if your server is unable to resolved the recipient's domain?

Is the SMTP service running, or have you restarted it?

Ray at work

"Salim Afþar" <sa****@luckyey e.com> wrote in message
news:uY******** ******@TK2MSFTN GP11.phx.gbl...

I have checked that a new file called

"NTFS_f3a93f240 1c34ab30000013f .EML" is

created in the folder "C:\Inetpub\mai lroot\Queue\"

[Ray at]

You should talk to your DNS admin then. Try sending an e-mail to another
domain, like yo************* **@hotmail.com or something and see if that
sends.

Ray at work

"Salim Afþar" <sa****@luckyey e.com> wrote in message
news:uD******** *****@tk2msftng p13.phx.gbl...

How can I understand SMTP service is running?
I looked at the Internet Information Services and the Default SMTP Virtual
Server is running.
And also I looked at Event Viewer and saw this error:
Message delivery to the remote domain 'opet.com.tr' failed for the following reason: An internal DNS error caused a failure to find the remote server.
Thanks a lot,
Salim

"Ray at <%=sLocation% >" <as*@me.forit > wrote in message
news:ug******** ******@TK2MSFTN GP11.phx.gbl...

Have you looked in the event log to see if your server is unable to

resolved

the recipient's domain?

Is the SMTP service running, or have you restarted it?

Ray at work

"Salim Afþar" <sa****@luckyey e.com> wrote in message
news:uY******** ******@TK2MSFTN GP11.phx.gbl...

I have checked that a new file called

"NTFS_f3a93f240 1c34ab30000013f .EML"

is

created in the folder "C:\Inetpub\mai lroot\Queue\"