首页 > 代码库 > 利用正则表达式群发定制邮件

利用正则表达式群发定制邮件

  朋友工作中需要将邮件群发给别人,但是每封信的抬头要修改接受人的称呼。一封一封的发肯定不现实,量大,而且易出错。

  1,导出邮箱联系人到本地

  

姓名,First Name,电子邮件,E-mail Address,手机,Home Phone,固定电话,别名,生日,备用邮箱,家庭地址,公司名称,备注

  

  导出后的格式如上所示。

  2,构造正则表达式,提取姓名与邮箱

  

([\u4E00-\u9FA5]{2,3}),([-a-zA-Z0-9_]+@[-a-zA-Z0-9]+\.com)

  前面提取的是姓名(match.Groups[1].Value),后边是邮箱(match.Groups[2].Value)

 

  3,我是将他们的对应关系 存入了Hashtable,然后问题就解决了。

 1         Thread t = new Thread(new ThreadStart(() => 2                 { 3                     while (count < num) 4                     { 5                         MailMessage mail = new MailMessage(); 6                         mail.From = new MailAddress(txtUsername.Text + "@qq.com", txtSendname .Text ); 7                         mail.To.Add(new MailAddress(h[nm[count]].ToString(),nm[count ])); 8                         mail.Subject = txtSubject.Text; 9                         StringBuilder sb = new StringBuilder(1024 * 8);10                         string tmp = texContent.Text.Replace(txtOld.Text, txtOld.Text + nm[count]);11                         sb.Append(tmp);12                         mail.Body = sb.ToString();13                         mail.IsBodyHtml = true;14                         SmtpClient sc = new SmtpClient("smtp.qq.com");15                         sc.Credentials = new NetworkCredential(txtUsername.Text.Trim(), txtPassword.Text.Trim());16                         try17                         {18                             sc.Send(mail);19                             txtLog.Invoke(new Action(() =>20                                 {21                                     txtLog.AppendText(nm[count] + "√\r\n");22                                 }));23                         }24                         catch25                         {26                             txtLog.Invoke(new Action(() =>27                                 {28                                     txtLog.AppendText(nm[count] + "    " + h[nm[count]].ToString() + "is not available×××××××××\r\n");29                                 }));30                         }31                         count++;32                     }33                     if (count >= num)34                     {35                         MessageBox.Show("Send over!");36                         btnSend.Invoke(new Action(() =>37                         {38                             btnSend.Enabled = false;39                         }));40                     }41 42                 }));43             t.Start();

 

利用正则表达式群发定制邮件