此主題討論共計 2 篇文章。
| U.F.O | 僅瀏覽本文 | 回覆 | 回信 | 轉寄 | |
|---|---|---|---|
| 我是用VS2008 asp.net vb想寫一個webmail但遇到一些問題 下面的程式能抓出整封mail,但不太了解如何截取想要的寄件者,收件者,主旨,本文,並且參考了璉璉大大的一些文章,也不太了解如何運用璉璉大大分享的strtool來做解碼,真的不知道要如何運用T_T.. Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Dim serverMessage As String Dim tcpC As New TcpClient() Try tcpC.Connect("mail.server.com", 995) Catch ex As Exception Response.Write("Error connecting to host: " & ex.Message & " - Please check your details and try again") Response.End() End Try Dim sslstream As SslStream = New SslStream(tcpC.GetStream(), False) sslstream.AuthenticateAsClient("mis-mail.ingrasys.com") Dim sw As StreamWriter = New StreamWriter(sslstream) Dim reader As StreamReader = New StreamReader(sslstream) sw.WriteLine("USER xxxx") sw.Flush() sw.WriteLine("PASS xxxx") sw.Flush() sw.WriteLine("STAT") sw.Flush() sw.WriteLine("RETR 1") sw.Flush() sw.WriteLine("Quit") sw.Flush() serverMessage = ReadMessage(sslstream) tcpC.Close() Me.Label1.Text = Replace(serverMessage, vbCrLf, "<br>") End Sub Shared Function ReadMessage(ByVal sslStream As SslStream) As String Dim buffer(2048) As Byte Dim messageData As StringBuilder = New StringBuilder Dim bytes As Integer = -1 Do bytes = sslStream.Read(buffer, 0, buffer.Length) Dim decoder As Decoder = Encoding.ASCII.GetDecoder Dim chars(decoder.GetCharCount(buffer, 0, bytes)) As Char decoder.GetChars(buffer, 0, bytes, chars, 0) messageData.Append(chars) Loop While Not (bytes = 0) Return messageData.ToString End Function -- ASPNET News Reader http://tlcheng.twbbs.org/News/Reader.aspx RSS 2.0 http://tlcheng.twbbs.org/News/rss2.aspx?Action=List&Newsgroup=microsoft.public.tw.dotnet.framework.aspnet | |||
| 璉璉 | 僅瀏覽本文 | 回覆 | 回信 | 轉寄 | |
| 我看到這篇已有人回應,你並未接續討論: http://social.msdn.microsoft.com/Forums/zh-TW/236/thread/c9a215c4-24a1-42e7-81ff-7e7524a31145 ==> 本文由 "U.F.O <someone@microsoft.com>" [系統略除,原始全文請點選瀏覽本文] -- 風禹科技驗證有限公司 ASP.NET Web News Reader 0.2.8 UTF-8 Beta 網站地圖 http://tlcheng.twbbs.org/wwwmap.htm 流域防洪/區域水資源/徐昇網/玫瑰圖/語音通訊 文章與程式 Basic/Fortran/Windows API/.Net/輔助說明檔 原始碼、文章與討論 微軟程式設計、系統管理使用新技術論壇討論區,網友回覆後即時簡訊、電子郵件通知: MSDN: http://social.msdn.microsoft.com/Forums/zh-TW/categories/ TechNet: http://social.technet.microsoft.com/Forums/zh-TW/categories/ -- ASPNET News Reader http://tlcheng.twbbs.org/News/Reader.aspx RSS 2.0 http://tlcheng.twbbs.org/News/rss2.aspx?Action=List&Newsgroup=microsoft.public.tw.dotnet.framework.aspnet | |||
.Net 原始碼 | ASP.NET News Reader Beta 0.2.9
2007/06/21 由於微軟新聞伺服器移除多數新聞群組 (newsgroup),目前遭移除之群組暫時改為隱藏純瀏覽,若狀況已定案時,將會將隱藏中的群組重新調整。[討論]