vb.net - 将文件编码为 ascii 的替代方法

Question

我试图找到将 UTF-8 编码为 ASCII 的替代方法。以下方法有效，但将这个 486kb 文件编码为 ASCII 需要 1 分 40 秒

For Each foundFile As String In My.Computer.FileSystem.ReadAllText(My.Settings.TempFile)
        foundFile = foundFile
        My.Computer.FileSystem.WriteAllText(My.Settings.DefaultOutput, foundFile, True, System.Text.Encoding.ASCII)
    Next

如果有人能告诉我比上述方法更快的方法，我将不胜感激。

谢谢

Answer 1

ReadAllText返回一个简单的String，所以你正在做的是遍历该字符串中的每个字符，这会很慢。

相反，只是做

Dim fileText As String = My.Computer.FileSystem.ReadAllText(My.Settings.TempFile)
My.Computer.FileSystem.WriteAllText(My.Settings.DefaultOutput, fileText, True, System.Text.Encoding.ASCII)