Латинская транскрипция кириллицы и генератор паролей

, ,

☑

0 Stim213

26.05.15

✎

16:48

Есть ли у кого готовый модуль по переводу кириллических имен в латиницу?

1 Asmody

26.05.15

✎

16:50

на php подойдет?

2 Stim213

26.05.15

✎

16:51

(1) если только вместе с транскрипцией кода пхп в код 1С

3 spectre1978

26.05.15

✎

16:56

Функция Embossing(Знач name)

    сзПеревод = Новый СписокЗначений;
    сзПеревод.Добавить("а","A");
    сзПеревод.Добавить("б","B");
    сзПеревод.Добавить("в","V");
    сзПеревод.Добавить("г","G");
    сзПеревод.Добавить("д","D");
    сзПеревод.Добавить("е","E");
    сзПеревод.Добавить("ж","ZH");
    сзПеревод.Добавить("з","Z");
    сзПеревод.Добавить("и","I");
    сзПеревод.Добавить("й","Y");
    сзПеревод.Добавить("к","K");
    сзПеревод.Добавить("л","L");
    сзПеревод.Добавить("м","M");
    сзПеревод.Добавить("н","N");
    сзПеревод.Добавить("о","O");
    сзПеревод.Добавить("п","P");
    сзПеревод.Добавить("р","R");
    сзПеревод.Добавить("с","S");
    сзПеревод.Добавить("т","T");
    сзПеревод.Добавить("у","U");
    сзПеревод.Добавить("ф","F");
    сзПеревод.Добавить("х","H");
    сзПеревод.Добавить("ц","TS");
    сзПеревод.Добавить("ч","CH");
    сзПеревод.Добавить("ш","SH");
    сзПеревод.Добавить("щ","SCH");
    сзПеревод.Добавить("ь","");
    сзПеревод.Добавить("ы","Y");
    сзПеревод.Добавить("ъ","");
    сзПеревод.Добавить("э","E");
    сзПеревод.Добавить("ю","YU");
    сзПеревод.Добавить("я","YA");

    Для Каждого Строка Из сзПеревод Цикл
        name = СтрЗаменить(НРег(name), Строка.Значение, ВРег(Строка.Представление));
    КонецЦикла;

    Возврат ВРег(name);

КонецФункции

4 Волшебник

модератор

26.05.15

✎

16:58

(3) "ё" пропустил

5 Timon1405

26.05.15

✎

17:02

(0) БСП
// Преобразует исходную строку в транслит.
Функция СтрокаЛатиницей(Знач Строка) Экспорт
//подробности в БСП
КонецФункции

6 Stim213

26.05.15

✎

17:03

И чтобы 2 раза не вставать - дайте у кого есть генератор пароля, чтобы можно было задавать количество знаков, в пароле были бы цифры, буквы(лат)

7 Asmody

26.05.15

✎

17:13

не понял, чего криминального в последнем вопросе.

Функция ГенПасс(Сколько=8)
Возврат Прав(СтрЗаменить(Новый УникальныйИдентификатор,"-",""),Сколько);
КонецФункции

8 Волшебник

модератор

26.05.15

✎

17:15

(7) щас он ещё что-нибудь спросит, чтобы 3 раза не бегать

9 drcrasher

26.05.15

✎

17:16

идеальный генератор паролей - айди рандомного видео на ютубе.

10 Asmody

26.05.15

✎

17:32

Дарю http://www.forum.mista.ru/pwgen.php

11 Гёдза

26.05.15

✎

17:35

(7) заглавных букв нет )))

12 Asmody

26.05.15

✎

17:38

(11) так там и буквы не все

13 icipher

26.05.15

✎

17:39

http://imgs.xkcd.com/comics/random_number.png

14 Stim213

26.05.15

✎

17:45

(7) спасибо, да. нашел что-то похожее
Функция генерацияПароля(ДлинаПароля)
СтрокаСимволов = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789";
СтрокаНовогоПароля = "";
ГСЧ = Новый генераторСлучайныхЧисел();
Для зы = 1 по ДлинаПароля Цикл
СтрокаНовогоПароля  = СтрокаНовогоПароля + Сред(СтрокаСимволов,ГСЧ.СлучайноеЧисло(62),1);
КонецЦикла;
Возврат СтрокаНовогоПароля ;

    КонецФункции

15 Гёдза

26.05.15

✎

17:46

(12) Не разу не видел: В вашем пароле не все буквы )))

16 Asmody

26.05.15

✎

18:10

(14) Это написал человек, незнакомый с функцией Символ()

17 Asmody

26.05.15