Enviando um e-mail com um arquivo em anexo
Publicado por Rodrigo Caldeira de Paula Lima 09/07/2003
[ Hits: 17.322 ]
Este é um script bem fácil e simples de envio de e-mails com um arquivo em anexo.
[]'s
<?
$corpo = "Corpo do email...";
$bound = "XYZ-" . date("dmYis") . "-ZYX";
if (($fp = fopen($_FILES['arquivo']['tmp_name'],"rb")))
{
$anexo = fread($fp,filesize($_FILES['arquivo']['tmp_name']));
$anexo = base64_encode($anexo);
fclose($fp);
$anexo = chunk_split($anexo);
}
if ($anexo)
{
$mensagem = "--$bound\nContent-type: text/html\nContent-Transfer-Encoding: 7bit\n\n$corpo\n\n"
. "--$bound\nContent-type: $_FILES[arquivo][type]\nContent-Disposition: attachment; filename=" . $_FILES['arquivo']['name'] . "\nContent-Transfer-Encoding: base64\n\n$anexo\n"
. "--$bound\r\n";
mail("para@dominio.com.br","E-mail com arquivo em anexo",$mensagem,"From: $_POST[email]\nMIME-Version: 1.0\nContent-type: multipart/mixed; boundary=\"$bound\"");
}
else
{
mail("para@dominio.com.br","E-mail com arquivo em anexo",$corpo,"From: $_POST[email]\nContent-type: text/html");
}
?>
Script para enviar e-mails em grande quantidade
Relatório de uso de caixa postal
Papagaiando o XFCE com temas e recursos
WhatsApp com Chamadas no Linux via Waydroid
XFCE - quase um Gnome ou Plasma mas muito mais leve
LXQT - funcional para máquinas pererecas e usuários menos exigentes
Centralizar Logo com Transparência via ImageMagick
Removendo entradas de boot UEFI "fantasmas" via terminal
Atualizações de Segurança Automáticas no Debian
Como cortar as partes de um vídeo com passagens de áudio em branco
Reflexão sobre a sobrevivência do Gentoo Linux (7)
Doações para LM dezembro 2025 record! (2)
Uma pergunta bem simples mas não achei resposta (ainda) [RESOLVIDO] (3)









