Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/03/2011, 06:34
kimbalear
 
Fecha de Ingreso: septiembre-2009
Mensajes: 3
Antigüedad: 14 años, 7 meses
Puntos: 0
Pregunta Envio de mail con adjunto

Estoy intentando enviar mails con archivos adjuntos y no logro enviar los adjuntos me llega el mail sin archivos... aqui dejo el código:

$sPara=$_POST['para'];
$sAsunto=Trim(stripslashes($_POST['mlsjt']));
$sTexto=Trim(stripslashes($_POST['mailmensaje']));
$responder="[email protected]";
$remite1="[email protected]";
$remite2="Mi nombre";
$sDe=$remite2."<".$remite1.">";
$bHayFicheros = 0;
$sCabeceraTexto = "";
$sAdjuntos = "";
if ($sDe)$sCabeceras = "From:".$sDe."\n";
else $sCabeceras = "";
$sCabeceras .= "MIME-version: 1.0\n";
foreach ($_FILES as $vAdjunto){
if ($bHayFicheros == 0){
$bHayFicheros = 1;
$sCabeceras .= "Content-type: multipart/mixed;";
$sCabeceras .= "boundary=\"--_Separador-de-mensajes_--\"\n";
$sCabeceraTexto = "----_Separador-de-mensajes_--\n";
$sCabeceraTexto .= "Content-type: text/plain;charset=iso-8859-1\n";
$sCabeceraTexto .= "Content-transfer-encoding: 7BIT\n";
$sTexto = $sCabeceraTexto.$sTexto;
}
if ($vAdjunto["size"] > 0){
$sAdjuntos .= "\n\n----_Separador-de-mensajes_--\n";
$sAdjuntos .= "Content-type: ".$vAdjunto["type"].";name=\"".$vAdjunto["name"]."\"\n";;
$sAdjuntos .= "Content-Transfer-Encoding: BASE64\n";
$sAdjuntos .= "Content-disposition: attachment;filename=\"".$vAdjunto["name"]."\"\n\n";
$oFichero = fopen($vAdjunto["tmp_name"], 'r');
$sContenido = fread($oFichero, filesize($vAdjunto["tmp_name"]));
$sAdjuntos .= chunk_split(base64_encode($sContenido));
fclose($oFichero);
$sTexto .= $sAdjuntos."\n\n----_Separador-de-mensajes_----\n";
}
}
if( mail($sPara, $sAsunto, $sTexto, $sCabeceras)){$respuesta='Enviado';}
header('Content-type: application/json');
header("Status: 200 OK", false, 200);
echo json_encode($respuesta);
exit;