Vb.net 上传到ftp服务器上的文件没有'；不要复制完整的内容

我使用netftp在ftp服务器上上传一个文件，下面的示例上传一个文件。我的文件已在服务器上创建，但仍为空。我的代码如下

Sub BeginOpenWriteCallback(ar As IAsyncResult)
        Dim conn As FtpClient = TryCast(ar.AsyncState, FtpClient)
        Dim istream As Stream = Nothing, ostream As Stream = Nothing
        Dim buf As Byte() = New Byte(8192) {}
        Dim read As Integer
        Dim input = Server.MapPath("../UploadedMedia/5.mp4")
        Try
            If conn Is Nothing Then
                Throw New InvalidOperationException("The FtpControlConnection object is null!")
            End If



            istream = New FileStream(input, FileMode.Open, FileAccess.Read)



            While ((read = istream.Read(buf, 0, buf.Length)) > 0)
                ostream.Write(buf, 0, read)

            End While

            ostream = conn.EndOpenWrite(ar)

        Catch ex As Exception
            Console.WriteLine(ex.ToString())
        Finally
            If istream IsNot Nothing Then
                istream.Close()
            End If

            If ostream IsNot Nothing Then
                ostream.Close()
            End If

            m_reset.[Set]()
        End Try
    End Sub

---

请帮忙。谢谢

我在使用ftp4j时遇到了类似的问题。我上传了文件到服务器，但上传的文件大小有点不同。 解决方案是一种变速器。 有ascii码和二进制码，您必须选择正确的传输类型。 我建议在你的图书馆文档中搜索