правильная кодировка внутри файла

[Jan2000]

имеем файл .dat внутри с путями директорий на анг и русском
считываю как

Код: Выделить всё

Dim FileBytes() As Byte
FileBytes = My.Computer.FileSystem.ReadAllBytes(filepath)


соответственно получаю массив байт
Дальше хочу преобразовать полученный путь в байтах в string переменную

Код: Выделить всё

' в цикле пробегаюсь по массиву
Dim StringLetter A s String
StringLetter = Chr(FileBytes(i)))


так вот латинские буквы правильно отображаются, а русские нет
то как выглядит путь внутри файла, если открыть его как .TXT файл E:\ РЎСѓРЅРґСѓРє
"РЎСѓРЅРґСѓРє по нормальному - это "Сундук
Вопрос: как правильно получить русские буквы в Стринговой переменной из вышеуказанного пути?

[Nord777]

Код: Выделить всё

My.Computer.FileSystem.ReadAllText(filepath, System.Text.Encoding.Default)

[Jan2000]

Спасибо! Подошел UTF-8

[Williams]

Или System.Text.Encoding.UTF8.GetString(bytes).

Или Dim mReader As New StreamReader("C:\file.txt", True) - автоопределение кодировки

...или Dim mReader As New StreamReader("C:\file.txt", System.Text.Encoding.UTF8) указывая кодировку вручную.

[Joo]

Или System.Text.Encoding.UTF8.GetString(bytes).

Или Dim mReader As New StreamReader("C:\file.txt", True) - автоопределение кодировки

...или Dim mReader As New StreamReader("C:\file.txt", System.Text.Encoding.UTF8) указывая кодировку вручную.

Автоопределение всегда возвращает UTF8Encoding )) Мы чтобы организовать автоопределение, целую библу писали для Bred.Net