1. 程式人生 > >SMTP判斷郵箱是否存在,檢查email地…

SMTP判斷郵箱是否存在,檢查email地…

判斷一個Email是否存在的類 ,現在VB程式碼真的太少了,C#原版弄過來吧,具體錄下,反正編譯後的類,vb.net也是可以直接引用的嘛,要不就自己轉換一下程式碼。

在以往的程式設計中,比如編寫使用者的資料時,有時需要確認使用者輸入的Email是否真實有效,以前我們最多隻能做到驗證Email是否包含了某些特殊的字元,比如"@",".",".com"等,做到的只是判斷了Email的合法性,證明使用者填寫的Email格式是正確的,但是這個Email是否真正的存在於網路中,則沒有辦法。 
 首先需要大家瞭解一下SMTP協議。 
1.SMTP是工作在兩種情況下:一是電子郵件從客戶機傳輸到伺服器;二是從某一個伺服器傳輸到另一個 
  伺服器 
2.SMTP是個請求/響應協議,命令和響應都是基於ASCII文字,並以CR和LF符結束。響應包括一個表示返  
  回狀態的三位數字程式碼 
3.SMTP在TCP協議25號埠監聽連線請求 
4.連線和傳送過程 
SMTP協議說複雜也不復雜(明明帶有“簡單”這個詞嘛),說簡單如果你懂得Sock。不過現在只是我們利用的就是第一條中說的,從客戶機傳輸到伺服器,當我們向一臺伺服器傳送郵件時,郵件伺服器會首先驗證郵件傳送地址是否真的存在於本伺服器上。 
操作的步驟如下: 
連線伺服器的25埠(如果沒有郵件服務,連了也是白連) 
傳送helo問候 
傳送mail from命令,如果返回250表示正確可以,連線本伺服器,否則則表示伺服器需要傳送人驗證。 
傳送rcpt to命令,如果返回250表示則Email存在 
傳送quit命令,退出連線 
下面我們就來操作這個流程: 
首先看看頁面構架: 
<b>普通的Email驗證</b> 
<form runat="server"> 
<table boder="#6699FF"> 
<tr><td colspan="2" align="center" ><asp:Label id="lblMsgShow" ForeColor="red" runat="server" /></td></tr> 
<tr><td>需要驗證的Email地址:</td><td><asp:TextBox id="tbEmail" runat="server" /></td></tr> 
<tr><td>郵件SMTP伺服器:</td><td><asp:TextBox id="tbServer" runat="server" /></td></tr> 
<tr><td>SMTP埠:</td><td><asp:TextBox id="tbPort" Text="25" runat="server" /></td></tr> 
<tr><td colspan="2" ><asp:Button id="btnValidate" Text="驗證" OnClick="Validate_Email" runat="server" /></td></tr> 
</table> 
<b>驗證過程展示:</b> 
<asp:Panel id="ShowPro" runat="server" /> 
</form> 
Button控制元件的點選將激發Valiate_Email事件,所有主程式操作全是在這個事件中完成,下面就來具體講解本事件處理中的程式碼。 
關於TCP連線的東東,我就不想再重複了。。請大家自己去看我以前的文章: 
string strEmail,strServer; 
int intPort; 
strEmail = tbEmail.Text; 
strServer = tbServer.Text; 
intPort = Int32.Parse(tbPort.Text); file://預設埠是25

TcpClient tcpc = new TcpClient(); 
伺服器等資訊來自於使用者輸入,建立與伺服器25埠的連線。

try 

tcpc.Connect(strServer,intPort); 
StreamReader sr = new StreamReader(tcpc.GetStream(),Encoding.Default); 
sr.ReadLine(); 
... 

請注意上面程式碼中兩點:一在beta2中不能再通過判斷返回值的方法來判斷建立的連線是否成功,只能通過捕捉錯誤例外的方法判斷;二在開啟連線,使用Stream讀取時,必須有一個sr.ReadLine,一行是伺服器的歡迎資訊加版本資訊。

接下來就是按照上面所說的步驟來完成操作:

file://寫入HELO命令 
if(OperaStream(tcpc,"HELOhttp://www.webjx.com") != "250") 

lblMsgShow.Text = "HELO 命令不能完成,本埠可能並非提供SMTP服務"; 
OperaStream(tcpc,"QUIT"); 
return; 

file://寫入Mail From命令 
if(OperaStream(tcpc,"MAIL FROM: [email protected]") != "250") 

lblMsgShow.Text = "MAIL命令不能完成,SMTP服務需要驗證"; 
OperaStream(tcpc,"QUIT"); 
return; 

file://寫入RCPT命令,這是關鍵的一步,後面的引數便是查詢的Email的地址 
if(OperaStream(tcpc,"RCPT TO: "+strEmail) != "250") 

lblMsgShow.Text = strEmail + "此郵件地址並非有效"; 
OperaStream(tcpc,"QUIT"); 
return; 

else 

lblMsgShow.Text = strEmail + "是一個合法有效的郵件地址"; 
OperaStream(tcpc,"QUIT"); 
return; 

Helo命令後面的主機名,在某些郵件伺服器中不需要比如Imail,但是還是寫上好,當然你也可以亂寫騙伺服器,不過一般來說伺服器都能檢查出來。

其中OperaStrem是我們是自定義的函式,用於操作連線流:

public string OperaStream(TcpClient tcpc,string strCmd) 

Stream TcpStream; 
strCmd = strCmd + "\r\n"; file://加入換行符 
TcpStream = tcpc.GetStream(); 
byte[] bWrite = Encoding.Default.GetBytes(strCmd.ToCharArray()); 
TcpStream.Write(bWrite,0,bWrite.Length); 
StreamReader sr = new StreamReader(tcpc.GetStream(),Encoding.Default); 
string rl = sr.ReadLine(); 
string sp = rl.Substring(0,3); 
ShowPro.Controls.Add(new LiteralControl("執行命令:<font color=red>"+strCmd+"</font><br/>返回資料:"+rl+"<br/>"));
return sp; 

此函式的返回值是流的資訊程式碼,用於判斷操作是否成功,250表示成功,550表示只能適用於本地郵件,也就是說發件人必須是該伺服器上的使用者,比如在連線smtp.163.net,就必須擁有一個真實有效的163.net帳號,這種做法是伺服器防止外人使用服務傳送垃圾郵件