спасибо полдела сделано . согласно примера хеш мы получили, теперь этот хеш нужно закодировать в base64 ( и опять не сходится контрольное значение )
Ответ я так понимаю должен быть 2PRZAyDhNDqRw20UFwZQqPNdaSY=
а получается не правильные данные
Результат = base64_encode( sha1("sha", 1 ) )Код использую
Процедура Encode("Моя строка") //D8 F4 59 03 20 E1 34 3A 91 5B 63 94 17 06 50 A8 F3 5D 69 26
КодировкаФайла = Кодировка;
Если Кодировка = "ANSI" Тогда
КодировкаФайла = КодировкаТекста.ANSI;
ИначеЕсли Кодировка = "OEM" Тогда
КодировкаФайла = КодировкаТекста.OEM;
ИначеЕсли Кодировка = "UTF8" Тогда
КодировкаФайла = КодировкаТекста.UTF8;
ИначеЕсли Кодировка = "UTF16" Тогда
КодировкаФайла = КодировкаТекста.UTF16;
ИначеЕсли Кодировка = "Системная" Тогда
КодировкаФайла = КодировкаТекста.Системная;
КонецЕсли;
ВременныйФайл = ПолучитьИмяВременногоФайла();
Запись = Новый ЗаписьТекста(ВременныйФайл, КодировкаФайла);
Запись.Записать(Моя строка);
Запись.Закрыть();
ДвДанные = Новый ДвоичныеДанные(ВременныйФайл);
Encoded = Base64Строка(ДвДанные);
УдалитьФайлы(ВременныйФайл);
КонецПроцедуры
Игрался с кодировками , нужного результата не достигнуто .