public function enviarPacote($de = '', $html = false)
{
Email::$msg = $this->getTexto()->texto;
if ($html) {
Email::$html = $html;
}
if ($de) {
Email::$de = $de;
}
Email::$assunto = $this->getTexto()->titulo;
if ($this->getStatus() == self::PARADO) {
self::criarListaParaEnvio($this);
}
$l = new Lista('mailing_pacotes_envio');
$l->condicoes('', $this->getId(), 'mailing');
$total = $l->getTotal();
if ($total > Sistema::$emailsPorHora) {
$l->setParametros(Sistema::$emailsPorHora, 'limite');
$this->setStatus(self::ENVIANDO);
} else {
$this->setStatus(self::PARADO);
}
$lM = new ListaMailings();
$lM->alterar($this);
$con = BDConexao::__Abrir();
while ($rs = $l->listar()) {
Email::$para = $rs['email'];
Email::enviar();
$con->executar("DELETE FROM " . Sistema::$BDPrefixo . "mailing_pacotes_envio WHERE mailing = '" . $this->getId() . "' AND email = '" . $rs['email'] . "'");
$l->setParametros(0);
$l->setParametros($l->getParametros('limite') - 1, 'limite');
}
}
importar("Utilidades.Publicidades.Mailing.Lista.ListaMailings");
$sCituloPagina = 'Utilidades > Publicidades > Mailings > Enviar';
$iTEM = new IFAdmin(new Arquivos(Sistema::$adminLayoutCaminhoDiretorio . "/SistemaUtilidades/enviarMailing.html"));
if (!empty($_POST)) {
$erro = '';
if (empty($_POST['assunto'])) {
$erro = "<b>Assunto</b> não preenchido!<br><br>";
}
if (empty($erro)) {
$lSC = new ListaMailings();
$lSC->condicoes('', $_GET['mailing'], ListaMailings::ID);
$sC = $lSC->listar();
$sC->getTexto()->titulo = $_POST['assunto'];
$sC->getTexto()->texto = str_replace("\\", "", eregi_replace('\\.\\./', Sistema::$caminhoURL, $_POST['mensagem']));
$lSC->alterar($sC);
$sC->enviarPacote(Sistema::$nomeEmpresa . "<" . Sistema::$emailEmpresa . ">", true);
$con = BDConexao::__Abrir();
$con->executar("SELECT * FROM " . Sistema::$BDPrefixo . "mailing_pacotes_envio WHERE mailing = '" . $_GET['mailing'] . "'");
if ($con->getTotal() == 0) {
$javaScript .= Aviso::criar("Mailing enviado com sucesso!");
} else {
$javaScript .= Aviso::criar("Para continuar o envio, clique em Enviar daqui 1 hora!");
}
} else {
$javaScript .= Aviso::criar($erro);
}
}
$lSC = new ListaMailings();
$sC = $lSC->condicoes('', $_GET['mailing'], ListaMailings::ID)->listar();
$iTEM->trocar("assunto", $sC->getTexto()->titulo);
