Вход | Регистрация

1С:Предприятие :: 1С:Предприятие 7.7 и ранее

v7: Кодировка текста

v7: Кодировка текста
Я
   Denshu
 
26.04.18 - 11:04
В восьмерке есть КодировкаТекста.ANSI а как в семерке?
 
 
   Kigo_Kigo
 
1 - 26.04.18 - 11:06
В семерке она по умолчанию
   Denshu
 
2 - 26.04.18 - 11:09
(1) мне надо в параметры процедуры передать кодировку
Функция Декодировать(Стр, Кодировка) 
шо написать то?
   trdm
 
3 - 26.04.18 - 11:11
(2) Смотря какая кодировка нужна.
   Kigo_Kigo
 
4 - 26.04.18 - 11:14
(2) ну так и дай текст Функция Декодировать(Стр, Кодировка)
   Kigo_Kigo
 
5 - 26.04.18 - 11:14
Мы тебе скажем что туда передать
   trdm
 
6 - 26.04.18 - 11:14
И смотря что за процедура.
   vladko
 
7 - 26.04.18 - 11:14
Кодировка = 0 для ANSI (windows-1251)
Кодировка = 1 для dos-866
   Denshu
 
8 - 26.04.18 - 11:16
(5) ну Ansi надо
   vladko
 
9 - 26.04.18 - 11:18
(8) модуль функции Декодировать() лучше сюда бы вставил, так было бы яснее
   Denshu
 
10 - 26.04.18 - 11:32
Функция Декодировать(Стр, Кодировка)
    ЦДО=СоздатьОбъект("CDO.Message");
    БодиПарт=ЦДО.BodyPart;
    БодиПарт.ContentTransferEncoding = Кодировка;
    Стрим=БодиПарт.GetEncodedContentStream();
    Поля=БодиПарт.Fields;
    Поле=Поля.Item("urn:schemas:mailheader:content-type");
    Поле.Value="text/plain; charset=""windows-1251""";
    Поля.Update();
    Стрим.WriteText(Стр);
    Стрим.Flush();
    Стрим = БодиПарт.GetDecodedContentStream();
    Стрим.charset = "windows-1251";
    Возврат Стрим.ReadText();
КонецФункции    // Декодировать64(Стр)
 
 Рекламное место пустует
   Kigo_Kigo
 
11 - 26.04.18 - 11:51
Я так понял что эта функция декодирут из "ANSI" или UTF-8 в "windows-1251"
   Denshu
 
12 - 26.04.18 - 11:55
(11) нет, это функция должна декодировать из base64
   zwei
 
13 - 26.04.18 - 12:13
   Kigo_Kigo
 
14 - 26.04.18 - 12:28
Ну так попробуй передать "base64" или "Base64"
   Denshu
 
15 - 26.04.18 - 12:52
(14) да попробовал уже, ничего не работает =(
   Kigo_Kigo
 
16 - 26.04.18 - 13:34
Тогда надо юзать другие методы конвертации

Список тем форума
Рекламное место пустует  Рекламное место пустует
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Рекламное место пустует