邮件批量发送程序代码,CSharp代码库,德仔网

代码语言

代码分类

【CSharp】邮件批量发送程序

作者:dezai / 发布于2014/8/21/ 1011

用MailMessage 类发送邮件的方法有很多，但我推荐使用异步方式发送邮件，尤其是发送批量邮件，这是因为程序在向邮件服务器提交多个邮件时，同步方式是等到上一封邮件提交完成并且有发送状态返回，才开始发送下一封，如果这时连接邮件服务器的网络比较慢，没有及时响应，那么程序一直处于等待状态，会影响后面的发送，有时还会产生重复提交，使收件人收到多封重复邮件。


	using System ;
	using System . ComponentModel ;
	using System . Net ;
	using System . Net . Mail ;
	
	namespace MailSendExample
	{
	
	 //异步发送，获取发送状态
	 static bool mailSent = false ;
	 public static void SendCompletedCallback ( object sender , AsyncCompletedEventArgs e )
	 {
	
	 if ( e . Cancelled )
	 {
	 mailSent = false ;
	 }
	 if ( e . Error != null )
	 {
	 mailSent = false ;
	 }
	 else
	 {
	 mailSent = true ;
	 }
	
	
	 }
	
	public static bool SendMail ( string fromEmail , string fromName , string reEmail , string toEmail , string mailTitle , string mailBody )
	 {
	
	 //格式化Email，收件人支持半角逗号分隔的多个Email
	 toEmail = toEmail . Replace ( " ; " , " , " ) ;
	 toEmail = toEmail . Replace ( " ； " , " , " ) ;
	 toEmail = toEmail . Replace ( " ， " , " , " ) ;
	
	
	
	 MailMessage mail = new MailMessage () ;
	 try
	 {
	 //发件人，发件人名
	 mail . From = new MailAddress ( fromEmail , fromName ) ;
	 //回复人，回复人名
	 mail . ReplyTo = new MailAddress ( reEmail , fromName ) ;
	 //收件人
	 mail . To . Add ( toEmail ) ;
	 //邮件优先级
	 mail . Priority = MailPriority . Normal ;
	 //设置html邮件
	 mail . IsBodyHtml = true ;
	 //标题
	 mail . Subject = mailTitle ;
	 //内容
	 mail . Body = mailBody ;
	 }
	 catch ( Exception ex )
	 {
	 //错误日志记录
	 Logger . WriteLine ( " SendMail_ErrorMail: " + ex . Message + " | " + toEmail ) ;
	 return false ;
	 }
	
	
	 try
	 {
	 //邮件服务器
	 string SMTPServer = " mail.aaaa.com " ;
	 //发送帐号
	 string SMTPAuthUsername = " bbb@aaaa.com " ;
	 //发送账户的密码
	 string SMTPAuthPassword = " 123456 " ;
	 //定义传输协议
	 SmtpClient smtp = new SmtpClient ( SMTPServer ) ;
	 //设置认证发件人
	 smtp . Credentials = new NetworkCredential ( SMTPAuthUsername , SMTPAuthPassword ) ;
	 //异步发送完成获取发送状态
	 smtp . SendCompleted += new SendCompletedEventHandler ( SendCompletedCallback ) ;
	
	 //调试
	 //Logger.WriteLine("SendMail:" + mail.To + "|" + mail.From );
	
	 //异步发送
	 smtp . SendAsync ( mail , String . Empty ) ;
	
	 return mailSent ;
	 }
	 catch ( Exception ex )
	 {
	 Logger . WriteLine ( " SendMail_Send: " + ex . Message + " | " + SMTPServer ) ;
	 return false ;
	 }
	
	 }
	
	
	 }
	}
	大家注意下面这个个问题，注意调试的那句程序

	//调试
	//Logger.WriteLine("SendMail:" + mail.To + "|" + mail.From );

	自从加入这句写日志的方法就行调试，邮件发送一直失败，这个问题困扰了好长时间，最后截取错误信息才发现原因，错误提示是&ldquo;邮件标头中找到无效字符 &rdquo;

试试其它关键字

　邮件发送　　批量发送　

同语言下

可能有用的

dezai贡献的其它代码(1065)