您可能習慣了在ASP程式中使用JMAIL組件收發郵件,Asp.net在System.Web.Mail名稱空間中有一個發送email的內建類,但這僅是cdosys的一個假象。開發人員能使用一個替代的它smtp郵件服務。在這篇文章裡面,我將會展示如何建立一個用於asp.net的功能齊全的smtp郵件服務。
首先,我們建立一個繼承命名空間System.Net.Sockets的TcpClient類的類。TcpClient類提供簡單的方法用於串連,發送,接收網路的資料流。GetStream方法用於建立一個網路流(NetworkStream)。讀和寫網路流(NetworkStream)的方法用於發送資料給遠程主機和從遠程主機接收網路流。
public class ClientConnection : TcpClient
{
private NetworkStream _NetworkStream = null;
private StreamReader _StreamReader = null;
private StreamWriter _StreamWriter = null;
public void Initialise()
{
_NetworkStream = this.GetStream();
_StreamReader = new StreamReader(_NetworkStream,
System.Text.Encoding.Default, false, this.ReceiveBufferSize);
_StreamWriter = new StreamWriter(_NetworkStream,
System.Text.Encoding.Default, this.SendBufferSize);
}
public void Send(string s)
{
_StreamWriter.WriteLine(s);
_StreamWriter.Flush();
}
public string Read()
{
return _StreamReader.ReadLine();
}
}
接下來,我們建立發送郵件出去的類,這個類有幾個屬性去設定關於被發送的郵件的一些資訊。
public string MailServer = "127.0.0.1" ;
public string From = "" ;
public string To = "" ;
public string Body = "" ;
public string Subject = "" ;
和一個發送郵件的方法。這個方法將會用伺服器名和它的連接埠去建立一個串連。指令可以被發送到遠程主機。
public void Send()
{
tcp = new ClientConnection();
tcp.Connect(MailServer,25);
tcp.Initialise();
SendCommandToServer("HELO " + System.Net.Dns.GetHostName());
SendCommandToServer("MAIL FROM: " + From + "\r\n");
SendCommandToServer("RCPT T " + To + "\r\n");
string StrHeaders = "";
StrHeaders += "From: " + From + "\r\n";
StrHeaders += "T " + To + "\r\n";
StrHeaders += "Subject: " + Subject + "\r\n";
StrHeaders += "Content-type: text/plain; charset=\"ISO-8859-1\"" + "\r\n";
SendCommandToServer("DATA\r\n" + StrHeaders);
SendCommandToServer(Body + "\r\n.\r\n");
SendCommandToServer("QUIT\r\n");
}
還有一個私人的送一個指令到本機伺服器的方法。
private void SendCommandToServer(string cmd)
{
tcp.Send(cmd);
Response=tcp.Read();
System.Web.HttpContext.Current.Trace.Warn("Response",Response);
}
現在,這個類基本完成了。開發人員還可以建立錯誤回執和釋放資源(用TcpClient類中的Close()方法)。同樣,這幾個屬性可以被擴充到在郵件中包含更多的資訊。
最後,我們可以在aspx檔案中寫一些發送郵件的代碼。在這個例子中,"localhost"是郵件伺服器。你可以根據情況改變這個,或者可以看我的關於如何設定你的發送郵件的本機伺服器的文章。
<%@ Import Namespace="MyComponents" %>
<script runat="server">
protected void Page_Load(Object Src, EventArgs E)
{
if (IsPostBack)
{
Mail Mailer=new Mail();
Mailer.From=From.Text;
Mailer.To=To.Text;
Mailer.Subject=Subject.Text;
Mailer.Body=Body.Text;
Mailer.MailServer="localhost";
Mailer.Send();
}
}
</script>
技術交流 永無止境