Подскажите как выгрузить txt файл в кодировке кирилл windows

Язык Visual Basic на платформе .NET.

Модераторы: Ramzes, Sebas

Vaka
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 04.08.2005 (Чт) 15:58

Подскажите как выгрузить txt файл в кодировке кирилл windows

Сообщение Vaka » 04.08.2005 (Чт) 16:06

Подскажите пожалуста можно ли как нибудь выгрузить txt файл в кодировке кириллицы windows это нужно для обмена с другой программой а то она не понимает кодировку Unicod( UTF- 8 ) и тому подобной зарание всем благодарен :?:

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 04.08.2005 (Чт) 16:36

Создай StreamWriter(filestream, GetEncoding(1251))
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Vaka
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 04.08.2005 (Чт) 15:58

Подскажите как выгрузить txt файл в кодировке кирилл windows

Сообщение Vaka » 08.08.2005 (Пн) 15:15

Что-то до меня не как не дойдёт что не так ?

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim FS As IO.FileStream
FS = New IO.FileStream("c:\15.txt", IO.FileMode.Create)
Dim Sw As IO.StreamWriter
Sw = New IO.StreamWriter(FS)
Dim Encoding As System.Text.Encoding
Sw.Encoding.GetEncoding(1251)
Sw.WriteLine("Один")
Sw.WriteLine("Два")
Sw.WriteLine("Три")
Sw.Close()
FS.Close()

End Sub

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 08.08.2005 (Пн) 16:25

Не так то, что ты используешь не тот конструктор StreamWriter.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Vaka
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 04.08.2005 (Чт) 15:58

Подскажите как выгрузить txt файл в кодировке кирилл windows

Сообщение Vaka » 08.08.2005 (Пн) 23:34

Спасибо за поддержку. Доскрипел до результата :lol:

Sebas
Неуловимый Джо
Неуловимый Джо
Аватара пользователя
 
Сообщения: 3626
Зарегистрирован: 12.02.2002 (Вт) 17:25
Откуда: столько наглости такие вопросы задавать

Сообщение Sebas » 09.08.2005 (Вт) 2:27

io.file.appendText

уже не канает? или 2003 форева?
- Я никогда не понимал, почему они приходят ко мне чтобы умирать?

sebas<-@->mail.ru


Вернуться в Visual Basic .NET

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 7

    TopList