flex使用smtp協議發郵件

從來沒用過flex的socket，今天無聊就寫了個smtp的發郵件小程序，順便複習了下smtp協議，別的不說，直接貼代碼吧。

 

mail.as：

package mail { import flash.events.Event; import flash.events.ProgressEvent; import flash.events.SecurityErrorEvent; import flash.net.Socket; import flash.utils.ByteArray; import mx.controls.Alert; import mx.formatters.DateFormatter; public class Mail { private var socket:Socket; private var isLogin:Boolean = false; private var smtp:String; public function Mail(smtp:String) { initSocket(smtp); } public function initSocket(smtp:String):void { this.smtp = smtp; if(socket==null || !socket.connected) { socket = new Socket(); socket.connect(smtp,25); socket.addEventListener(Event.CONNECT,ConnectionHandler); socket.addEventListener(Event.CLOSE,CloseHandler); socket.addEventListener(ProgressEvent.SOCKET_DATA,ReceiveHandler); socket.addEventListener(SecurityErrorEvent.SECURITY_ERROR,ErrorHandler); } } private function ErrorHandler(evt:SecurityErrorEvent):void { trace("error!"); } public function ConnectionHandler(evt:Event):void { trace("鏈接成功"); } public function CloseHandler(evt:Event):void { isLogin = false; trace("已經從服務器斷開"); } private function ReceiveHandler(evt:Event):void { var msg:String = ""; while(socket.bytesAvailable) { msg += socket.readMultiByte(socket.bytesAvailable,"utf8"); } trace(msg); } public function Send(user:String, pwd:String, mailFrom:String, mailTo:String,subject:String,content:String):void { if(socket==null || !socket.connected) { initSocket(this.smtp); } sendMessage("HELO mail"); if(!isLogin) { sendMessage("AUTH LOGIN"); sendMessage(Base64.encode(user)); sendMessage(Base64.encode(pwd)); isLogin = true; } sendMessage("MAIL FROM: <"+mailFrom+">"); sendMessage("RCPT TO: <"+mailTo+">"); sendMessage("DATA"); var dateFormatter:DateFormatter = new DateFormatter(); dateFormatter.formatString = "yyyy-mm-dd"; sendMessage("Date: "+dateFormatter.format(new Date())); sendMessage("From: "+mailFrom); sendMessage("To: "+mailTo); sendMessage("Content-Type: text/html"); sendMessage("Subject: "+subject); sendMessage(""); sendMessage(""); sendMessage(content); sendMessage("."); } internal function sendMessage(msg:String):void { var message:ByteArray = new ByteArray(); message.writeUTFBytes(msg+"/r/n"); socket.writeBytes(message); socket.flush(); } } }

這裏用戶名，密碼要進行base64編碼，用的是別人寫的一個現成的類，下載地址是：http://dynamicflash.com/downloads/base64/Base64-1.1.0.zip
解壓後直接把src裏面的as文件拷貝到工程下就行了，記得要改包名。

首頁上的測試代碼是：

<mx:Script> <![CDATA[ import mail.Mail; import mail.Base64; import mx.controls.Alert; private var xmlSocket:Socket; private var m:Mail; private function init():void { m = new Mail("smtp.qq.com"); } public function login():void { Alert.show("aa"); m.Send("用戶名","密碼","發送方地址","接受方地址","測試","病毒"); } ]]> </mx:Script>

 執行login就行了，我用的是qq郵箱測試的，可能要打開qq郵箱的smtp功能，在郵箱-->設置-->賬戶裏面就可以更改設置。其他的我沒有測試，測試了的朋友可以告訴我下結果哈^^