function send_mail($MailTo = "", $SenderName = "Sender", $SenderMail = "no@reply.error", $Subject = "", $body = "", $nohtml  = "[ This message should be viewed in HTML. This is a degraded version! ]"){
    if(strtoupper(substr(PHP_OS,0,3)=='WIN')){
      $eol="\r\n";
      $sol="\n";
    }elseif(strtoupper(substr(PHP_OS,0,3)=='MAC')){
      $eol="\r";
    }else{
      $eol="\n";
    }
    if(!isset($sol)){
        $sol = $eol;
    }
    $Momentn = mktime().".".md5(rand(1000,9999));
    $Textmsg = eregi_replace("<br(.{0,2})>", $eol, $body);
    $Textmsg = eregi_replace("</p>", $eol, $Textmsg);
    $Textmsg = strip_tags($Textmsg);
    $Textmsg = $nohtml.$eol.$eol.$Textmsg;
    $headers      .= 'To: '.$MailTo.' <'.$MailTo.'>'.$eol;
    $headers      .= 'From: '.$SenderName.' <'.$SenderMail.'>'.$eol;
    $headers      .= "Message-ID: <".$Momentn."@".$Servername.">".$eol;
    $headers      .= 'Date: '.date("r").$eol;
    $headers      .= 'Sender-IP: '.$_SERVER["REMOTE_ADDR"].$eol;
    $headers      .= 'X-Mailser: iPublications Adv.PHP Mailer 1.6'.$eol;
    $headers      .= 'MIME-Version: 1.0'.$eol;
    $bndp          = md5(time()).rand(1000,9999);
    $headers      .= "Content-Type: multipart/mixed; $eol       boundary=\"".$bndp."\"".$eol.$eol;
    $msg           = "This is a multi-part message in MIME format.".$eol.$eol;
    $msg          .= "--".$bndp.$eol;
    $bnd           = md5(time()).rand(1000,9999);
    $msg          .= "Content-Type: multipart/alternative; $eol       boundary=\"".$bnd."\"".$eol.$eol;
    $msg          .= "--".$bnd.$eol;
    $msg          .= "Content-Type: text/plain; charset=iso-8859-1".$eol;
    $msg          .= "Content-Transfer-Encoding: 8bit".$eol.$eol;
    $msg          .= $Textmsg.$eol;
    $msg          .= "--".$bnd.$eol;
    $msg          .= "Content-Type: text/html; charset=iso-8859-1".$eol;
    $msg          .= "Content-Transfer-Encoding: 8-bit".$eol.$eol;
    $msg          .= $body.$eol;
    $msg          .= "--".$bnd."--".$eol.$eol;
    $msg          .= "--".$bndp."--";
    if(@mail($MailTo, $Subject, $msg, $headers)){
        return true;   
    }else{
        return false;
    }
}