<?php
if(basename($PHP_SELF)== "class.html_mime_mail.inc")
{
  include  "fileinfo.inc";
  echo  "<pre>
    如果不含圖檔:
     \$mail = new html_mime_mail();
     \$html =\"HTML內容\";
     \$mail->add_html(\$html, \$text);
     \$mail->build_message();
     \$mail->send(收信人,收信Email,發信人,發信Email,標題,額外Header);

    <hr>
    如果含圖檔:
    \$url=\"www.cuti.com.my/AD/\";    //圖檔位?FONT color="#007700">} ?FONT color="#007700">}頭無http:// 結尾有斜線
    \$path=\"/MAIL/AD/\";    //圖檔路徑 結尾有斜線

    \$filename1 = 'a.jpg';
    \$backgrnd1 = fread(\$fp = fopen(\$path.\$filename1, 'r'), filesize(\$path.\$filename1));
    fclose(\$fp);
    ...依此類推...
    \$filename6 = 'f.gif';
        \$backgrnd6 = fread(\$fp = fopen(\$path.\$filename6, 'r'), filesize(\$path.\$filename6));
        fclose(\$fp);
    
    \$mail->add_html_image(\$backgrnd1,\$filename1,'image/jpeg','http://'.\$url.\$filename1);
    ...依此類推...
    \$mail->add_html_image(\$backgrnd6,\$filename6,'image/gif','http://'.\$url.\$filename6);

     \$mail = new html_mime_mail();
     \$html =\"HTML含圖內容\";
     \$mail->add_html(\$html, \$text);
     \$mail->build_message();
     \$mail->send(收信人,收信Email,發信人,發信Email,標題,額外Header);
  ";
        
}
/***************************************
** Title.........: HTML Mime Mail class
** Version.......: 1.26
** Author........: Richard Heyes <richard.heyes@heyes-computing.net>
** Filename......: html_mime_mail.class
** Last changed..: 25/06/2000
** Notes.........: Based upon mime_mail.class
**                 by Tobias Ratschiller <tobias@dnet.it>
**                 and Sascha Schumann <sascha@schumann.cx>.
**                  - Thanks to Thomas Flemming for supplying a fix
**                    for Win32.
**                  - Made headers terminated by CRLF instead of LF, now
**                    compliant with RFC822. Thanks to Pao-Hsi Huang.
**                  - Fixed bug; certain mail systems (gmx.net in particular)
**                    were rejecting mail because of a space character either
**                    side of the equal sign on the boundary line. Thanks to
**                    Peter Holm for notifying me.
**                  - Fixed bug; $html_images was tested to be an array or not
**                    but was set to be an array during object creation, so the
**                    test always returned true. Thanks to Bob Silva for
**                    notifying me.
**                  - Fixed bug; when looping with $obj->send(), From: headers
**                    were accumulating. Bummer. Thanks to Lance Rasmussen for
**                    notifying me.
**                  - See http://www.heyes-computing.net/scripts/ for a zip/tar
**                    containing an example script.
***************************************/

class html_mime_mail{

        var $headers;
        var $body;
        var $multipart;
        var $mime;
        var $html;
        var $html_text;
        var $html_images = array();
        var $cids = array();
        var $do_html;
        var $parts = array();

/***************************************
** Constructor function. Sets the headers
** if supplied.
***************************************/
        function html_mime_mail($headers =  ''){
                $this->headers = $headers;
        }

/***************************************
** Adds a html part to the mail.
** Also replaces image names with
** content-id's.
***************************************/
        function add_html($html, $text){
                $this->do_html = 1;
                $this->html = $html;
                $this->html_text = $text;
                if(is_array($this->html_images) AND count($this->html_images) > 0){
                 /*      for($i=0; $i<count($this->html_images); $i++){
                                $this->html = ereg_replace($this->html_images[$i]['name'], 'cid:'.$this->html_images[$i]['cid'], $this->html);
                        }
        */
                }
        }

/***************************************
** Builds html part of email.
***************************************/
        function build_html($orig_boundary){
                $sec_boundary =  '=_'.md5(uniqid(time()));
                $thr_boundary =  '=_'.md5(uniqid(time()));

                if(count($this->html_images) == 0){
                        $this->multipart.=  '--'.$orig_boundary. "\n";
                        $this->multipart.=  'Content-Type: multipart/alternative;'.chr(10).chr(9). 'boundary="'.$sec_boundary. "\"\n\n\n";

// ttj added below
                        $this->multipart.=  '--'.$thr_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/plain'. "\n\n";
                        $this->multipart.= $this->html_text. "\n\n";
                        $this->multipart.=  '--'.$thr_boundary. "--\n\n";
// ttj added above
                        $this->multipart.=  '--'.$sec_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/plain'. "\n";
                        $this->multipart.=  'Content-Transfer-Encoding: base64'. "\n\n";
                        $this->multipart.= chunk_split(base64_encode($this->html_text)). "\n\n";
// ttj added below
                        $this->multipart.=  '--'.$thr_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/html'. "\n\n";
                        $this->multipart.= $this->html. "\n\n";
                        $this->multipart.=  '--'.$thr_boundary. "--\n\n";
// ttj added above

                        $this->multipart.=  '--'.$sec_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/html'. "\n";
                        $this->multipart.=  'Content-Transfer-Encoding: base64'. "\n\n";
                        $this->multipart.= chunk_split(base64_encode($this->html)). "\n\n";
                        $this->multipart.=  '--'.$sec_boundary. "--\n\n";
                }else{
                        $this->multipart.=  '--'.$orig_boundary. "\n";
                        $this->multipart.=  'Content-Type: multipart/related;'.chr(10).chr(9). 'boundary="'.$sec_boundary. "\"\n\n\n";

                        $this->multipart.=  '--'.$sec_boundary. "\n";
                        $this->multipart.=  'Content-Type: multipart/alternative;'.chr(10).chr(9). 'boundary="'.$thr_boundary. "\"\n\n\n";

                        $this->multipart.=  '--'.$thr_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/plain'. "\n";
                        $this->multipart.=  'Content-Transfer-Encoding: base64'. "\n\n";
                        $this->multipart.= chunk_split(base64_encode($this->html_text)). "\n\n";

// ttj added below
                        $this->multipart.=  '--'.$thr_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/html'. "\n\n";
                        $this->multipart.= $this->html. "\n\n";
                        $this->multipart.=  '--'.$thr_boundary. "--\n\n";
// ttj added above

                        $this->multipart.=  '--'.$thr_boundary. "\n";
                        $this->multipart.=  'Content-Type: text/html'. "\n";
                        $this->multipart.=  'Content-Transfer-Encoding: base64'. "\n\n";
                        $this->multipart.= chunk_split(base64_encode($this->html)). "\n\n";
                        $this->multipart.=  '--'.$thr_boundary. "--\n\n";

                        for($i=0; $i<count($this->html_images); $i++){
                                $this->multipart.=  '--'.$sec_boundary. "\n";
                                $this->build_html_image($i);
                        }

                        $this->multipart.=  "--".$sec_boundary. "--\n\n";
                }
        }
/***************************************
** Adds an image to the list of embedded
** images.
***************************************/
        function add_html_image($file, $name =  '', $c_type= 'application/octet-stream', $location= ''){
                $this->html_images[] = array(  'body' => $file,
                                               'name' => $name,
                                               'c_type' => $c_type,
                           'location' => $location,
                                               'cid' => md5(uniqid(time())) );
        }


/***************************************
** Adds a file to the list of attachments.
***************************************/
        function add_attachment($file, $name =  '', $c_type= 'application/octet-stream'){
                $this->parts[] = array(  'body' => $file,
                                         'name' => $name,
                                         'c_type' => $c_type );
        }

/***************************************
** Builds an embedded image part of an
** html mail.
***************************************/
        function build_html_image($i){
                $this->multipart.=  'Content-Type: '.$this->html_images[$i][ 'c_type'];

                if($this->html_images[$i][ 'name'] !=  '') $this->multipart .=  '; name="'.$this->html_images[$i][ 'name']. "\"\n";
                else $this->multipart .=  "\n";

                $this->multipart.=  'Content-Transfer-Encoding: base64'. "\n";
        $this->multipart.=  'Content-Location:'.$this->html_images[$i][ 'location']. "\n";
                $this->multipart.=  'Content-ID: <'.$this->html_images[$i][ 'cid']. ">\n\n";
                $this->multipart.= chunk_split(base64_encode($this->html_images[$i][ 'body'])). "\n";
        }

/***************************************
** Builds a single part of a multipart
** message.
***************************************/
        function build_part($i){
                $message_part =  '';
                $message_part.=  'Content-Type: '.$this->parts[$i][ 'c_type'];
                if($this->parts[$i][ 'name'] !=  '')
                        $message_part .=  '; name="'.$this->parts[$i][ 'name']. "\"\n";
                else
                        $message_part .=  "\n";

                 // Determine content encoding.
                if($this->parts[$i][ 'c_type'] ==  'text/plain'){
                        $message_part.=  'Content-Transfer-Encoding: base64'. "\n\n";
                        $message_part.= chunk_split(base64_encode($this->parts[$i][ 'body'])). "\n";
                }else{
                        $message_part.=  'Content-Transfer-Encoding: base64'. "\n";
                        $message_part.=  'Content-Disposition: attachment; filename="'.$this->parts[$i][ 'name']. "\"\n\n";
                        $message_part.= chunk_split(base64_encode($this->parts[$i][ 'body'])). "\n";
                }

                return $message_part;
        }

/***************************************
** Builds the multipart message from the
** list ($this->parts).
***************************************/
        function build_message(){
                $boundary =  '=_'.md5(uniqid(time()));

                $this->headers.=  "MIME-Version: 1.0\n";
                $this->headers.=  "Content-Type: multipart/mixed;".chr(10).chr(9). "boundary=\"".$boundary. "\"\n";
                $this->multipart =  '';
//                $this->multipart.= "This is a MIME encoded message.\nCreated by html_mime_mail.class.\nSee http://www.heyes-computing.net/scripts/ for a copy.\n\n";

                if(isset($this->do_html) AND $this->do_html == 1) $this->build_html($boundary);
                if(isset($this->body) AND $this->body !=  '') $this->parts[] = array( 'body' => $this->body,  'name' =>  '',  'c_type' =>  'text/plain');

                for($i=(count($this->parts)-1); $i>=0; $i--){
                        $this->multipart.=  '--'.$boundary. "\n".$this->build_part($i);
                }

                $this->mime = $this->multipart. "--".$boundary. "--\n";
        }

/***************************************
** Sends the mail.
***************************************/
        function send($to_name, $to_addr, $from_name, $from_addr, $subject =  '', $headers =  ''){

                if($to_name !=  '') $to =  '"'.$to_name. '" <'.$to_addr. '>';
                else $to = $to_addr;

                if($from_name !=  '') $from =  '"'.$from_name. '" <'.$from_addr. '>';
                else $from = $from_addr;

                mail($to, $subject, $this->mime,  'From: '.$from. "\n".$headers. "\n".$this->headers);
        }

/***************************************
** Use this method to deliver using direct
** smtp connection. Relies upon Manuel Lemos'
** smtp mail delivery class available at:
** http://phpclasses.upperdesign.com
**
** void smtp_send( string *Name* of smtp object,
**                 string From address,
**                 array  To addresses,
**                 string Subject)
***************************************/
        function smtp_send($smtp_obj, $from_addr, $to_addr, $subject){
                global $$smtp_obj;
                $smtp_obj = $$smtp_obj;

                $this->headers .=  'From: '.$from_addr. "\n";
                $this->headers .=  'Subject: '.$subject. "\n";

                if(substr($this->headers, -2) ==  "\n") $this->headers = substr($this->headers,0,-2);
                $this->headers = explode( "\n", $this->headers);

                $smtp_obj->sendmessage($from_addr, $to_addr, $this->headers, $this->mime);
        }

}  // End of class.
?>