電子郵件attatchment風起來0,0 kb

Question

我做了一個emailng函數和所有作品像魅力LOCALLY。 但是，當我把它帶到網絡服務器電子郵件attatchment是0,0kb ..我覺得它與流有關，但我沒有得到任何錯誤信息，所以很難說。 我無法使用我的服務器上的流？ 繼承人的代碼：

If FileUpload1.HasFile = True Then 
      Dim tempFileName As String() = FileUpload1.PostedFile.FileName.Split("\"c) 
      Dim emailAttach As New Attachment(FileUpload1.PostedFile.InputStream, tempFileName(tempFileName.Length - 1)) 

      message.Attachments.Add(emailAttach) 
      emailAttach.Dispose() 
     End If 

試了幾件事情，但不能找出爲什麼有一個問題

Answer 1

嘗試以下操作：

message.Attachments.Add(New Attachment(FileUpload1.FileContent, tempFileName(tempFileName.Length - 1), FileFileUpload1.PostedFile.ContentType) 

備註：

1. 我使用FileUpload控件的FileContent屬性（儘管看起來它只是PostedFile.InputStream的別名）。
2. 我正在指定文件的MIME類型（constructor的第三個參數）。

此外，問題可能是因爲您打電話給Dispose方法（根據Reflector）關閉輸入流。