在 VB.NET 中重命名文件扩展名

Question

我编写了一个数据排序器，它会为它正在写入的文件写出一个 .build 扩展名，因此当它正在将数据写入特定文件时，没有任何东西会尝试提升它。

最后，我想在程序关闭之前将任何带有 .build 扩展名的内容重命名为 .dat。

 For Each f In outputFiles

        For Each r In TrailerRecords

            ' Set the bill count variable
            If r.VariableField Then
                r.Fields(1) = String.Format("{0:000000}", f.Value)
            End If

            ' Write the trailer record to the output file
            File.AppendAllText(f.Key, r.ToString() & vbLf)
        Next

        ' Rename all.build files to .dat

NEEDS TO GO HERE

        ' Copy each output file to the backup directory
        File.Copy(f.Key, Path.Combine(backupFolder, Path.GetFileName(f.Key)), True)
    Next
End Sub

Answer 1

获取文件并重命名：

Dim auxFile as String
Dim files() As String = IO.Directory.GetFiles(myFolderPath, "*.build")

For Each sFile As String In files
    auxFile = IO.Path.GetFileNameWithoutExtension(sFile) & ".dat"
    My.Computer.FileSystem.RenameFile(sFile, auxFile)
Next

您可以改用 File.Copy() 和 True 的覆盖属性。

查看 MSDN 文档：

• GetFiles
• RenameFile
• Copy
• GetFilenameWithoutExtension