arman/science-ation
1
1
Fork 0
forked from science-ation/science-ation
Code Pull Requests Activity

reorganize the send_communication script to be more efficient

Browse Source
This commit is contained in:
james 2006-03-01 18:03:41 +00:00
parent 4bf5cb909f
commit 95c6381007
1 changed files with 22 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

44
admin/send_communication.php
View File

@ -43,33 +43,33 @@ if(file_exists("../data/communication.lock"))
$headers="From: $from\r\nReply-To: $from\r\nReturn-Path: $from\r\n"; $headers="From: $from\r\nReply-To: $from\r\nReturn-Path: $from\r\n";
$x=1; $x=1;
if(array_key_exists($to,$mailqueries)) if(array_key_exists($to,$mailqueries))
{
$q=mysql_query($mailqueries[$to]['query']); $q=mysql_query($mailqueries[$to]['query']);
while($r=mysql_fetch_object($q))
{
if($r->firstname && $r->lastname)
$to="$r->firstname $r->lastname <".$r->email.">";
else if($r->firstname)
$to="$r->firstname <".$r->email.">";
else
$to=$r->email;
mail($to,$subject,$body,$headers);
$fp=fopen("../data/communication.lock.$id","w");
fputs($fp,$x."\n");
fclose($fp);
usleep(rand($sleepmin,$sleepmax));
$x++;
}
unlink("../data/communication.lock.$id");
unlink("../data/communication.lock");
}
else else
echo i18n("Unknown 'to' to send email communication to (%1)",array($to)); echo i18n("Unknown 'to' to send email communication to (%1)",array($to));
while($r=mysql_fetch_object($q))
{
if($r->firstname && $r->lastname)
$to="$r->firstname $r->lastname <".$r->email.">";
else if($r->firstname)
$to="$r->firstname <".$r->email.">";
else
$to=$r->email;
mail($to,$subject,$body,$headers);
$fp=fopen("../data/communication.lock.$id","w");
fputs($fp,$x."\n");
fclose($fp);
usleep(rand($sleepmin,$sleepmax));
$x++;
}
unlink("../data/communication.lock.$id");
unlink("../data/communication.lock");
} }
else else
{ {