Forums
This topic is locked
CDO.Message.1 error '80040220'
Posted 10 Jul 2008 15:21:29
1
has voted
10 Jul 2008 15:21:29 samara Nouri posted:
HiDo you have any idea to fix this problem. It's very urgent!
CDO.Message.1 error '80040220' The "SendUsing" configuration value is invalid.
Here's my code: Enews.asp
< %Dim myMailer, strTo, strBcc, strSubject, strBody ' E-mail header information strTo = "sakader@sorouh.com" 'strTo = "sakader@sorouh.com" strBcc = Request.Form("Recipients") strSubject = "Sorouh - Internal Newsletter" ' This is the body of the e-mail strBody = "<html>" strBody = strBody & "<head>" 'strBody = strBody & "<link href='applestore.css' rel='stylesheet' media='all' type='text/css'>" 'strBody = strBody & "<style>" 'strBody = strBody & "<!--" 'strBody = strBody & ".style2 {font-size: 12px; color: #000000; font-family: Verdana;}" 'strBody = strBody & ".style3 {font-size: 12px}" 'strBody = strBody & ".style5 {font-size: 30px; color: #FFFFFF; font-family: Broadway;}" 'strBody = strBody & ".style9 {font-family: Verdana; font-size: 10px; color: #CCCCCC; font-weight: bold;}" 'strBody = strBody & "body, td, th {font-family: Verdana;}" 'strBody = strBody & "body {background-color: #192D47;}" 'strBody = strBody & ".style11 {font-family: Verdana; font-size: 12px; color: #000000;}" 'strBody = strBody & ".style12 {font-size: 16px; color: #660000; font-family: Verdana; font-weight: bold;}" 'strBody = strBody & ".style13 {color: #003366; font-weight: bold;}" 'strBody = strBody & ".style21 {font-size: 10px; font-weight: bold; color: #FFFFFF;}" 'strBody = strBody & "a:link {color: #3366CC; text-decoration: none;}" 'strBody = strBody & "a:visited {color: #3366CC; text-decoration: none;}" 'strBody = strBody & "a:hover {color: ##990000; text-decoration: none;}" 'strBody = strBody & "a:active {text-decoration: none;}" 'strBody = strBody & "a.1:link {color: #CCFFFF; text-decoration: underline;}" 'strBody = strBody & "a.1:visited {color: #CCFFFF; text-decoration: underline;}" 'strBody = strBody & "a.1:hover {color: #66CCFF; text-decoration: none;}" 'strBody = strBody & "a.1:active {color: #CCFFFF; text-decoration: underline;}" 'strBody = strBody & ".style22 {font-size: 11px}" 'strBody = strBody & ".style23 {font-size: 11px; font-weight: bold; color: #FFFFFF;}" 'strBody = strBody & "-->" 'strBody = strBody & "</style>" strBody = strBody & "</head>" 'header ends strBody = strBody & "<body>" strBody = strBody & "<font face='Arial'>This is my message</font>" 'strBody = strBody & "<div align='center'>" 'strBody = strBody & "<table width='600' border='0' cellpadding='0' cellspacing='0' bgcolor='#090909'>" 'strBody = strBody & "<tr>" 'strBody = strBody & "<td colspan='5' valign='top' bgcolor='#FFFFFF'>" 'strBody = strBody & "<p align='center'>" 'strBody = strBody & "<span class='style2'><a name='top0'></a>If you do not see the graphics below,</span>" 'strBody = strBody & "<font face='Verdana' color='#000000' size='2'>" 'strBody = strBody & "<b>" 'strBody = strBody & "<a target='_blank' style='text-decoration: none' href='http://eNews.htm'>click here</a></b></font><span class='style2'> to view in a new window.</span>" 'strBody = strBody & "</td>" 'strBody = strBody & "</tr>" 'strBody = strBody & "<tr>" 'strBody = strBody & "<td colspan='5' valign='top' bgcolor='#FFFFFF'><p align='center'> </td></tr>" 'strBody = strBody & "<tr><td height='233' colspan='5'>" 'strBody = strBody & "<p align='center'><span class='style5'>Sorouh Internal Newsletter</span></td>" 'strBody = strBody & "</tr>" 'strBody = strBody & "<tr>" 'strBody = strBody & "<td height='39' colspan='2' valign='middle' bgcolor='#333333'><div align='center'><span class='style9'>JULY 2008</span></div></td>" 'strBody = strBody & "<td width='14' rowspan='2' valign='top' bgcolor='#FFFFFF'> </td>" 'strBody = strBody & "<td width='401' rowspan='2' valign='top' bgcolor='#FFFFFF'>" 'strBody = strBody & "<p align='left'><a name='top'></a></p>" 'strBody = strBody & "<p align='left' class='style12'>Title</p>" 'strBody = strBody & "<p align='left' class='style2'> Content</p>" 'strBody = strBody & "<p align='left' class='style2'> </p>" 'strBody = strBody & "</td>" 'strBody = strBody & "<td width='35' rowspan='2' valign='top' bgcolor='#FFFFFF'>" 'strBody = strBody & "<img src='enews_spacer3.gif' width='28' height='5'></td>" 'strBody = strBody & "</tr>" 'strBody = strBody & "<tr>" 'strBody = strBody & "<td width='12' valign='top' bgcolor='#666666'> </td>" 'strBody = strBody & "<td width='138' valign='top' bgcolor='#666666'>" 'strBody = strBody & "<p align='left' class='style21'><span class='style22'><a href='#top'>" 'strBody = strBody & "<font color='#FFFFFF'>Item 1</font></a></span><br></p>" 'strBody = strBody & "<p align='left'>" 'strBody = strBody & "<a href='#special'><font color='#FFFFFF'><span class='style23'>Item 2<BR></span></font></a><br>" 'strBody = strBody & "<a href='#live'><font color='#FFFFFF'><span class='style23'>Item 3</span></font></a><br><br>" 'strBody = strBody & "<span class='style21 style22'><strong><a href='#partner'><font color='#FFFFFF'>Item 4</font></a><br><br></strong></span><span class='style22'><strong>" 'strBody = strBody & "<a href='#overview'>strBody = strBody & "<font color='#FFFFFF'>Item 5</font></a></strong></span></p>" 'strBody = strBody & "<p align='left' class='style23'>" 'strBody = strBody & "<span class='style22'><strong><a href='#first'><font color='#FFFFFF'>Item 6</font></a></strong></span>" 'strBody = strBody & "</p>" 'strBody = strBody & "<p align='left' align='center'>" 'strBody = strBody & "<img border='0' src='Sorouh_Logo.gif' width='156' height='79'></p>" 'strBody = strBody & "<p align='left' align='left'> </p>" 'strBody = strBody & "</td>" 'strBody = strBody & "</tr>" 'strBody = strBody & "</table>" 'strBody = strBody & "</div>" strBody = strBody & "</body></html>" ' Send email using CDOSYS Set myMailer = Server.CreateObject("CDO.Message") myMailer.From = "eNews@sorouh.ca" myMailer.To = strTo myMailer.Bcc = strBCC myMailer.Subject = strSubject myMailer.HTMLBody = strBody myMailer.Send Set myMailer = Nothing ' Confirmation page Response.Write ("<html>") Response.Write ("<head>") Response.Write ("<meta http-equiv=Content-Language' content=en-ca'>") Response.Write ("<meta http-equiv=Content-Type' content=text/html; charset=windows-1252'>") Response.Write ("<title>Sorouh - Internal Newsletter</title>") Response.Write ("</head>") Response.Write ("<body>") Response.Write ("<div align='center'>") Response.Write ("<center>") Response.Write ("<table border='0' cellpadding='0' cellspacing='0' width='540'>") Response.Write ("<tr>") Response.Write ("<td width='100%' align='center'>") Response.Write ("<font face='Arial'>The eNewsLetter has been successfully broadcast to all recipients.</font></td>") Response.Write ("</tr>") Response.Write ("</table>") Response.Write ("</center>") Response.Write ("</div>") Response.Write ("</body>") Response.Write ("</html>") %> The recipients are sent throgh another HTML page <head> <meta http-equiv="Content-Language" content="en-ca"> <link rel="stylesheet" href="http://intl.imimages.com/upload/FT-EN/files/IMC_StaticPgs.css"> <title>Sorouh - Internal Newsletter</title> <style> <!-- p, td, li, ul, ol, blockquote, div, span {font-family : arial;font-size : 10pt;color : #FFFFFF;} h2 {font-family : arial;font-weight : bold;font-size : 14pt;color : #FFFFFF;} a.1:link {color : #FFFFFF;font-family : arial;font-size : 10pt;text-decoration : underline;} a.1:visited {color : #FFFFFF;font-family : arial;font-size : 10pt;text-decoration : underline;} a.1:hover {color : #FFFFFF;font-family : arial;font-size : 10pt;text-decoration : none;} a.1:active {color : #FFFFFF;font-family : arial;font-size : 10pt;text-decoration : underline;} --> </style> </head> <body onLoad="document.frmBroadcast.Recipients.focus();"> <script Language="JavaScript" Type="text/javascript"> <!-- function frmBroadcast_Validator(theForm) { if (theForm.Recipients.value == "") { alert("Please enter a value for the \"The is no content in the recipient box\" field."); theForm.Recipients.focus(); return (false); } return (true); } //--> </script> <form method="POST" action="http://intranet:81/Enews.asp" onsubmit="return frmBroadcast_Validator(this)" language="JavaScript" name="frmBroadcast"> <div align="center"> <center> <table border="0" cellpadding="0" cellspacing="0" width="600"> <tr> <td rowspan=5> <img src=http://a1920.g.akamai.net/f/1920/1080/8h/intl.imimages.com/upload/FT-EN/images/1x1clear.gif width="2"> </td> <td> <img src=http://a1920.g.akamai.net/f/1920/1080/8h/intl.imimages.com/upload/FT-EN/images/1x1clear.gif width="2"> </td> <td rowspan="5"> <img src=http://a1920.g.akamai.net/f/1920/1080/8h/intl.imimages.com/upload/FT-EN/images/1x1clear.gif width="2" > </td> </tr> <tr> <td width="100%" height="175" bgcolor="#192D47"> <p align="center"><font face="Broadway" size="6">Sorouh Internal Newsletter </font> </td> </tr> <tr> <td> <table border="0" cellpadding="2" cellspacing="5" width="100%" bgcolor="#192D47"> <tr> <td width="100%"> <table width="100%" border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td> <a name="Top"></a> <div align="center"> <center> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="100%" align="center"> <table width="100%" border="3" cellspacing="0" cellpadding="0" style="border-style:double"> <tr> <td width="100%" colspan="2"> <table border="0" cellpadding="0" cellspacing="0" width="100%"> <tr> <td align="center" height="15"><br><h4><font color="#86A2A6">Mailer Administration Page</font></h4></td> </tr> <tr> <td align="center"> <font color="#86A2A6"><b>Note:</b></font> Type or paste e-mail addresses of recipients below.<br> Ensure addresses are valid and are separated by a semi-colon (;) </td> </tr> <tr> <td align="center" height="15"></td> </tr> <tr> <td align="center"><textarea rows="15" name="Recipients" cols="65" class="txtInput"></textarea></td> </tr> <tr> <td> </td> </tr> <tr> <td align="center"> <input type="submit" value="Send Broadcast Now!" class="txtInput"> <input type="reset" value="Reset" name="Clear" class="txtInput"> <br><br> </td> </tr> </table> </td> </tr> </table> </td> </tr> </table> </center> </div> </td> </tr> </table> </td> </tr> </table> </td> </tr> <tr> </tr> </table> </center> </div> </form> </body> </html>
Replies
Replied 14 Jul 2008 21:30:29
14 Jul 2008 21:30:29 Georgi Kralev replied:
Hi Samara,
It looks like that you have not set CDO Configuration.
1. If you user local SMTP server for sending your emails the required code may look like this:
sch ="schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration"
cdoConfig.Fields.Item(sch & "sendusing" = 1
cdoConfig.Fields.Update
Set myMailer.Configuration = cdoConfig
2. If you use external SMTP server you should set server name, port, authentication, username and password.
For example the required code may look like this:
sch ="schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration"
cdoConfig.Fields.Item(sch & "sendusing" = 2
cdoConfig.Fields.Item(sch & "smtpserver" = "<enter_mail_servername_here>"
cdoConfig.Fields.Item(sch & "smtpserverport" = 25 'Default port is 25. Change it to the port of you SMTP server
If your SMTP server requires authentication you may have to include code like this:
cdoConfig.Fields.Item(sch & "smtpauthenticate" = 1 'cdobasic
cdoConfig.Fields.Item(sch & "sendusername" = "<enter_mail_server_username_here>"
cdoConfig.Fields.Item(sch & "sendpassword" = "<enter_mail_server_password_here>"
Update the configured CDO Configuration fields and set it to your Message
cdoConfig.Fields.Update
Set myMailer.Configuration = cdoConfig
For more information using CDO check the following articles:
classicasp.aspfaq.com/email/how-do-i-send-e-mail-with-cdo.html
www.w3schools.com/asp/asp_send_email.asp
msdn.microsoft.com/en-us/library/aa579722(EXCHG.80).aspx
I hope this helps you.
Note: I have not checked my code. Therefore, it may contain some errors.
Best regards,
Georgi Kralev
Homepage: gdkralev.googlepages.com
It looks like that you have not set CDO Configuration.
1. If you user local SMTP server for sending your emails the required code may look like this:
sch ="schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration"
cdoConfig.Fields.Item(sch & "sendusing" = 1
cdoConfig.Fields.Update
Set myMailer.Configuration = cdoConfig
2. If you use external SMTP server you should set server name, port, authentication, username and password.
For example the required code may look like this:
sch ="schemas.microsoft.com/cdo/configuration/"
Set cdoConfig=server.CreateObject("CDO.Configuration"
cdoConfig.Fields.Item(sch & "sendusing" = 2
cdoConfig.Fields.Item(sch & "smtpserver" = "<enter_mail_servername_here>"
cdoConfig.Fields.Item(sch & "smtpserverport" = 25 'Default port is 25. Change it to the port of you SMTP server
If your SMTP server requires authentication you may have to include code like this:
cdoConfig.Fields.Item(sch & "smtpauthenticate" = 1 'cdobasic
cdoConfig.Fields.Item(sch & "sendusername" = "<enter_mail_server_username_here>"
cdoConfig.Fields.Item(sch & "sendpassword" = "<enter_mail_server_password_here>"
Update the configured CDO Configuration fields and set it to your Message
cdoConfig.Fields.Update
Set myMailer.Configuration = cdoConfig
For more information using CDO check the following articles:
classicasp.aspfaq.com/email/how-do-i-send-e-mail-with-cdo.html
www.w3schools.com/asp/asp_send_email.asp
msdn.microsoft.com/en-us/library/aa579722(EXCHG.80).aspx
I hope this helps you.
Note: I have not checked my code. Therefore, it may contain some errors.
Best regards,
Georgi Kralev
Homepage: gdkralev.googlepages.com
Replied 04 Nov 2009 23:43:09
04 Nov 2009 23:43:09 Shantanu Kumar replied: