C#使用CDO发送邮件

C#使用CDO发送邮件 
Author:David Euler
Date:  2004 / 11 / 18
Email:de_euler - david@yahoo.com.cn 
有任何问题，请与我联系:)

一直想做实现一个程序，定期给自己发送邮件，或者给朋友发送邮件；比如在节日或者纪念日前若干天，发送邮件给自己提醒，或者朋友生日前夕发邮件提醒。找了很长时间，都没有找到可用的资料。

CSDN上查到可以用CDO，有一篇文章说“在reference中添加CDO   for   Windows   2000   ”，于是在引用里面找，也没有找到一个名字以CDO开头的组件，下午的时候仔细看了一下可以引用的COM组件列表，发现里面有一个名为Microsoft CDO For Exchange  2000  Library的COM组件，就是这个，我们可以用它来连接SMTP Server，使用用户名 / 密码验证发送邮件。

下面是实现的一个例子：

Smtp Server使用的Smtp - SRV,登陆用户名是David Euler,发送邮箱是davidEuler@test.com,发送到test@test.com /


1 ).资源管理器里面，添加引用(reference),添加Microsoft CDO For Exchange  2000  Library的COM组件;

2 ).编辑用户界面如上图，依次添加FromTextBox,ToTextBox，CCTextBox，BCCTextBox，SubjectTextBox，MessageTextBox，PasswordTextBox，smtpTextBox，设置MessageTextBox的TextMode属性为“MultiLine“, PasswordTextBox的TextMode属性为“Password“,并添加响应提示标签，添加发送按钮Send。

3 ).输入用户名，密码，smtp server之后，用户点击Send按钮发送邮件，
Send 按钮的Click事件代码如下：
   CDO.Message  oMsg   =    new   CDO.Message();  
    // oMsg.From  =  FromTextBox.Text  ;  
   oMsg.To   =   ToTextBox.Text  ;  
   oMsg.Subject   =   SubjectTextBox.Text  ;  
   oMsg.TextBody   =   MessageTextBox.Text  ;  
   oMsg.CC = CCTextBox.Text  ;  
   oMsg.BCC = BCCTextBox.Text  ;  
    string   UserName;  
    string  emailFrom;
    string  Password = PasswordTextBox.Text.ToString().Trim();

   UserName = FromTextBox.Text.Trim();
   emailFrom = UserName.Replace( "   " , "" ) + " @Test.com " ;
            oMsg.From = emailFrom;
             
   CDO.IConfiguration  iConfg;      
   ADODB.Fields  oFields;  
   iConfg   =   oMsg.Configuration;      
   oFields   =   iConfg.Fields;  
 
   oFields[ " http://schemas.microsoft.com/cdo/configuration/sendusing " ].Value = 2 ;    
   oFields[ " http://schemas.microsoft.com/cdo/configuration/sendemailaddress " ].Value = emailFrom;    
   oFields[ " http://schemas.microsoft.com/cdo/configuration/smtpuserreplyemailaddress " ].Value = emailFrom;  
   oFields[ " http://schemas.microsoft.com/cdo/configuration/smtpaccountname " ].Value = UserName;    
   oFields[ " http://schemas.microsoft.com/cdo/configuration/sendusername " ].Value = UserName;  
   oFields[ " http://schemas.microsoft.com/cdo/configuration/sendpassword " ].Value = Password;  
   oFields[ " http://schemas.microsoft.com/cdo/configuration/smtpauthenticate " ].Value = 1 ;    
   oFields[ " http://schemas.microsoft.com/cdo/configuration/smtpserver " ].Value = smtpTextBox.Text.Trim();     // smtp.163.com                      
   oFields.Update();  
 
    try   
    {              
    oMsg.Send();  
    oMsg  =  null;  
    Response.Write("<script>alert('"+ "邮件发送成功！" +"');</script>");
   }   
    catch   (Exception  ex)  
    {  
    Response.Write("<script>alert('"+ "发送失败:" +"');</script>");
    
    string exMsg="UserName:"+UserName+
     " Passwd:"+Password+
     " Smtp:"+smtpTextBox.Text.Trim();
      
    Response.Write("<script>alert('"+ exMsg +"');</script>");
    failedLabel.Text=ex.Message.ToString();
   }

转载于:https://www.cnblogs.com/miaomiaoga/archive/2005/01/12/90859.html