$throttle = 100;
$numSended = 0;
for($br=0;$br<$NR;$br++){
if ($numSended % $throttle == 0) {
sleep(15); // sleep
}
if(checkEmail(db_result($RES1, $br, "mailtosend"))){
$t = new Template("../email_templates", "remove");
$SQL = "SELECT template_file FROM maillist_template, maillist_email WHERE email_id=".$id." AND email_template=template_id";
$RS = db_exec(1, $SQL);
$tf = db_result($RS, 0, "template_file");
$t->set_file(array("page" => $tf));
$t->set_var(array(
"DATE" => date("F d Y", strtotime("now")),
"NAME" => db_result($RES1, $br, "finalname"),
"TITLE" => $subject,
"BODY" => $content,
"EMAILID"=> $id,
"HOST" =>"http://".$HTTP_HOST,
"DEAR" => $translator->translate("DEAR"),
"Click_here" => $translator->translate("Click_here"),
"removed_from_maillist" => $translator->translate("removed_from_maillist"),
"Recomend_to_friend" => $translator->translate("Recomend_to_friend"),
"EMAIL" => db_result($RES1, $br, "mailtosend")
));
$t->parse("OUT", array("page"));
$maillist_email = $t->get_var("OUT");
mail(db_result($RES1, $br, "mailtosend"), $subject, $maillist_email, "From: $email_from\nContent-Type: text/html;\n charset=utf-8;\n");
//mailque($dbconnmail, db_result($RES1, $br, "mailtosend"), $subject, $maillist_email, "From: (".$email_from.")\nContent-Type: text/html;\n charset=utf-8;\n");
$numSended++;
}