function next($count = 10)
 {
     $max = $this->current + $count;
     $max = $max < count($this->objects) ? $max : count($this->objects);
     while ($this->current < $max) {
         $index = $this->current++;
         $member = $this->objects[$index];
         // check to see if the user has unsubscribed from the mailing list
         // TODO Join in the above query first
         $unsubscribeRecord = DataObject::get_one('Member_UnsubscribeRecord', "`MemberID`='{$member->ID}' AND `NewsletterTypeID`='{$this->nlType->ID}'");
         if (!$unsubscribeRecord) {
             $address = $member->Email;
             /**
              * Email Blacklisting Support
              */
             if ($member->BlacklistedEmail && Email_BlackList::isBlocked($address)) {
                 $bounceRecord = new Email_BounceRecord();
                 $bounceRecord->BounceEmail = $member->Email;
                 $bounceRecord->BounceTime = date("Y-m-d H:i:s", time());
                 $bounceRecord->BounceMessage = "BlackListed Email";
                 $bounceRecord->MemberID = $member->ID;
                 $bounceRecord->write();
                 // Log the blacklist for this specific Newsletter
                 $newsletter = new Newsletter_SentRecipient();
                 $newsletter->Email = $address;
                 $newsletter->MemberID = $member->ID;
                 $newsletter->Result = 'BlackListed';
                 $newsletter->ParentID = $this->newsletter->ID;
                 $newsletter->write();
             } else {
                 $e = new Newsletter_Email($this->nlType);
                 $e->setBody($this->body);
                 $e->setSubject($this->subject);
                 $e->setFrom($this->from);
                 $e->setTemplate($this->nlType->Template);
                 if (method_exists($member, "getNameForEmail")) {
                     $nameForEmail = $member->getNameForEmail();
                 }
                 $e->populateTemplate(array('Member' => $member, 'FirstName' => $member->FirstName, 'NameForEmail' => $nameForEmail));
                 $this->sendToAddress($e, $address, $this->messageID, $member);
             }
         }
     }
     if ($this->current >= count($this->objects)) {
         return $this->complete();
     } else {
         return parent::next();
     }
 }
 public function sendnewsletter()
 {
     $id = isset($_REQUEST['ID']) ? $_REQUEST['ID'] : $_REQUEST['NewsletterID'];
     if (!$id) {
         FormResponse::status_message(_t('NewsletterAdmin.NONLSPECIFIED', 'No newsletter specified'), 'bad');
         return FormResponse::respond();
     }
     $newsletter = DataObject::get_by_id("Newsletter", $id);
     $nlType = $newsletter->getNewsletterType();
     $e = new Newsletter_Email($nlType);
     $e->Body = $body = $newsletter->Content;
     $e->Subject = $subject = $newsletter->Subject;
     // TODO Make this dynamic
     if ($nlType && $nlType->FromEmail) {
         $e->From = $from = $nlType->FromEmail;
     } else {
         $e->From = $from = Email::getAdminEmail();
     }
     if (isset($_REQUEST['TestEmail'])) {
         $e->To = $_REQUEST['TestEmail'];
     }
     $e->setTemplate($nlType->Template);
     $messageID = base64_encode($newsletter->ID . '_' . date('d-m-Y H:i:s'));
     switch ($_REQUEST['SendType']) {
         case "Test":
             if ($_REQUEST['TestEmail']) {
                 $e->To = $_REQUEST['TestEmail'];
                 $e->setTemplate($nlType->Template);
                 self::sendToAddress($e, $_REQUEST['TestEmail'], $messageID);
                 FormResponse::status_message(_t('NewsletterAdmin.SENTTESTTO', 'Sent test to ') . $_REQUEST['TestEmail'], 'good');
             } else {
                 FormResponse::status_message(_t('NewsletterAdmin.PLEASEENTERMAIL', 'Please enter an email address'), 'bad');
             }
             break;
         case "List":
             // Send to the entire mailing list.
             $groupID = $nlType->GroupID;
             echo self::sendToList($subject, $body, $from, $newsletter, $nlType, $messageID, DataObject::get('Member', "`GroupID`='{$groupID}'", null, "INNER JOIN `Group_Members` ON `MemberID`=`Member`.`ID`"));
             break;
         case "Unsent":
             // Send to only those who have not already been sent this newsletter.
             $only_to_unsent = 1;
             echo self::sendToList($subject, $body, $from, $newsletter, $nlType, $messageID, $newsletter->UnsentSubscribers());
             break;
     }
     return FormResponse::respond();
 }