正在阅读：在PHP中用Socket发送电子邮件在PHP中用Socket发送电子邮件

2004-02-14 09:33 出处：PConline 作者：limodou 责任编辑：pjl

邮件发送处理　　下面是真正的秘密了，可要看仔细了。:) -------------------------------------------------------------------------------- 1 function send( $to,$from,$subject,$message) 2 { 3 4 //连接服务器 5 $this->lastact="connect"; 6 7 $this->show_debug("Connect to SMTP server : ".$this->smtp, "out"); 8 $this->fp = fsockopen ( $this->smtp, $this->port ); 9 if ( $this->fp ) 10 { 11 12 set_socket_blocking( $this->fp, true ); 13 $this->lastmessage=fgets($this->fp,512); 14 $this->show_debug($this->lastmessage, "in"); 15 16 if (! ereg ( "^220", $this->lastmessage ) ) 17 { 18 return false; 19 } 20 else 21 { 22 $this->lastact="HELO " . $this->welcome . "\n"; 23 if(!$this->do_command($this->lastact, "250")) 24 { 25 fclose($this->fp); 26 return false; 27 } 28 29 $this->lastact="MAIL FROM: $from" . "\n"; 30 if(!$this->do_command($this->lastact, "250")) 31 { 32 fclose($this->fp); 33 return false; 34 } 35 36 $this->lastact="RCPT TO: $to" . "\n"; 37 if(!$this->do_command($this->lastact, "250")) 38 { 39 fclose($this->fp); 40 return false; 41 } 42 43 //发送正文 44 $this->lastact="DATA\n"; 45 if(!$this->do_command($this->lastact, "354")) 46 { 47 fclose($this->fp); 48 return false; 49 } 50 51 //处理Subject头 52 $head="Subject: $subject\n"; 53 if(!empty($subject) && !ereg($head, $message)) 54 { 55 $message = $head.$message; 56 } 57 58 //处理From头 59 $head="From: $from\n"; 60 if(!empty($from) && !ereg($head, $message)) 61 { 62 $message = $head.$message; 63 } 64 65 //处理To头 66 $head="To: $to\n"; 67 if(!empty($to) && !ereg($head, $message)) 68 { 69 $message = $head.$message; 70 } 71 72 //加上结束串 73 if(!ereg("\n\.\n", $message)) 74 $message .= "\n.\n"; 75 $this->show_debug($message, "out"); 76 fputs($this->fp, $message); 77 78 $this->lastact="QUIT\n"; 79 if(!$this->do_command($this->lastact, "250")) 80 { 81 fclose($this->fp); 82 return false; 83 } 84 } 85 return true; 86 } 87 else 88 { 89 $this->show_debug("Connect failed!", "in"); 90 return false; 91 } 92 } -------------------------------------------------------------------------------- 　　有些意思很清楚的我就不说了。　　这个函数一共有四个参数，分别是$to表示收信人，$from表示发信人，$subject表求邮件主题和$message表示邮件体。如果处理成功则返回true，失败则返回false。第8行，连接邮件服务器，如果成功响应码应为220。第12行，设置阻塞模式，表示信息必须返回才能继续。详细说明看手册吧。第16行，判断响应码是否为220，如果是，则继续处理，否则出错返回。第22-27行，处理HELO指令，期望响应码为250。第29-34行，处理MAIL FROM指令，期望响应码为250。第36-41行，处理RCPT TO指令，期望响应码为250。第44-49行，处理DATA指令，期望响应码为354。第51-76行，生成邮件体，并发送。第52-56行，如果$subject不为空，则查找邮件体中是否有主题部分，如果没有，则加上主题部分。第59-63行，如果$from不为空，则查找邮件体中是否有发信人部分，如果没有，则加上发信人部分。第66-70行，如果$to不为空，则查找邮件体中是否有收信人部分，如果没有，则加上收信人部分。第73-74行，查找邮件体是否有了结束行，如果没有则加上邮件体的结束行(以"."作为单独的一行的特殊行)。第76行，发送邮件体。第78-83行，执行QUIT结否与服务器的连接，期望响应码为250。第85行，返回处理成功标志(true)。第81-91行，与服务器连接失败的处理。　以上为整个send_mail类的实现，应该不是很难的。