1C: Генератор паролей
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 |
Функция ГенерацияСлучайногоПароля(длн) ГСЧ = Новый ГенераторСлучайныхЧисел(ТекущаяУниверсальнаяДатаВМиллисекундах()); СлучайнаяСтрока = ""; Для Сч = 1 по длн Цикл Набор = ГСЧ.СлучайноеЧисло(1,7); Если Набор = 1 Тогда // это число СлучайныйСимвол = ГСЧ.СлучайноеЧисло(0,9); ИначеЕсли Набор = 2 Тогда // это Большая буква латиницы СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(65,90)); ИначеЕсли Набор >= 3 Тогда // это маленькая буква латиницы СлучайныйСимвол = Символ(ГСЧ.СлучайноеЧисло(97,122)); КонецЕсли; Если Набор >= 7 Тогда // это спецсимвол спецсимволы="!@#$&*()_-+[]^"; поз=ГСЧ.СлучайноеЧисло(0,стрдлина(спецсимволы)); СлучайныйСимвол =Сред(спецсимволы,поз,1); КонецЕсли; СлучайнаяСтрока = СлучайнаяСтрока + СлучайныйСимвол; КонецЦикла; Возврат(СлучайнаяСтрока); КонецФункции |