Home > Forums > IIS 5.x & 6.0 > Classic ASP > using CDO.Message

Thread: using CDO.Message

Last post 11-04-2009 6:04 PM by debugmm. 13 replies.

Average Rating Rate It (5)Thank you for the rating!

RSS

Page 1 of 1 (14 items)

Sort Posts:

Shortcuts

Search | Active Posts | Unanswered Posts | View all users

09-25-2007, 8:34 AM

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

using CDO.Message

Reply Contact

Hi, I am using CDO.Message object to send message without using configuration setting of the CDO object. It is working on a server I do know the operating system .but it does not work on server running windows 2003. it gievs error in cdoobject.send Will u tell me plz what is the reason .why it runns on a server and not on other .as in both i have nt aspecified the SMTP server .

09-25-2007, 8:49 AM In reply to

tomkmvp
Joined on 03-20-2003, 10:27 AM
Central NJ
Posts 6,229

Re: using CDO.Message

Reply Contact

it would help for us to know the error message ...

Tom Kaminski IIS MVP
http://mvp.support.microsoft.com/
http://blogs.iis.net/tomkmvp/
http://www.linkedin.com/pub/8/690/408
http://www.bluesrepublic.org/

09-26-2007, 1:22 AM In reply to

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

Re: using CDO.Message

Reply Contact

CDO.Message.1 error '80040213'

The transport failed to connect to the server.

Now in this I have aspecified the SMTP server but no username and password as the provider didnot provided it. they say only specifying the server name it will work.

09-26-2007, 4:07 AM In reply to

steve schofield
Joined on 06-10-2002, 4:54 PM
MI
Posts 3,951

Re: using CDO.Message

Reply Contact

Hmm...I suspect if the SMTP service isn't turned on or isn't configured to allow relaying. Verify its listening on port 25, open a command prompt, type in netstat -an -p tcp and see if 0.0.0.0:25 is listening.

http://support.microsoft.com/kb/230235 is probably the article you want. Here are several other articles from support.microsoft.com http://www.google.com/search?hl=en&q=site%3Asupport.microsoft.com+IIS+smtp

Steve Schofield
Windows Server MVP - IIS
http://weblogs.asp.net/steveschofield

http://www.IISLogs.com
Log archival solution
Install, Configure, Forget

09-26-2007, 4:09 AM In reply to

steve schofield
Joined on 06-10-2002, 4:54 PM
MI
Posts 3,951

Re: using CDO.Message

Reply Contact

Here is a code sample that might help too.

http://classicasp.aspfaq.com/email/how-do-i-send-e-mail-with-cdo.html

Steve Schofield
Windows Server MVP - IIS
http://weblogs.asp.net/steveschofield

http://www.IISLogs.com
Log archival solution
Install, Configure, Forget

09-27-2007, 1:53 AM In reply to

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

Re: using CDO.Message

Reply Contact

i have checked the command on my local system and 0.0.0.0.25 is listning but still now i am getting problem .reality is i am unable to take decision that whether my code is wrong or there is fault on server.plz tell me what should i do.I have talked with the provider they do not have such typeof knowledge.

09-27-2007, 7:14 AM In reply to

qbernard
Joined on 03-25-2003, 10:12 PM
Malaysia
Posts 3,219

Re: using CDO.Message

Reply Contact

If there's no error code or exception msgs then your code mostly is working fine. Check event log, smtp log or mail queue folder to see if it stuck there. Read this blog post.
http://msmvps.com/blogs/bernard/archive/2004/09/28/14480.aspx

try send it directly via pickup folder without code first, etc...

Cheers,
Bernard Cheah

10-03-2007, 8:56 AM In reply to

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

Re: using CDO.Message

Reply Contact

<%
Const cdoSendUsingMethod        = "http://schemas.microsoft.com/cdo/configuration/sendusing"
Const cdoSendUsingPort          = 2
Const cdoSMTPServer             = "http://schemas.microsoft.com/cdo/configuration/smtpserver"
Const cdoSMTPServerPort         = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"
Const cdoSMTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"
Const cdoSMTPAuthenticate       = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"
Const cdoBasic                  = 1
Const cdoSendUserName           = "http://schemas.microsoft.com/cdo/configuration/sendusername"
Const cdoSendPassword           = "http://schemas.microsoft.com/cdo/configuration/sendpassword"

Dim objConfig ' As CDO.Configuration
Dim objMessage ' As CDO.Message
Dim Fields ' As ADODB.Fields

' Get a handle on the config object and it's fields
Set objConfig = Server.CreateObject("CDO.Configuration")
Set Fields = objConfig.Fields

' Set config fields we care about
With Fields
.Item(cdoSendUsingMethod)       = cdoSendUsingPort
.Item(cdoSMTPServer)            = ""smtp.xyz.com"    // THIS LINE ALSO GIVES PROBLEM WHEN I SMTP IS WRITTEN.
.Item(cdoSMTPServerPort)        = 25
.Item(cdoSMTPConnectionTimeout) = 10
.Item(cdoSMTPAuthenticate)      = cdoBasic
.Item(cdoSendUserName)          = "username"// HERE THE PROVIDER TOLD TO MENTION ONE EMAIL ID AND PASSWORD
.Item(cdoSendPassword)          = "password"

.Update
End With

Set objMessage = Server.CreateObject("CDO.Message")

Set objMessage.Configuration = objConfig

With objMessage
.To = "Display Name <email_address>"
.From = "Display Name <email_address>"
.Subject = "SMTP Relay Test"
.TextBody = "SMTP Relay Test Sent @ " & Now()
.Send
End With

Set Fields = Nothing
Set objMessage = Nothing
Set objConfig = Nothing
%>

10-03-2007, 11:51 PM In reply to

qbernard
Joined on 03-25-2003, 10:12 PM
Malaysia
Posts 3,219

Re: using CDO.Message

Reply Contact

Errr.... so ? you got the correct smtp server ? login credential fail or ???

Cheers,
Bernard Cheah

10-04-2007, 1:21 AM In reply to

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

Re: using CDO.Message

Reply Contact

error '8004020f' /mail.asp, line 89

this time i am getting above problem when i have entered the email id and password in username and password,and when I enter the smtpserver name as smtp.zyx.com then this line also gve visual basic parameter error and when i exclude the smtp eg (zyx.com )then it gives above error

10-04-2007, 5:39 AM In reply to

qbernard
Joined on 03-25-2003, 10:12 PM
Malaysia
Posts 3,219

Re: using CDO.Message

Reply Contact

See http://classicasp.aspfaq.com/email/why-does-cdo-message-give-me-8004020f-errors.html

since you need to send credential. it ask you to see http://classicasp.aspfaq.com/email/how-do-i-send-e-mail-with-cdo.html

Now, is that the correct mail server? can you use outlook express or any client to use the credentail to login and send mail ?

Cheers,
Bernard Cheah

10-04-2007, 7:20 AM In reply to

santosh.jha.net
Joined on 08-24-2007, 7:12 AM
Posts 6

Re: using CDO.Message

Reply Contact

Now, is that the correct mail server? can you use outlook express or any client to use the credentail to login and send mail ?

I do not understand ur Question .But tillnow I am getting the same error.And when I change this line as bellow then new error comes

Item(cdoSendUsingMethod) = cdoSendUsingPickup

CDO.Message.1 error '80040220'

The "SendUsing" configuration value is invalid.

/mail.asp, line 89

10-05-2007, 3:02 AM In reply to

qbernard
Joined on 03-25-2003, 10:12 PM
Malaysia
Posts 3,219

Re: using CDO.Message

Reply Contact

This is telling the smtp setting to use local pickup folder. do you have local pickup folder ? you really need to understand what you are trying to do here. send via local or remote smtp? does it need authentication ? do you have valid credential for relaying email ?

Cheers,
Bernard Cheah

11-04-2009, 6:04 PM In reply to

debugmm
Joined on 10-24-2009, 12:23 AM
Posts 3

Re: using CDO.Message

Reply Contact

Try the following code:-


<!--
METADATA
TYPE="typelib"
UUID="CD000000-8B95-11D1-82DB-00C04FB1625D"
NAME="CDO for Windows 2000 Library"
-->
<%
Set cdoConfig = CreateObject("CDO.Configuration")
 
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "localhost"
.Update
End With
 
Set cdoMessage = CreateObject("CDO.Message")
 
With cdoMessage
Set .Configuration = cdoConfig
.From = "from@domain.com"
.To = "to@domain.com"
.Subject = "Sample CDO Message"
.TextBody = "This is a test for CDO.message"
.Send
End With
 
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>

http://prabhat.me/2009/11/04/send-e-mail-using-cdo/

Page 1 of 1 (14 items)