[C# 网络编程系列]专题十：实现简单的邮件收发器

  1 #region 邮件发送功能代码
  2         // 添加附件
  3         private void btnAddFile_Click(object sender, EventArgs e)
  4         {
  5             OpenFileDialog openFileDialog = new OpenFileDialog();
  6             openFileDialog.CheckFileExists = true;
  7             // 只接受有效的文件名
  8             openFileDialog.ValidateNames = true;
  9             // 允许一次选择多个文件作为附件
 10             openFileDialog.Multiselect = true;
 11             openFileDialog.Filter = "所有文件(*.*)|*.*";
 12             if (openFileDialog.ShowDialog() != DialogResult.OK)
 13             {
 14                 return;
 15             }
 16             if (openFileDialog.FileNames.Length > 0)
 17             {
 18                 // 因为这里允许选择多个文件，所以这里用AddRange而没有用Add方法
 19                 cmbAttachment.Items.AddRange(openFileDialog.FileNames);
 20             }
 21         }
 22 
 23         // 删除附件
 24         private void btnDeleteFile_Click(object sender, EventArgs e)
 25         {
 26             int index = cmbAttachment.SelectedIndex;
 27             if (index == -1)
 28             {
 29                 MessageBox.Show("请选择要删除的附件！", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
 30                 return;
 31             }
 32             else
 33             {
 34                 cmbAttachment.Items.RemoveAt(index);
 35             }
 36         }
 37 
 38         // 发送邮件
 39         private void btnSend_Click(object sender, EventArgs e)
 40         {
 41             this.Cursor = Cursors.WaitCursor;
 42             // 实例化一个发送的邮件
 43             // 相当于与现实生活中先写信，程序中把信（邮件）抽象为邮件类了
 44             MailMessage mailMessage = new MailMessage();
 45             // 指明邮件发送的地址，主题，内容等信息
 46             // 发信人的地址为登录收发器的地址，这个收发器相当于我们平时Web版的邮箱或者是OutLook中配置的邮箱
 47             mailMessage.From = new MailAddress(tbxUserMail.Text);
 48             mailMessage.To.Add(txbSendTo.Text);
 49             mailMessage.Subject = txbSubject.Text;
 50             mailMessage.SubjectEncoding = Encoding.Default;
 51             mailMessage.Body = richtbxBody.Text;
 52             mailMessage.BodyEncoding = Encoding.Default;
 53             // 设置邮件正文不是Html格式的内容
 54             mailMessage.IsBodyHtml = false;
 55             // 设置邮件的优先级为普通优先级
 56             mailMessage.Priority = MailPriority.Normal;
 57             //mailMessage.ReplyTo = new MailAddress(tbxUserMail.Text);
 58 
 59             // 封装发送的附件
 60             System.Net.Mail.Attachment attachment = null;
 61             if (cmbAttachment.Items.Count > 0)
 62             {
 63                 for (int i = 0; i < cmbAttachment.Items.Count; i++)
 64                 {
 65                     string fileNamePath = cmbAttachment.Items[i].ToString();
 66                     string extName = Path.GetExtension(fileNamePath).ToLower();
 67                     if (extName == ".rar" || extName == ".zip")
 68                     {
 69                         attachment = new System.Net.Mail.Attachment(fileNamePath, MediaTypeNames.Application.Zip);
 70                     }
 71                     else
 72                     {
 73                         attachment = new System.Net.Mail.Attachment(fileNamePath,MediaTypeNames.Application.Octet);
 74                     }
 75 
 76                     // 表示MIMEContent-Disposition标头信息
 77                     // 对于ContentDisposition具体类的解释大家可以参考MSDN
 78                     // 这里我就不重复贴出来了，给个地址: http://msdn.microsoft.com/zh-cn/library/System.Net.Mime.ContentDisposition.aspx (着重看备注部分)
 79                     ContentDisposition cd = attachment.ContentDisposition;
 80                     cd.CreationDate = File.GetCreationTime(fileNamePath);

 81                     cd.ModificationDate = File.GetLastWriteTime(fileNamePath);
 82                     cd.ReadDate = File.GetLastAccessTime(fileNamePath);
 83                     // 把附件对象加入到邮件附件集合中
 84                     mailMessage.Attachments.Add(attachment);
 85                 }
 86             }
 87 
 88             // 发送写好的邮件
 89             try
 90             {
 91                 // SmtpClient类用于将邮件发送到SMTP服务器
 92                 // 该类封装了SMTP协议的实现，
 93                 // 通过该类可以简化发送邮件的过程，只需要调用该类的Send方法就可以发送邮件到SMTP服务器了。
 94                 smtpClient.Send(mailMessage);
 95                 MessageBox.Show("邮件发送成功！", "提示", MessageBoxButtons.OK, MessageBoxIcon.Information);
 96 
 97             }
 98             catch(SmtpException smtpError)
 99             {
100                 MessageBox.Show("邮件发送失败：[" + smtpError.StatusCode + "]；[" 
101                     + smtpError.Message+"];\r\n["+smtpError.StackTrace+"]."
102                     ,"错误",MessageBoxButtons.RetryCancel,MessageBoxIcon.Error);
103             }
104             finally
105             {
106                 mailMessage.Dispose();
107                 this.Cursor = Cursors.Default;
108             }
109         }
110 
111         #endregion

 // 登录邮箱（这里是本程序——邮件收发器）
        private void btnLogin_Click_1(object sender, EventArgs e)
        {
            // 与POP3服务器建立TCP连接
            // 建立连接后把服务器上的邮件下载到本地
            // 设置当前界面的光标为等待光标（就是我们看到的一个动的圆形）
            Cursor.Current = Cursors.WaitCursor;

            lsttbxStatus.Items.Clear();
            try
            {
                // POP3服务器通过监听TCP110端口来提供POP3服务的
                // 向POP3服务器发出tcp请求
                tcpClient = new TcpClient(tbxPOP3Server.Text, 110);
                lsttbxStatus.Items.Add("正在连接...");
            }
            catch
            {
                MessageBox.Show("连接失败", "错误", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error);
                lsttbxStatus.Items.Add("连接失败！");
                return;
            }

            // 连接成功的情况
            networkStream = tcpClient.GetStream();
            streamReader = new StreamReader(networkStream, Encoding.Default);
            streamWriter = new StreamWriter(networkStream, Encoding.Default);
            streamWriter.AutoFlush = true;
            string str;
            // 读取服务器返回的响应连接信息
            str = GetResponse();
            if (CheckResponse(str) == false)
            {
                lsttbxStatus.Items.Add("服务器拒接了连接请求");
                return;
            }
            // 如果服务器接收请求
            // 向服务器发送凭证——用户名和密码

            // 向服务器发送用户名，请求确认
            lsttbxStatus.Items.Add("核实用户名阶段...");
            SendToServer("USER " + tbxUserMail.Text);
            str = GetResponse();
            if (CheckResponse(str) == false)
            {
                lsttbxStatus.Items.Add("用户名错误.");
                return;
            }

            // 用户名审核通过后再发送密码等待确认
            // 向服务器发送密码，请求确认
            SendToServer("PASS "+txbPassword.Text);
            str = GetResponse();
            if (CheckResponse(str) == false)
            {
                lsttbxStatus.Items.Add("密码错误！");
                return;
            }

            lsttbxStatus.Items.Add("身份验证成功，可以开始会话");
            // 向服务器发送LIST 命令，请求获得邮件列表和大小
            lsttbxStatus.Items.Add("获取邮件....");
            SendToServer("LIST");
            str = GetResponse();
            if (CheckResponse(str) == false)
            {
                lsttbxStatus.Items.Add("获取邮件列表失败");
                return;
            }

            lsttbxStatus.Items.Add("邮件获取成功");

            // 窗口控件控制
            tabControlMyMailbox.Enabled = true;
            btnReadMail.Enabled = false;
            btnDownLoad.Enabled = false;
            btnDeleteMail.Enabled = false;

            // 登陆成功后实例化邮件发送对象，以便后面完成发送邮件的操作
            // 实例化邮件发送类（SmtpClient）对象
            if (smtpClient == null)
            {
                smtpClient = new SmtpClient();
                smtpClient.Host = tbxSmtpServer.Text;
                smtpClient.Port = 25;
                    
                // 不使用默认凭证，即需要认证登陆
                smtpClient.UseDefaultCredentials = false;
                smtpClient.Credentials = new NetworkCredential(tbxUserMail.Text, txbPassword.Text);
                smtpClient.DeliveryMethod = SmtpDeliveryMethod.Network;
            }

            // 登陆成功后，自动接收新邮件
            // 开始接收邮件
            try
            {
                btnRefreshMailList.PerformClick();
            }
            catch
            {
                MessageBox.Show("读取邮件列表失败！", "错误", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error);
            }

            lsttbxStatus.Items.Add("登陆成功!");
            lsttbxStatus.TopIndex = lsttbxStatus.Items.Count - 1;
            Cursor.Current = Cursors.Default;

            // 窗口控件控制
            richtbxMailContentReview.Enabled = true;
            tbxUserMail.Enabled = false;
            txbPassword.Enabled = false;
            btnLogin.Enabled = false;
            btnLogout.Enabled = true;
            tbxSmtpServer.Enabled = false;
            tbxPOP3Server.Enabled = false;
            btnReadMail.Enabled = true;
            btnDownLoad.Enabled = true;
            btnDeleteMail.Enabled = true;
            tabControlMyMailbox.Focus();
        }

        #region 处理与POP3服务器交互事件
        // 获取服务器响应的信息
        private string GetResponse()
        {
            string str = null;
            try
            {
                str = streamReader.ReadLine();
                if (str == null)
                {
                    lsttbxStatus.Items.Add("连接失败——服务器没有响应");
                }
                else
                {
                    lsttbxStatus.Items.Add("收到：[" + str + "]");
                    if (str.StartsWith("-ERR"))
                    {
                        str = null;
                    }
                }
            }
            catch(Exception err)
            {
                lsttbxStatus.Items.Add("连接失败：[" + err.Message + "]");
            }

            return str;
        }

        // 检查响应信息
        private bool CheckResponse(string responseString)
        {
            if (responseString == null)
            {
                return false;
            }
            else
            {
                if (responseString.StartsWith("+OK"))
                {
                    return true;
                }
                else
                {
                    return false;
                }
            }
        }

        // 向服务器发送命令
        private bool SendToServer(string str)
        {
            try
            {
                // 这里必须使用WriteLine方法的，因为POP3协议中定义的命令是以回车换行结束的
                // 如果客户端发送的命令没有以回车换行结束，POP3服务器就不能识别，也就不能响应客户端的请求了
                // 如果想用Write方法，则str输入的参数字符中必须包含“\r\n”,也就是回车换行字符串。
                streamWriter.WriteLine(str);
                streamWriter.Flush();
                lsttbxStatus.Items.Add("发送：[" + str + "]");
                return true;
            }
            catch(Exception ex)
            {
                lsttbxStatus.Items.Add("发送失败：[" + ex.Message + "]");
                return false;
            }
        }

        #endregion