Vb.net 电子邮件附件的大小为0,0 kb

我正在制作一个电子邮件功能，所有的功能都像一个魅力。 但是当我把它放到Web服务器上时，电子邮件附件是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

尝试了几种方法，但无法找出出现问题的原因

请尝试以下方法：

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

备注:

我正在使用FileUpload控件的属性，尽管它似乎只是PostedFile.InputStream的别名。 我正在指定文件的MIME类型，第三个参数是。

---

还有一个问题可能是因为您调用了一个方法，该方法根据Reflector关闭了输入流。

我正在atm机上检查，但遇到了另一个似乎完全随机的错误：S我会给您回复的