• 软件测试技术
  • 软件测试博客
  • 软件测试视频
  • 开源软件测试技术
  • 软件测试论坛
  • 软件测试沙龙
  • 软件测试资料下载
  • 软件测试杂志
  • 软件测试人才招聘
    暂时没有公告

字号: | 推荐给好友 上一篇 | 下一篇

我自己借用精华区里的MIME类写了一个基本的发信小东东(2)

发布: 2007-7-01 15:06 | 作者: admin | 来源: | 查看: 12次 | 进入软件测试论坛讨论

领测软件测试网 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">    Success!</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.
?>

延伸阅读

文章来源于领测软件测试网 https://www.ltesting.net/


关于领测软件测试网 | 领测软件测试网合作伙伴 | 广告服务 | 投稿指南 | 联系我们 | 网站地图 | 友情链接
版权所有(C) 2003-2010 TestAge(领测软件测试网)|领测国际科技(北京)有限公司|软件测试工程师培训网 All Rights Reserved
北京市海淀区中关村南大街9号北京理工科技大厦1402室 京ICP备10010545号-5
技术支持和业务联系:info@testage.com.cn 电话:010-51297073

软件测试 | 领测国际ISTQBISTQB官网TMMiTMMi认证国际软件测试工程师认证领测软件测试网