如何攔截POP3服務器上的郵件消息

Question

我需要一個攔截所有傳入郵件並根據某些規範修改它們的應用程序。 我是一個絕對的新人在此，請詳細:)

Answer 1

試試這個示例代碼

Dim _tcpClient As New TcpClient 
Dim _networkStream As NetworkStream 
Dim _Msg As String 
With _tcpClient 
    .Connect(Me.txtServerIp.Text, Integer.Parse(Me.txtPortNum.Text)) 
    _networkStream = .GetStream 
    Dim sw As New StreamWriter(_networkStream) 
    Dim sr As New StreamReader(_networkStream) 
    If Not CheckError(sr.ReadLine()) Then 
     sw.WriteLine(String.Format("USER {0}", Me.txtUsername.Text)) 
     sw.Flush() 
    End If 

    If Not CheckError(sr.ReadLine()) Then 
     sw.WriteLine(String.Format("PASS {0}", Me.txtPassword.Text)) 
     sw.Flush() 
    End If 

    If Not CheckError(sr.ReadLine()) Then 
     sw.WriteLine("STAT ") 
     sw.Flush() 
    End If 
    _Msg = sr.ReadLine 
    Dim MsgCount As String = _Msg.Split(New String() {" "}, _ 
     StringSplitOptions.RemoveEmptyEntries)(1) 
    If Integer.Parse(Me.lblMsgCount.Text) < Integer.Parse(MsgCount) Then 
     Me.lblMsgCount.Text = MsgCount 
    End If 
    sw.WriteLine("Quit ") 
    sw.Flush() 
    sw.Close() 
    sr.Close() 
    _networkStream.Close() 
    _tcpClient.Close() 
End With 

Answer 2

所有傳入的消息將在未來通過SMTP。

所以，你需要做的1 2件事：

1. 如果您當前的服務器支持它，連接它的SMTP事件，它是到本地預期的用戶才能通過修改消息。

   或

2. 您將需要一個SMTP代理服務，在你真正的SMTP服務器的前面坐。

在SMTP代理中，修改郵件並將其傳遞到您的真實SMTP服務器。