Функція генерації паролів
Я собі інколи використовую подібну штуку, то може ще комусь знадобиться.
|
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 27 28 29 30 31 32 33 34 35 36 37 38 39 40 |
Функция ПолучитьУникальныйПароль(КоличествоСимволов) Массив = Новый Массив; Массив.Добавить("1");Массив.Добавить("j");Массив.Добавить("Q"); Массив.Добавить("2");Массив.Добавить("k");Массив.Добавить("R"); Массив.Добавить("3");Массив.Добавить("l");Массив.Добавить("S"); Массив.Добавить("4");Массив.Добавить("m");Массив.Добавить("A"); Массив.Добавить("5");Массив.Добавить("n");Массив.Добавить("B"); Массив.Добавить("6");Массив.Добавить("o");Массив.Добавить("C"); Массив.Добавить("7");Массив.Добавить("p");Массив.Добавить("D"); Массив.Добавить("8");Массив.Добавить("q");Массив.Добавить("E"); Массив.Добавить("9");Массив.Добавить("r");Массив.Добавить("F"); Массив.Добавить("0");Массив.Добавить("s");Массив.Добавить("G"); Массив.Добавить("a");Массив.Добавить("t");Массив.Добавить("H"); Массив.Добавить("b");Массив.Добавить("u");Массив.Добавить("I"); Массив.Добавить("c");Массив.Добавить("v");Массив.Добавить("J"); Массив.Добавить("d");Массив.Добавить("w");Массив.Добавить("K"); Массив.Добавить("e");Массив.Добавить("x");Массив.Добавить("L"); Массив.Добавить("f");Массив.Добавить("y");Массив.Добавить("M"); Массив.Добавить("g");Массив.Добавить("z");Массив.Добавить("N"); Массив.Добавить("h");Массив.Добавить("O");Массив.Добавить("T"); Массив.Добавить("i");Массив.Добавить("P");Массив.Добавить("U"); Массив.Добавить("V");Массив.Добавить("W");Массив.Добавить("X"); Массив.Добавить("Y");Массив.Добавить("Z"); Количество = Массив.Количество(); ГСЧ = Новый ГенераторСлучайныхЧисел(0); Пароль = ""; Итератор = 0; КоличествоСимволов = ?(КоличествоСимволов = 0, 8, КоличествоСимволов); Пока Итератор < КоличествоСимволов Цикл Индекс = ГСЧ.СлучайноеЧисло(0, Количество-1); Пароль = Пароль+Массив[Индекс]; Итератор = Итератор+1; КонецЦикла; Возврат Пароль; КонецФункции |
Категории: 1С Предприятие 8.2

