fbpx
  • услуги хостинга 1С в облаке
  • slide microsft
  • slide aida64
  • Печать табличного документа через общую форму печати в УНФ
  • Скрипт установки принтеров Canon LBP на Linux Ubuntu (обновлено)
  • Увеличить ТИЦ
  • Что, еще и место выбирать ?!
  • Создание загрузочной Windows USB-флешки
  • Свич или магнитофон ?
  • Один из старейших компьютеров WITCH продолжает работать.
  • Вход под Администратором на Windows XP
  • Завершение процессов на удаленном компьютере Windows
  • Winamp прекращает свое существование
  • Запуск VMWare ESXi Customizer на несовместимой ОС
  • С днем системного администратора !
  • В сеть просочилась предположительно финальная версия Windows 10
  • 5 неудачных антипиратских решений
  • Немного о глобальных аватарах
  • Dj Tro - For my sole love [2002]
  • Бездонный телефон
  • С Днем Программиста 2017
  • Что нас ждет в грядущих драйверах NVidia 300.**
  • Почему-то камеры постоянно глючат
  • Использование LiveCD для восстановления пароля суперпользователя root в Linux
  • Перезагрузка или завершение работы удаленного компьютера с Windows
  • Китайцы назвали WINDOWS 8 угрозой для страны
  • Стал тормозить SSD ? А у вас есть trim ?
  • Как отключить легкую установку (easy install) в VMWare Workstation
  • Автозагрузка в Windows 10
  • Windows Server 2016 доступна
мая27

Функция хеширования (конвертирования) строки в MD5 для 1С

Троцкий Юрий

Функция хеширования (конвертирования) строки в MD5 для 1С

Готовый код по хешированию (конвертированию) строки в MD5 для 1С

толстый клиент, тонкий клиент

     Что такое MD5 (англ. Message Digest 5) ? Это 128-битный алгоритм хеширования, разработанный профессором Рональдом Л. Ривестом еще в далеком в 1991 году. Но его до сих пор успешно применяют в современных методах хеширования, например для сверки контрольных сумм документов (удостоверение в его неизменном содержимом), хранения паролей, цифровых подписей и много где еще.

     Не смотря на широкое расспространение, готовой функции в 1С нету, поэтому предлагаю вам готовый код ниже:

 

Функция КонвертироватьВМД5 (ТекстОригинал);
	
	
	оMD5 = Новый COMОбъект("System.Security.Cryptography.MD5CryptoServiceProvider");
	оEnc = Новый COMОбъект("System.Text.UTF8Encoding");
	оStr = Новый COMОбъект("System.Text.StringBuilder");
	
	// переводим в байтовый массив 
	Массив = оEnc.GetBytes_4(ТекстОригинал);
	
	// MD5
	Массив = оMD5.ComputeHash_2(Массив);
	
	// переведем обратно из байтового массива в строку
	КолЭлементовМассива = Массив.GetLength();
	
	Для Ит = 0 ПО КолЭлементовМассива - 1 Цикл 
		оStr.AppendFormat("{0:x02}", Массив.GetValue(Ит));
	КонецЦикла;
	
	оMD5 = NULL;
	оEnc = NULL;
	
	Возврат оStr.ToString();
	
КонецФункции

Оставить комментарий

Пожалуйста, войдите, чтобы комментировать.