PHP邮件群发程序

[代码] php代码

001 <?php
002  
003 // 请求 PHPmailer类 文件
004 require_once("class.phpmailer.php");
005  
006 //发送Email函数
007 function smtp_mail ( $sendto_email, $subject, $body, $extra_hdrs, $user_name) {
008 $mail = new PHPMailer();
009 $mail->IsSMTP();                                     // send via SMTP
010 $mail->Host = "smtp.163.com";                       // SMTP servers
011 $mail->SMTPAuth = true;                             // turn on SMTP authentication
012 $mail->Username = "jessiejl";                          // SMTP username     注意:普通邮件认证不需要加 @域名
013 $mail->Password = "1983106";                         // SMTP password
014  
015 $mail->From = "";                      // 发件人邮箱
016 $mail->FromName = "WWW.NIUTW.COM";                 //   发件人 ,比如 唯美搭配网
017  
018 $mail->CharSet = "GB2312";                          // 这里指定字符集!
019 $mail->Encoding = "base64";
020  
021 $mail->AddAddress($sendto_email,$user_name);        // 收件人邮箱和姓名
022 $mail->AddReplyTo("","Web之家");
023  
024 //$mail->WordWrap = 50; // set word wrap
025 //$mail->AddAttachment("/var/tmp/file.tar.gz");                                                    // attachment  附件1
026 //$mail->AddAttachment("/tmp/image.jpg", "new.jpg");                                         //附件2
027 $mail->IsHTML(true);                               // send as HTML
028 $mail->Subject = $subject;                      
029  
030 // 邮件内容      可以直接发送html文件
031 $mail->Body = <<<EOT
032 <html>
033 <head>
034 <title>Treasurery Online 周刊</title>
035 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
036 <style type="text/css">
037 <!--
038 .STYLE1 {color: #009900}
039 .STYLE3 {color: #000000}
040 a:link {
041     color: #333333;
042 }
043 .STYLE4 {color: #666666}
044 body,td,th {
045     font-family: 宋体;
046     font-size: 12px;
047 }
048 .STYLE6 {color: #FFFFFF}
049 .STYLE9 {color: #DCB003}
050  
051   
052  
053 -->
054 </style>
055 </head>
056 <body bgcolor="#FFFFFF" >
057  
058 </body>
059 </html>
060 EOT;
061 $mail->AltBody ="text/html";
062 if($mail->Send())
063         {
064    info_write("ok.txt","$user_name 发送成功");
065         }
066 else {
067    info_write("falied.txt","$user_name 失败,错误信息$mail->ErrorInfo");
068      }
069 }
070 // 发送Email函数结束
071  
072 // 写入发送结果函数,错误日志记录
073 function info_write($filename,$info_log)
074     {
075      $info.= $info_log;
076      $info.="\r\n";
077      $fp = fopen ($filename,a);
078      fwrite($fp,$info);
079      fclose($fp);
080     }
081  
082 //定时跳转页面 函数        其中 1000是时间,1秒, 您可以自定义
083 function redirect($url)
084     {
085             echo "<script>
086                 function redirect()
087                 {
088                     window.location.replace('$url');
089                 }
090                 window.setTimeout('redirect();', 15000);
091               </script>";
092     }
093  
094 //读取文本 邮件地址  您也可以读 数据库
095         $filename = "email.txt";
096         $fp = fopen($filename,"r");
097         $contents = fread($fp,filesize($filename));
098         $list_email=explode("\r\n",$contents);          
099         $len=count($list_email);
100         fclose($fp);
101  
102 // 参数说明(发送到, 邮件主题, 邮件内容, 附加信息, 用户名)
103 $i = $_GET['action'];
104         $i++;      
105 if ($i<$len)
106     {
107         $rs=explode("@",$list_email[$i]);
108         $user_name = $rs['0'];
109         echo "正在发送第{$i}封({$list_email[$i]})邮件......{$user_name}";
110         smtp_mail($list_email[$i], 'Treasurery Online 周刊第十二期', $body, 'http://www.yem120.com/', $user_name);
111         redirect("?action=$i");
112     }
113 else {
114      echo "邮件全部发送完毕";
115      exit;
116       }
117  
118 ?>

[代码] 小思维

1 上面的读取文章email.txt,也可以直接是qq号码,每行一个号码,然后用fget()读取每行qq号码,最后在加上qq邮箱后缀 @qq.com即可
posted @ 2013-02-01 11:14  幻星宇  阅读(407)  评论(0编辑  收藏  举报