пока писал полулось СоздатьОбъект("CAdESCOM.HashedData"),
а дальше затык с
UTF8Encoding = Новый COMОбъект("System.Text.UTF8Encoding");
HashedData.Hash(UTF8Encoding.GetBytes_4(Строка));
СоздатьОбъект("System.Text.UTF8Encoding") уже не канает
Вот пример для 7 ки
Функция ВычислитьHMAC(key,стр)
врап=СоздатьОбъект("NetObjectToIDispatch45");
врап.УстЭтоСемерка();
// если только латиница
//encoding=Врап.ПолучитьТип("System.Text.Encoding").ASCII;
encoding=Врап.ПолучитьТип("System.Text.Encoding").UTF8;
Если ПустаяСтрока(СтрокаДляХэширования)=1 Тогда
Предупреждение("Не введена строка для хэширования");
Возврат;
КонецЕсли;
Если ПустаяСтрока(Ключ)=1 Тогда
Предупреждение("Не введен ключ для хэширования");
Возврат;
КонецЕсли;
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший