标题:
用PHP写了个邮件群发,不知道可以用不
[打印本页]
作者:
345139759
时间:
2012-2-23 17:54
标题:
用PHP写了个邮件群发,不知道可以用不
本帖最后由 345139759 于 2012-2-23 17:56 编辑
<?php
$filename = "tongji.txt";
$fp = fopen($filename,'w+');
$GLOBALS['tongji']=fread($fp,filesize($filename));
fclose($fp);
writewj();
function writewj(){
$tongji++;
$filename1 = "tongji.txt";
$fp1 = fopen($filename1,'w');
$neirong = fwrite($fp1,$tongji);
fclose($fp1);
fyj();
}
function fyj(){
mail($tongji."@qq.com","让您享受最好的上网主页!","5556网址导航:
http://www.5556.info
,5556搜索引擎大全:
http://so.5556.info
。谢谢,如果有疑问,可以咨询我们,QQ282121649.");
writewj();
}
?>
用法:新建一个tongji.txt文件,把文件放在相同目录,在tongji.txt里面写入开始发的邮件地址,然后试试
5556网址导航:
http://www.5556.info
顺便打下广告:
http://www.5556.info/
作者:
idc886
时间:
2012-2-23 22:45
楼主,,试成功没?
作者:
smm173
时间:
2012-2-24 01:05
我试了,没成功。。php文件运行不完,而tongji.txt也会被更改为只有一个“1”。不知道是我的方法不对还是咋回事。。
作者:
mrlong
时间:
2012-2-24 17:08
楼主能不能写个php在线管理文件的程序啊 谢谢啦!
作者:
sam1414
时间:
2012-2-25 03:43
本帖最后由 sam1414 于 2012-2-25 03:59 编辑
还是要出手!其实没有必要令程式这么复杂!最简单的只要用到php的array和for loop就可以成功开发!可是郵件地址要一個一個打上去
还是不明白的就看code吧!
主程式
<?php
include "./list.php"; //插入電郵列表
$length = count($mail); //取得電郵列表總數
for($i=0; $i<$length; $i++){
$mailto = $mail[$i];
$subject = "PHP Mail Test"; //郵件主題
$message = "Only test, don't reply"; //郵件內容
$headers = 'Content-type: text/plain; charset="utf8"' . "\r\n"; //郵件編碼,如非郵件亂碼,請勿更改
$headers = 'From: admin@ehost-hk.coms.hk' . "\r\n"; //發件人電郵
mail($mailto, $subject, $message, $headers);
echo "E-mail has been sent to ".$mail[$i]."</br>"; //確認信息,無需更改
}
?>
复制代码
電郵列表
<?php
$mail[]="test1@test.com";
$mail[]="test2@test.com";
$mail[]="test3@test.com";
$mail[]="test4@test.com";
?>
复制代码
最后,把电邮列表及主程式放到同一目录,然后运行主程式就可以!
已完成测试,证实可成功运行!
求加分阿~~
另外,如果要转载,请保留本回覆的url连结!
作者:
sam1414
时间:
2012-2-25 03:48
还有一点,就是电邮列表并没有人数限制,只要你按照格式新增,就可以了!
作者:
sam1414
时间:
2012-2-25 04:10
想到方法了,但先去睡觉,明天才更新一下!等我~~
作者:
sam1414
时间:
2012-2-25 17:37
基於qq的電郵是數字@qq.com,所以只要對程式的loop部份作出小量更改就可以了!
<?php
$start = "9123456789"; //開始電郵
$end = "9876543210"; //結束電郵
for($i=$start; $i<$end; $i++){
$mailto = $i."@qq.com";
$subject = "PHP Mail Test"; //郵件主題
$message = "Only test, don't reply"; //郵件內容
$headers = 'Content-type: text/plain; charset="utf8"' . "\r\n"; //郵件編碼,如非郵件亂碼,請勿更改
$headers = 'From: admin@ehost-hk.coms.hk' . "\r\n"; //發件人電郵
mail($mailto, $subject, $message, $headers);
echo "E-mail has been sent to ".$i."@qq.com</br>"; //確認信息,無需更改
}
?>
复制代码
作者:
idc886
时间:
2012-3-2 21:57
回复
8#
sam1414
倒。。。
这个还可以连续 发QQ邮箱?!!
作者:
idc886
时间:
2012-3-27 23:33
回复
5#
sam1414
哦,这个测试成功。
楼主的代码,测试未成功! 楼主看哪里贴错误了。
作者:
sam1414
时间:
2012-4-4 22:19
回复 sam1414
倒。。。
这个还可以连续 发QQ邮箱?!!
idc886 发表于 2012-3-2 21:57
是的,这个就是连续发QQ邮箱的。
欢迎光临 免费国外空间,国外免费空间, (http://idc866.com/)
Powered by Discuz! 7.2