<?php 
function DiMail($Subject, $Body_Text, $Body_HTML, $From, $FromName, $To, $Cc = "", $Bcc = "", $MailType='H', $Attachments = "", $ReplyTo="", $ReturnPath="",   $CustomHeader="")
{	
	$mime_boundary = "<<<--==+X[".md5(time())."]";
	
	$headers ="MIME-Version: 1.0\n"; 
	$headers.="From: $FromName<$From>\n";
	$headers.="Reply-To: $ReplyTo\n"; 
	$headers.="Return-Path: $ReturnPath\n";
	
	if ($Bcc)
	{	if (is_array($Bcc))
		{	
			foreach($Bcc as $bcc_email=>$bcc_name)
			{	$BCC_ADDRESS = "$bcc_name<$bcc_email>";
				$headers.="Bcc: $BCC_ADDRESS\n";
			}
		}		
	}

	if ($Cc)
	{	if (is_array($Cc))
		{	foreach($Cc as $cc_email=>$cc_name)
			{	$CC_ADDRESS = "$cc_name<$cc_email>";
				$headers.="Cc: $CC_ADDRESS\n";
			}
		}		
	}

	

	$headers.="X-Priority: 1\n"; 
	$headers.="X-MSMail-Priority: High\n"; 
	$headers.="X-Mailer: MyMailer\n"; 
	$headers.= "Content-Type: multipart/mixed;\n";
	$headers.= " boundary=\"".$mime_boundary."\"\n\n";

	if ($MailType == 'T')
	{		$message = "--".$mime_boundary."\n";
			$message .= "Content-Type: text/plain; charset=\"iso-8859-1\"\n";
			$message .= "Content-Transfer-Encoding: 7bit\n";
			$message .= "\n";
			$message .= $Body_Text;
			$message .= "\n";
			//$message .= "--".$mime_boundary."\n";
	}
	else
	{		$message = "--".$mime_boundary."\n";
			$message .= "Content-Type: text/html; charset=\"iso-8859-1\"\n";
			$message .= "Content-Transfer-Encoding: base64\n\n";
			$message .= "\n";
			$message .= chunk_split(base64_encode($Body_HTML));
			$message .= "\n";
			//$message .= "--".$mime_boundary."\n";
	}

	



	if ($Attachments)
	{	foreach($Attachments as $AFile)
		{	if (file_exists($AFile))
			{	if (is_file($AFile))
				{	$fd = fopen ($AFile, "r");
					$FILE_CONTENTS = fread ($fd, filesize($AFile));
					fclose ($fd);	
					$FILE_CONTENTS=chunk_split(base64_encode($FILE_CONTENTS));
					
					if ($FILE_CONTENTS)
					{	$F = explode("/", $AFile);
						$f_name = $F[count($F)-1];												
						$message .= "--".$mime_boundary."\n";
						$message .= "Content-Type: application/octet-stream;\n"; // For other data
						$message .= " name=\"$f_name\"\n";
						$message .= "Content-Disposition: attachment; filename=\"$f_name\"\n";
						$message .= "Content-transfer-encoding: base64\n\n";
						$message .= "\n";
						$message .=$FILE_CONTENTS;
						$message .= "\n";
						$message .= "--".$mime_boundary."\n\n";
					}
				}
			}
		}
	}

	if ($To)
	{	if (is_array($To))
		{	foreach($To as $To_email=>$To_name)
			{	  mail("$To_name<$To_email>",$Subject,$message,$headers); 
			}
		}		
	}

	return true;
		 
}