Posielanie e-mailu s prílohou bez podpory IMAP.

<? 
$files=array('subor1.txt','subor2.jpg'); 
$message="I love Inspired.sk!"; 
 
$boundary="BOUNDARYc408c50b1520c07a365a"; 
$email="From: \"Jano Mrkva\" <mrkva@firma.sk>\r\n"; 
$email.="MIME-Version: 1.0\r\n"; 
$email.="Content-Type: multipart/mixed; BOUNDARY=\"$boundary\"\r\n\r\n--$boundary\r\n"; 
$email.="Content-Type: text/plain; charset=windows-1250\r\n\r\n".$message."\r\n--$boundary"; 
 
for ($i=0; $i<count($files); $i++) { 
   $fp=fopen($files[$i], "r"); 
   $contents=fread($fp, filesize($files[$i])); 
   fclose($fp); 
   $contents=chunk_split(base64_encode($contents)); 
   $email.="\r\nContent-Type: application/octet-stream; name=\"".basename($files[$i])."\"\r\n"; 
   $email.="Content-Transfer-Encoding: BASE64\r\n"; 
   $email.="Content-Description: ".basename($files[$i])."\r\n\r\n"; 
   $email.=$contents."--".$boundary; 
} 
 
$email.="--"; 
 
$headerpos = StrPos($email, "\r\n\r\n"); 
$header = SubStr($email, 0, $headerpos+2); 
$body = SubStr($email, $headerpos, StrLen($email) - $headerpos); 
 
mail("palo@email.sk", "Hello", $body, $header); 
?>