| Вопрос: Русский текст тютю | Добавлено: 23.08.06 11:54 |
Автор вопроса:  yxaxa
|
|
Значицо получаю я последнюю строку файла
Dim fs5 As New IO.StreamReader(strline) chline = fs5.ReadLine While Not chline Is Nothing If Not chline Is Nothing Then chlini = chline End If chline = fs5.ReadLine End While ' и сую на другую форму в листбокс Form5.ListBox1.Items.Add(System.DateTime.Now & " " & strline & " " & chlini) Проблема в следующем: появляется только английская часть текста. Т.е. если последняя строка была "привет privet", то в листбоксе появляется только "privet" Думал можь дело в том что нада текст в другую кодировку перегнать, мучил-мучил разными вариантами чет результата нету. Или я не прально перекодировал(покажите как нада). Или проблема в другом(в чем?) Файл в обчной кодировке (хз какой Ansi чтоли??), ну стандартный блокнот. |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  Viper ICQ: 249094859 Вопросов: 0 Ответов: 310 |
Профиль | | #1 | Добавлено: 23.08.06 12:11 |
| Бред.... особенно код | ||
|
Номер ответа: 2 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #2 | Добавлено: 23.08.06 13:05 |
|
Да, код ужасный...
А проблема - с кодировками. По умолчанию StreamReader использует 7-битную кодировку ASCII, в которой русских символов нет. Вторым параметром конструктора можно задать необходимую кодировку. |
||
|
Номер ответа: 3 Автор ответа: ArtyomРазработчик Вопросов: 130 Ответов: 6602 |
Профиль | | #3 | Добавлено: 23.08.06 14:00 |
|
Подтверждаю, код ужасный.
Юзай My.Computer.FileSystem.ReadToEnd, а то дров наломаешь... Там тоже можно кодировку указать. |
||
Страница: 1 |