![]() StatResp = Login(m_sslStream, "QUIT ") & vbCrLfįunction Login(ByVal SslStrem As SslStream, ByVal Server_Command As String) As Stringĭim Read_Stream2 = New StreamReader(SslStrem) StatResp = Login(m_sslStream, "STAT ") & vbCrLf StatResp = Login(m_sslStream, "PASS " & Password) & vbCrLf StatResp = Login(m_sslStream, "USER " & UserName) & vbCrLf Read_Stream = New StreamReader(m_sslStream) 'Read the stream M_sslStream.AuthenticateAsClient(PopHost) 'Auth. M_sslStream = New SslStream(NetworkS_tream) 'Read SSL Stream NetworkS_tream = POP3.GetStream 'Read the stream POP3 = New TcpClient(PopHost, Integer.Parse(TxtPort.Text)) 'If statement is to control the login and logout method : Exception (Already Connected TcpClient) ![]() Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load But it shows +OK 2345,+OK3467 as the email.What I need to do is instead of that display the email subject in the list box. I found the following code that does the work.
0 Comments
Leave a Reply. |