Как вывести строку в файл в формате DOS866

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Dimon111
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 154
Зарегистрирован: 28.01.2008 (Пн) 22:11

Как вывести строку в файл в формате DOS866

Сообщение Dimon111 » 13.02.2008 (Ср) 15:09

Строка
Код: Выделить всё
Print #1, "C:\Progra~1\7-Zip\7zg.exe  A " + Kstr + " " + Kstr + "\" + Chr(13) + Chr(10)


Выводит в файл текст Kstr в формате W1251. Как изменить на DOS866 ??

Спасибо.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 13.02.2008 (Ср) 16:21

CharToOEM
Lasciate ogni speranza, voi ch'entrate.

Dimon111
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 154
Зарегистрирован: 28.01.2008 (Пн) 22:11

Сообщение Dimon111 » 13.02.2008 (Ср) 16:49

Но есть же

Tmp=StrConv(B,vbUnicode)

В юникод есть, а в оем?

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 13.02.2008 (Ср) 16:52

Dimon111
Разработчики VB посчитали, что конвертирование в cp866 никогда не понадобится VB-программисту и не наделили StrConv такой возможностью.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

Dimon111
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 154
Зарегистрирован: 28.01.2008 (Пн) 22:11

Сообщение Dimon111 » 13.02.2008 (Ср) 17:15

Понял. Придется изучать CharToOEM.


Вернуться в Visual Basic 1–6

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

Сейчас этот форум просматривают: Google-бот и гости: 116

    TopList