Script para enviar un formulario

[jonak]

Te lo puedo hacer mas sencillo pero esto es lo que tengo a mano ahora mismo.

Código PHP:

  <?
if( sendemail('[email protected]','[email protected]','asunto de ejemplo', 'mensaje de ejemplo','') )
    echo 'Email enviado!!';
else
    echo 'Error al enviar email';

function sendemail($from, $to, $subject, $message, $attachment) {
    $fileatt = $attachment;
    $fileatt_type = "application/octet-stream";
    $start=    strrpos($attachment, '/') == -1 ? strrpos($attachment, '//') : strrpos($attachment, '/')+1;
    $fileatt_name = substr($attachment, $start, strlen($attachment));
    $email_from = $from;
    $email_subject =  $subject;
    $email_txt = $message;
    $email_to = $to;
    $headers = "From: ".$email_from;
    
    if ($fileatt!="")
    {
        $file = fopen($fileatt,'rb');
        $data = fread($file,filesize($fileatt));
        fclose($file); 
    }

    $semi_rand = md5(time()); 
    $mime_boundary = "==Multipart_Boundary_x{$semi_rand}x"; 
    $headers .= "\nMIME-Version: 1.0\n" . 
            "Content-Type: multipart/mixed;\n" . 
            " boundary=\"{$mime_boundary}\""; 
    $email_message .= "This is a multi-part message in MIME format.\n\n" . 
                "--{$mime_boundary}\n" . 
                "Content-Type:text/html; charset=\"utf-8\"\n" . 
               "Content-Transfer-Encoding: 7bit\n\n" . 
    $email_txt . "\n\n"; 
    $data = chunk_split(base64_encode($data)); 
    if ($fileatt!="")
        $email_message .=    "--{$mime_boundary}\n".
                            "Content-Type: {$fileatt_type};\n".
                            " name=\"{$fileatt_name}\"\n".
                            "Content-Transfer-Encoding: base64\n\n".
                            $data."\n\n".
                            "--{$mime_boundary}--\n";
    $ok = @mail($email_to, $email_subject, $email_message, $headers); 
    if (!$ok) 
        return 0;
    else
        return 1;
}
?>