FileInfo.Length 始终显示文件总大小，而不是实际的当前大小

Question

我正在尝试使用 File.Copy([FileName]) 命令监视大文件复制过程的进度（无需自己手动复制数据字节）。

所以我想做的是获取正在复制的文件的长度，并将其与目标文件的长度进行比较。这会让我对复制进度有一个很好的了解。

唯一的问题是目标文件上的 FileInfo.Length 属性返回正在复制的文件的总大小，而不是磁盘上文件的实际大小。还有其他方法可以获取这些数据吗？ 谢谢， 克里斯

---

EDIT (Moved from below -- was submitted as an answer by OP)

我查看了链接，这根本不是我想要的。我只想在文件很大时显示文件复制的进度（复制时间超过 3 秒）。

大多数文件大约需要 1/4 秒，但也有一些文件大约有 600+MB，通过网络复制需要一些时间。

我所需要的只是如何获取目标目录中部分复制的文件的实际文件大小。

（由于我在这里没有帐户，所以它不允许我发布对您对我的问题的答复的答复，因此它被显示为答案，即使它不是。）

谢谢，克里斯

Answer 1

您可以使用流自行执行复制操作并显示进度：

    Const SOURCE_FILEPATH = "C:\TEMP\GameOfThrones.png"
    Const DEST_FILEPATH = "C:\GameOfThrones.png"

    Const BUFFER_SIZE As Integer = 32767
    If System.IO.File.Exists(DEST_FILEPATH) Then System.IO.File.Delete(DEST_FILEPATH)
    Using inStream As New System.IO.FileStream(SOURCE_FILEPATH, IO.FileMode.Open, IO.FileAccess.Read)
        Dim offset As Integer = 0
        Dim count As Integer = BUFFER_SIZE
        Using outStream As New System.IO.FileStream(DEST_FILEPATH, IO.FileMode.Create, IO.FileAccess.Write)
            Do While offset + count <= inStream.Length AndAlso offset <> inStream.Length
                Dim buffer(count) As Byte
                inStream.Seek(offset, IO.SeekOrigin.Begin)
                inStream.Read(buffer, 0, buffer.Length - 1)
                outStream.Seek(outStream.Length, IO.SeekOrigin.Begin)
                outStream.Write(buffer, 0, buffer.Length - 1)
                offset += count
                If count + offset > inStream.Length Then
                    count = inStream.Length - offset
                Else
                    count = BUFFER_SIZE
                End If
                System.Console.WriteLine((offset / inStream.Length) * 100 & "% complete")
            Loop
        End Using
    End Using