一些废话：
本人曾经在cn99.com创建了一个邮件列表，最近发现自己用来测试邮件是否发送成功的263.net的信箱不但无法收到自己的邮件列表，而且凡是从cn99.com上发送的邮件列表都无法收取。随后问了cn99.com上的管理员，管理员回复说：“由于sina,sohu,elong ,fm365,371，263，chinaren，citiz，eastday等信箱拒绝接收希网的电子杂志，如果你要订阅杂志，建议你用163.com,163.net ,21cn,china的信箱。另外，netease,yeah的信箱不能稳定接受信件。”
所以我决定用emial通知用以上邮件的网友，但是单个发送实在太麻烦，毕竟有600多个，于是从cn99.com下载了我的邮件列表用户清单，做了一个按照sina,sohu,elong ,fm365,371，263，chinaren，citiz，eastday后缀为规则的Emial发送程序。一下为程序核心代码，界面请自行制作
////////////////////////////////////////////////////////////////////
<?
$file = "mail.txt"; //邮件列表注册用户清单
$maillist=file($file);
$mailcount=count($maillist);
$message="尊敬的$name,您好！
您曾经在Cn99.com上订阅过我的邮件，但是因为现在由于sina,sohu,elong ,fm365,371，263，chinaren，citiz，eastday等信箱拒绝接收希网的电子杂志，如果你要订阅本杂志，建议你用163.com,163.net ,21cn,china的信箱。另外，netease,yeah的信箱不能稳定接受信件。如果还有任何问题，请来信。";//邮件内容
$title="您好，欢迎订阅阿羽的电子杂志";//邮件标题
$form="[email protected]";//管理员邮件地址
for ($i=0;$i<=$mailcount;$i++){
$maillist[$i]=trim($maillist[$i]);//去处邮件前后的空格
if (
eregi("^[_.0-9a-z-]+@+(sohu.com|elong.com|fm365.com|263.net|chinaren.com|citiz.net|eastday.com)$",$maillist[$i])
)
{
list($name,$host)=explode("@",$maillist[$i]);
mail($maillist[$i],$title,$message,$form);
}
}//end for
?>
|
|