首先，我們創(chuàng)建一個繼承命名空間System.Net.Sockets的TcpClient類的類。TcpClient類提供簡單的方法用于連接，發(fā)送，接收網(wǎng)絡(luò)的數(shù)據(jù)流。GetStream方法用于創(chuàng)建一個網(wǎng)絡(luò)流（NetworkStream）。讀和寫網(wǎng)絡(luò)流（NetworkStream）的方法用于發(fā)送數(shù)據(jù)給遠(yuǎn)程主機(jī)和從遠(yuǎn)程主機(jī)接收網(wǎng)絡(luò)流。
復(fù)制代碼 代碼如下:
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();
}
}
接下來，我們創(chuàng)建發(fā)送郵件出去的類，這個類有幾個屬性去設(shè)置關(guān)于被發(fā)送的郵件的一些信息。
復(fù)制代碼 代碼如下:
public string MailServer = "127.0.0.1" ;
public string From = "" ;
public string To = "" ;
public string Body = "" ;
public string Subject = "" ;
和一個發(fā)送郵件的方法。這個方法將會用服務(wù)器名和它的端口去創(chuàng)建一個連接。指令可以被發(fā)送到遠(yuǎn)程主機(jī)。
復(fù)制代碼 代碼如下:
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 TO: " + To + "\r\n");
string StrHeaders = "";
StrHeaders += "From: " + From + "\r\n";
StrHeaders += "To: " + 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");
}
還有一個私有的送一個指令到本地服務(wù)器的方法。
復(fù)制代碼 代碼如下:
private void SendCommandToServer(string cmd)
{
tcp.Send(cmd);
Response=tcp.Read();
System.Web.HttpContext.Current.Trace.Warn("Response",Response);
}
現(xiàn)在，這個類基本完成了。開發(fā)者還可以建立錯誤回執(zhí)和釋放資源（用TcpClient類中的Close()方法）。同樣，這幾個屬性可以被擴(kuò)展到在郵件中包含更多的信息。
最后，我們可以在aspx文件中寫一些發(fā)送郵件的代碼。在這個例子中，"localhost"是郵件服務(wù)器。你可以根據(jù)情況改變這個，或者可以看我的關(guān)于如何設(shè)置你的發(fā)送郵件的本地服務(wù)器的文章。
復(fù)制代碼 代碼如下:
%@ 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>
下面是完整的代碼。
復(fù)制代碼 代碼如下:
using System.IO;
using System.Net.Sockets;
namespace MyComponents
{
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 class Mail
{
public string MailServer = "127.0.0.1" ;
public string From = "" ;
public string To = "" ;
public string Body = "" ;
public string Subject = "" ;
private ClientConnection tcp=null;
private string Response="";
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 TO: " + To + "\r\n");
string StrHeaders = "";
StrHeaders += "From: " + From + "\r\n";
StrHeaders += "To: " + 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);
}
}
}
您可能感興趣的文章:- Asp.net發(fā)送郵件的兩種方法小結(jié)
- 在asp.NET 中使用SMTP發(fā)送郵件的實(shí)現(xiàn)代碼
- asp.net2.0實(shí)現(xiàn)郵件發(fā)送(測試成功)
- 在ASP.NET2.0中通過Gmail發(fā)送郵件的代碼
- Asp.Net類庫中發(fā)送電子郵件的代碼
- 用ASP.NET做的個性化的郵件發(fā)送系統(tǒng)
- asp.net mvc發(fā)送郵件實(shí)例講解
- ASP.NET MVC 5之郵件服務(wù)器與客戶端
- ASP.NET Core 1.0實(shí)現(xiàn)郵件發(fā)送功能
- asp.net基于windows服務(wù)實(shí)現(xiàn)定時發(fā)送郵件的方法
- ASP.NET郵件發(fā)送system.Net.Mail案例
- asp.net實(shí)現(xiàn)的群發(fā)郵件功能詳解
