воскресенье, 19 января 2014 г.

Генерация пароля в 1С:Предприятие

Простая функция - генератор пароля, состоящего из символов латинского алфавита нижнего и верхнего регистра и цифр

Функция СгенерироватьПароль(КоличествоСимволов)  Экспорт
 
 Пароль = "";
 ГСЧ = Новый ГенераторСлучайныхЧисел();

 Для ид = 1 по КоличествоСимволов Цикл
  Если ид%3 = 0 Тогда
    КодСимвола = ГСЧ.СлучайноеЧисло(97,122);
  ИначеЕсли ид%2 = 0 Тогда
    КодСимвола =  ГСЧ.СлучайноеЧисло(48,57);
  Иначе  
    КодСимвола =  ГСЧ.СлучайноеЧисло(65,90);
  КонецЕсли;
  Пароль = Пароль+Символ(КодСимвола); //
 КонецЦикла;
 
 Возврат Пароль;  
КонецФункции

Комментариев нет:

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