用MIME类写了一个基本的发信小东东_PHP

用MIME类写了一个基本的发信小东东

发表于：2007-07-14来源：作者：点击数：标签：

default.htm html head script language= java script !-- function cookieset(){ d=new Date() d.setFullYear(2001,0,1) document.cookie=sendmailbox=+document.sendmailform.sendmailbox.value + ;expires= + d.toGMTString() alert(设置成功！) } functi

default.htm

<html>
<head>
<script language=javascript>

</script>
<title>我的PHP发信箱</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">

</style>
</head>

<body bgcolor="#FFFFFF" onload=document.sendmailform.receivemailbox.focus()>
<p align="center">欢迎使用我的发信页面</p>
<form method="post" action="sendmail.php4" name=sendmailform enctype="multipart/form-data" onsubmit="return setupdatevalue()">
  <table width="55%" border="0" cellspacing="0" cellpadding="2" align="center" class="smallfont">
    <tr>
      <td width="33%">收信人信箱：</td>
      <td width="67%">
        <input type="text" name="receivemailbox" size="30" maxlength="40">
      </td>
    </tr>
    <tr>
      <td width="33%">发信人信箱：</td>
      <td width="67%">
        <script language=javascript>
            document.write ("<input type='text' name='sendmailbox' size='30' maxlength='40' value='" + readcookie() + "'>")
        </script>
        <input type="button" name="setcookie" value="设为默认发信信箱" onclick=cookieset()>
      </td>
    </tr>
    <tr>
      <td width="33%">主  题：</td>
      <td width="67%">
        <input type="text" name="subject" maxlength="250" size="40">
      </td>
    </tr>
    <tr>
      <td width="33%">附  件：</td>
      <td width="67%">
        <input type="file" name="myfile">
        <input type="hidden" name=update>
      </td>
    </tr>
    <tr>
      <td width="33%" valign="top">正  文：</td>
      <td width="67%">
        <textarea name="bodytext" cols="40" rows="8"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan="2" valign="top">
        <div align="center">
          <input type="submit" name="Submit" value="发送信件">
          <input type="reset" name="reset" value="重新填写">
        </div>
      </td>
    </tr>
  </table>
</form>
</body>
</html>

sendmail.php4

<?
//加载发送附件的类
require('html_mime_mail.inc');

if($update!=""){  //如果带附件

    //上传附件
    if(!file_exists("c:/ftptmp/".$myfile_name)){
        if(copy($myfile,"c:/ftptmp/".$myfile_name)){
            //读取附件
            $attachment = fread($fp = fopen("c:/ftptmp/".$myfile_name, 'r'), filesize($myfile));
            fclose($fp);
            //unlink("c:/ftptmp/".$myfile_name);删掉
        }
        else {
            echo "上传文件失败！";
            exit();
        }
    }
    else{
        echo "文件重名！";
        exit();
    }


    //新建一个类的实例，并加入附件
    $mail = new html_mime_mail();
    $mail->add_attachment($attachment, $myfile_name, 'application/octet-stream');

    /*---------------------这段示范了如何发HTML信件---------------------------------------
    $filename = 'background.gif';
    $backgrnd = fread($fp = fopen($filename, 'r'), filesize($filename));
    fclose($fp);

    $text = 'This is a test.';
    $html = '<HTML><BODY BACKGROUND="background.gif"><FONT FACE="Verdana, Arial" COLOR="#FF0000">    Suclearcase/" target="_blank" >ccess!</FONT><P></BODY></HTML>';

    $mail->add_html_image($backgrnd, 'background.gif', 'image/gif');
    $mail->add_html($html, $text);
    -------------------------------------------------------------------------------------*/

    //读取正文，将信件封装并发送
    $mail->body=$bodytext;
    $mail->build_message();

    $backvalue=$mail->send(' ',$receivemailbox,' ',$sendmailbox,$subject,' ');

    //发送提示信息
    echo "<script     language=javascript>alert('发信OK，按确定返回！');window.location='default.htm'</script>";
}
else{  //如果不带附件
    $backvalue=mail($receivemailbox,$subject,$bodytext,"From:" . $sendmailbox . "\nReply-To:" . $sendmailbox . "\nX-Mailer: PHP/" . phpversion());

    if ($result) {
        echo "<script language=javascript>alert('发信OK，按确定返回！');window.location='default.htm'</script>";
    }
    else{
        echo "<script language=javascript>backvalue=window.confirm('发信失败！可能是服务器太忙！是否要重发？');if(backvalue){location.reload()}else{window.location='default.htm'}</script>";
    }
}

?>

html_mime_mail.inc 这个类是精华区里有的。我借来一用

<?
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(!is_array($this->html_images)){
$this->multipart.= '--'.$orig_boundary."\r\n";
$this->multipart.= 'Content-Type: multipart/alternative; boundary="'.$sec_boundary."\"\r\n\r\n\r\n";

$this->multipart.= '--'.$sec_boundary."\r\n";
$this->multipart.= 'Content-Type: text/plain'."\r\n";
$this->multipart.= 'Content-Transfer-Encoding: 7bit'."\r\n\r\n";
$this->multipart.= $this->html_text."\r\n\r\n";

$this->multipart.= '--'.$sec_boundary."\r\n";
$this->multipart.= 'Content-Type: text/html'."\r\n";
$this->multipart.= 'Content-Transfer-Encoding: 7bit'."\r\n\r\n";
$this->multipart.= $this->html."\r\n\r\n";
$this->multipart.= '--'.$sec_boundary."--\r\n\r\n";
}else{
$this->multipart.= '--'.$orig_boundary."\r\n";
$this->multipart.= 'Content-Type: multipart/related; boundary="'.$sec_boundary."\"\r\n\r\n\r\n";

$this->multipart.= '--'.$sec_boundary."\r\n";
$this->multipart.= 'Content-Type: multipart/alternative; boundary="'.$thr_boundary."\"\r\n\r\n\r\n";

$this->multipart.= '--'.$thr_boundary."\r\n";
$this->multipart.= 'Content-Type: text/plain'."\r\n";
$this->multipart.= 'Content-Transfer-Encoding: 7bit'."\r\n\r\n";
$this->multipart.= $this->html_text."\r\n\r\n";

$this->multipart.= '--'.$thr_boundary."\r\n";
$this->multipart.= 'Content-Type: text/html'."\r\n";
$this->multipart.= 'Content-Transfer-Encoding: 7bit'."\r\n\r\n";
$this->multipart.= $this->html."\r\n\r\n";
$this->multipart.= '--'.$thr_boundary."--\r\n\r\n";

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

$this->multipart.= "--".$sec_boundary."--\r\n\r\n";
}
}
/***************************************
** Adds an image to the list of embedded
** images.
***************************************/
function add_html_image($file, $name = '', $c_type='application/octet-stream'){
$this->html_images[] = array( 'body' => $file,
'name' => $name,
'c_type' => $c_type,
'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']."\"\r\n";
else $this->multipart .= "\r\n";

$this->multipart.= 'Content-ID: <'.$this->html_images[$i]['cid'].">\r\n";
$this->multipart.= 'Content-Transfer-Encoding: base64'."\r\n\r\n";
$this->multipart.= chunk_split(base64_encode($this->html_images[$i]['body']))."\r\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']."\"\r\n";
else
$message_part .= "\r\n";

// Determine content encoding.
if($this->parts[$i]['c_type'] == 'text/plain'){
$message_part.= 'Content-Transfer-Encoding: 7bit'."\r\n\r\n";
$message_part.= $this->parts[$i]['body']."\r\n";
}else{
$message_part.= 'Content-Transfer-Encoding: base64'."\r\n";
$message_part.= 'Content-Disposition: attachment; filename="'.$this->parts[$i]['name']."\"\r\n\r\n";
$message_part.= chunk_split(base64_encode($this->parts[$i]['body']))."\r\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\r\n";
$this->headers.= "Content-Type: multipart/mixed; boundary=\"".$boundary."\"\r\n";
$this->multipart = '';
$this->multipart.= "This is a MIME encoded message.\r\nCreated by html_mime_mail.class.\r\nSee http://www.heyes-computing.net/scripts/ for a copy.\r\n\r\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."\r\n".$this->build_part($i);
}

$this->mime = $this->multipart."--".$boundary."--\r\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;
$this->headers.= 'From: '.$from."\r\n";
//$this->headers.= $headers;
mail($to, $subject, $this->mime, $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,
** array Headers,
** string The body)
***************************************/
function smtp_send($smtp_obj, $from_addr, $to_addr){
global $$smtp_obj;
$smtp_obj = $$smtp_obj;

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

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

} // End of class.
?>

原文转自：http://www.ltesting.net

软件测试 > 测试开发技术 > 软件测试开发语言 > PHP >