尝试使用 FTPWebRequest 播放上传到 FTP 服务器的视频文件时出错

Error while trying to play a video file uploaded to FTP server using FTPWebRequest

当我尝试使用 .net 代码播放上传到 FTP 服务器的视频时,它显示“无法播放”。项目无法播放,请重新获取内容。 0xc00d36e5'.

以下是我用来将视频文件上传到 FTP 服务器的代码:

Protected Sub btnUpload_Click(sender As Object, e As EventArgs) Handles btnUpload.Click
    Try
        Dim posFile As HttpPostedFile = Nothing
        posFile = MyFile.PostedFile

        Dim strFileName As String = ""
        strFileName = posFile.FileName

        Dim ext As String = ""
        Dim fileName As String = ""

        ext = System.IO.Path.GetExtension(strFileName)
        fileName = "Vid_" + Now().ToString("yyyyMMddHHmmsss") & ext

        If MyFile.PostedFile.FileName = "" Then
            lblMsg.Text = "Please select a file to upload."
            lblMsg.Visible = True
            lblMsg.CssClass = "error"
        Else
            Dim fileBytes As Byte() = Nothing
            Using fileStream As New StreamReader(posFile.InputStream)
                fileBytes = Encoding.UTF8.GetBytes(fileStream.ReadToEnd())
                fileStream.Close()
            End Using

            Try
                Dim ftp As String = System.Configuration.ConfigurationManager.AppSettings("FtpMediaServerURL") //ftp://www.server.com

                Dim ftpFolder As String = "/media/"

                Dim request As FtpWebRequest = DirectCast(WebRequest.Create(ftp & ftpFolder & fileName), FtpWebRequest)
                request.Method = WebRequestMethods.Ftp.UploadFile

                request.Credentials = New NetworkCredential(System.Configuration.ConfigurationManager.AppSettings("FtpMediaServerUserName"), System.Configuration.ConfigurationManager.AppSettings("FtpMediaServerPassword"))
                request.ContentLength = fileBytes.Length
                request.UsePassive = True
                request.KeepAlive = False
                request.UseBinary = True
                request.ServicePoint.ConnectionLimit = fileBytes.Length
                request.EnableSsl = False

                Using requestStream As Stream = request.GetRequestStream()
                    requestStream.Write(fileBytes, 0, fileBytes.Length)
                    requestStream.Close()
                End Using

                Dim response As FtpWebResponse = DirectCast(request.GetResponse(), FtpWebResponse)
                response.Close()

                lblMsg.Text = "Your file has been uploaded successfully."
                lblMsg.Visible = True
                lblMsg.CssClass = "confirmation"

            Catch ex As Exception
                lblMsg.Text = "An Error occured while uploading your file. Please try again."
                lblMsg.Visible = True
                lblMsg.CssClass = "error"
            End Try
        End If
    Catch ex As Exception
       //Handle Exception
    End Try
End Sub

任何人都可以指出我做错了什么或者我遗漏了什么吗?

已解决此问题! 我没有将视频文件直接上传到 FTP 服务器,而是将视频上传到网站服务器上的某个临时位置,然后使用 [=10] 将其传输到 FTP 服务器=].