PHP收发邮件的一个程序.docx

1、PHP收发邮件的一个程序PHP“收发”邮件的一个程序 Socket = fsockopen($server, $port); if ($this-Socket Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return false; return true; function pop3_user

2、($user) if ($this-Socket Socket, USER $this-userrn); $this-Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return false; return true; function pop3_pass( $pass) fputs($this-

3、Socket, PASS $passrn); $this-Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return 0; return 1; function pop3_stat() fputs($this-Socket, STATrn); $this-Line = fgets($this-S

4、ocket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return 0; if (!eregi( +OK (.*) (.*), $this-Line, $regs) return 0; return $regs1; function pop3_list() fputs($this-Socket, LISTrn); $this-Line = f

5、gets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return 0; $i = 0; while (substr($this-Line = fgets($this-Socket, 1024), 0, 1) .) $articles$i = $this-Line; $i+; $articles count = $i;

6、 return $articles; function pop3_retr($nr) fputs($this-Socket, RETR $nrrn); $this-Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return 0; while (substr($this-Line = fgets(

7、$this-Socket, 1024), 0, 1) .) $data$i = $this-Line; $i+; $data count = $i; return $data; function pop3_dele( $nr) fputs($this-Socket, DELE $nrrn); $this-Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if

8、($this-Status LASTRESULT +) return 0; return 1; function pop3_quit() fputs($this-Socket, QUITrn); $this-Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT +) return 0; return 1; c

9、lass Smtp var $Subject; &n bsp; / string the email#s subject var $FromName; / string sender#s name (opt) var $ToName; / string recipient#s name (opt) var $Body; / string body copy var $Attachment; / attachment (optional) var $AttachmentType; var $Socket; var $Line; var $Status; function Smtp($Server

10、 = localhost,$Port = SmtpPort) return $this-Open($Server, $Port); function SmtpMail($FromEmail, $FromName, $ToEmail, $ToName, $Subject, $Body, $Attachment=null, $AttachmentType= TEXT) $this-Subject = $Subject; $this-ToName = $ToName; $this-FromName = $FromName; $this-Body = $Body; $this-Attachment =

11、 $Attachment; $this-AttachmentType = $AttachmentType; if ($this-Helo() = false) return false; if ($this-MailFrom($FromEmail) = false) return false; if ($this-RcptTo($ToEmail) = false) return false; if ($this-Body() = false) return false; if ($this-Quit() = false) return false; function Open($Server,

12、 $Port) $this-Socket = fsockopen($Server, $Port); if ($this-Socket Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 2) return false; return true; function Helo() if (fputs($this

13、-Socket, helorn) Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 2) return false; return true; function Ehlo() /* Well, let#s use helo for now. Until we need the extra func#s U

14、nk */ if(fputs($this-Socket, helo localhostrn)Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 2) return false; return true; function MailFrom($FromEmail) if (fputs($this-Socket

15、, MAIL FROM: rn)Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 2) return false; return true; function RcptTo($ToEmail) if(fputs($this-Socket, RCPT TO: rn)Line = fgets($this-So

16、cket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 2) return false; return true; function Body() $FileSize = 0; $Attachment = null; $fp = null; $buffer = sprintf( From: %srnTo:%srnSubject:%srn, $this-

17、FromName, $this-ToName, $this-Subject); if(fputs($this-Socket, DATArn)Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this-Line, 0, 1024); if ($this-Status LASTRESULT 3) return false; if(fputs($this-Socket, $buffer)Attachment

18、 = null) if(fputs($this-Socket, MIME-Version: 1.0rnContent-Type: text/plain; charset=ISO-8859-1rnContent-Transfer-Encoding: 7bitrnrn)Socket, $this-Bodyrnrn)Socket, .rn)Line = fgets($this-Socket, 1024); if (substr($this-Line, 0, 1) 2) return false; else return true; else if(fputs($this-Socket, MIME-V

19、ersion: 1.0rnContent-Type: multipart/mixed; boundary=-=_NextPart_000_01BCFA61.A3697360rn. Content-Transfer-Encoding: 7bitrnrn. This is a multi-part message in MIME format.rn. rn-=_NextPart_000_01BCFA61.A3697360rn. Content-Type: text/plain; charset=ISO-8859-1rn. Content-Transfer-Encoding: 7bitrn. rn)

20、Socket, $this-Bodyrnrn)Socket, rn-=_NextPart_000_01BCFA61.A3697360rn)Attachment); if ($FileSize = false) return false; if ($fp = fopen($this-Attachment, r)= false) return false; else $Attachment = fread($fp,$FileSize); / 如果没有附件的目录 if ($AttachName = strrchr($this-Attachment, #/#) = false) $AttachName

21、 = $this-Attachment; if( fputs($this-Socket, Content-Type: application/octet-stream; rnname=$AttachNamern. Content-Transfer-Encoding: quoted-printablern. Content-Description: $AttachNamern. Content-Disposition: attachment; rntfilename=$AttachNamern. rn)Socket, $Attachment)Socket, rnrn-=_NextPart_000

22、_01BCFA61.A3697360-rn)Socket, .rn)Line = fgets($this-Socket, 1024); if (substr($this-Line, 0, 1) 2) return false; return true; function Quit() if(fputs($this-Socket, QUITrn)Line = fgets($this-Socket, 1024); $this-Status LASTRESULT = substr($this-Line, 0, 1); $this-Status LASTRESULTTXT = substr($this

23、-Line, 0, 1024); if ($this-Status LASTRESULT 2) return 0; return 1; function Close() fclose($this-Socket); /* 怎样使用这个程序的一个示例 $MailTo = new Smtp(); $MailTo-SmtpMail(Davemicro-,Dave Cramer, Davemicro-,David, Test Mail,$MailMessage,service.tab,0); $MailTo-Close(); $MailTo=null; */ /* $pop3 = pop3_open(localhost, 110); if (!$pop3) printf(ERROR Failed to connect to localhostn); return 0; if (!pop3_user($pop3, unk) printf(ERROR Username f