Кодировка писем со вложением

function send_mail($mail_to, $thema, $mesg, $path) { 
 
 if ($path) {  
  $fp = fopen($path,"rb");   
  if (!$fp) { print "Cannot open file"; exit(); }   
  $file = fread($fp, filesize($path));   
  fclose($fp);   
 }  
 $name = basename($path); 
 $EOL = "\r\n"; 
 $boundary     = "--".md5(uniqid(time()));  
 $headers    = "MIME-Version: 1.0;$EOL"; 
 
 $headers   .= "Content-Type: multipart/mixed; boundary=\"$boundary\"$EOL";  
 $headers   .= "From:".$mail."1";  
 $multipart  = "--$boundary$EOL";
 $multipart .= "------------".$bondary."\nContent-Type:text/html;\n";
 $multipart .= "Content-Transfer-Encoding: windows-1251 \n\n$mesg\n\n";
 $multipart .= $EOL; 
 $multipart .=  "$EOL--$boundary$EOL";   
 $multipart .= "Content-Type: application/octet-stream; name=\"$name\"$EOL";   
 $multipart .= "Content-Transfer-Encoding: base64$EOL";   
 $multipart .= "Content-Disposition: attachment; filename=\"$name\"$EOL";   
 $multipart .= $EOL; 
 $multipart .= chunk_split(base64_encode($file));   
 $multipart .= "$EOL--$boundary--$EOL";   
 if (!mail($mail_to, $thema, $multipart, $headers)) { 
  return false;           
 }  
 else {
  return true;  
 }  
 exit;  
}
send_mail($to, $subject, $mesg, $name_file);

$multipart .= "Content-Transfer-Encoding: 8bit\n";

function send_mail($mail_to, $thema, $mesg, $path) { 
    $thema= "=?UTF-8?B?".base64_encode($thema)."?=";