cetutnx1
New Member
- Messages
- 510
- Reaction score
- 0
- Points
- 0
Hola, estoy teniendo un gran problema:
Cada vez que trato de enviar un mail utilizando un newsletter que hice yo aparentemente no envía el contenido de mensaje, el código que utilizo es el siguiente:
Espero que alguien pueda ayudarme...
Gracias por adelantado.
Gonzalo.
Cada vez que trato de enviar un mail utilizando un newsletter que hice yo aparentemente no envía el contenido de mensaje, el código que utilizo es el siguiente:
PHP:
$para = $_POST['para'];
$asunto = $_POST['asunto'];
$adjunto = $_FILES['adjunto'];
$contenido = $_POST['mensaje'];
//Esto es algo nuevo que tuve que agregar ya que magic_quotes_gpc esta on...
$contenido = stripslashes($contenido);
$bid = "----------=_".time(); //Identificador único de boundary
$boundary = "boundary=\"".$bid."\"";
$mensaje = "--$bid";
$mensaje .= "Content-Type: text/html; charset=\"iso-8859-1\"\r\n";
$mensaje .= "Content-Transfer-Encoding: binary";
$mensaje .= "Content-Disposition: inline\r\n\r\n";
$mensaje .= "<html>\n <body>\n";
$mensaje .= $contenido;
$mensaje .= " </body>\n</html>\n";
$mensaje .= "\r\n--".$bid."\r\n";
//Aquí estan las cabeceras del mensaje
$cabeceras = "From: ".$config['from']."\r\n";
$cabeceras .= "Reply-To: ".$config['replyto']."\r\n";
$cabeceras .= "X-Mailer: PHP/".phpversion()."\r\n";
$cabeceras .= "Date: ".$mail['fecha']."\r\n";
$cabeceras .= "MIME-Version: 1.0\r\n";
$cabeceras .= "Content-Type: multipart/mixed;".$boundary."\r\n\r\n";
...
//La función mail de php no permite mandar
//lineas que sean más largas que 70 caracteres
$mensaje = wordwrap($mensaje, 70);
...
if(mail($l, $asunto, $mensaje, $cabeceras)) {
$sended++;
}
else {
$nosended++;
}
...
Espero que alguien pueda ayudarme...
Gracias por adelantado.
Gonzalo.