кодировка 737 перепутана - PullRequest
0 голосов
/ 02 августа 2011

Я использую VB .Net 2008

Почему мое преобразование из ASCII в 737 (греческий DOS) с командой Encoding.Convert возвращает читаемые символы, а IO.StreamWriter с Encoding.GetEncoding(737) записывает файл с нечитаемыми символами?

Я спрашиваю об этом, потому что хочу отправить данные строк на принтер, который может печатать греческий как 737. Если я отправляю результат Encoding.Covert, я получаю неправильный результат, в то время как если я напишу файл, как указано выше, и скопирую его на принтер, то все в порядке

1 Ответ

0 голосов
/ 15 сентября 2012

Используйте метод GetEncoding

    Dim enc As Encoding = Encoding.GetEncoding(737)

    Dim fs As FileStream
    fs = File.OpenRead("\737dos.txt")

    Dim sr As StreamReader = New StreamReader(fs, enc)
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...