Страница 2 из 8 ПерваяПервая 123456 ... ПоследняяПоследняя
Показано с 11 по 20 из 72

Тема: Новая тема рекорцмен: Пишем макрос.

  1. #11
    Senior Member Аватар для Neutron
    Регистрация
    28.05.2008
    Сообщений
    688

    Re: Новая тема рекорцмен: Пишем макрос.

    Цитата Сообщение от Sandro
    Понятное дело...
    Может еще запрос пароля добавить?
    В открытом виде или будем преобразовывать? (со сдвигом?) (Предлагаю пока не мудрить.)

  2. #12
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Цитата Сообщение от Neutron
    Предлагаю сейчас приглашение и досвидание написать. Далее сделать загрузку миди формы и в ней менюшку (а там можно и внутренних форм накидать с разными опсциями.)
    Можно.. ну так начнем
    Don't read the warnings, go straight and start to fly.

  3. #13
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Цитата Сообщение от Neutron
    В открытом виде или будем преобразовывать? (со сдвигом?) (Предлагаю пока не мудрить.)
    Можно тупо ксором посимвольно применять символьную константу к строке с паролем...
    самый простой алгоритм шифрования
    Don't read the warnings, go straight and start to fly.

  4. #14
    Senior Member Аватар для Neutron
    Регистрация
    28.05.2008
    Сообщений
    688

    Re: Новая тема рекорцмен: Пишем макрос.

    Цитата Сообщение от Sandro
    Можно тупо ксором посимвольно применять символьную константу к строке с паролем...
    самый простой алгоритм шифрования
    Смотри сам: Тут свобода мыслей. Код можно добовлять как хочешь (только без форматов дисков и удаления данных)

  5. #15
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Приветствие

    MsgBox ("Добро пожаловать!")
    Don't read the warnings, go straight and start to fly.

  6. #16
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Цитата Сообщение от Neutron
    Смотри сам: Тут свобода мыслей. Код можно добовлять как хочешь (только без форматов дисков и удаления данных)
    Ну это понятно.. А то кто-нибудь скопипастит и попробует запустить... :D
    И ппц..
    Don't read the warnings, go straight and start to fly.

  7. #17
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Так пишем макрос, запрашивающий имя пользователя и пароль...
    В случае совпадения выводится сообщение об успешной авторизации, иначе сообщение об ошибке и документ закрывается...
    Don't read the warnings, go straight and start to fly.

  8. #18
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Готовый исходник макроса

    Sub main()

    Const ValidUserName As String = "root"
    Const ValidPassword As String = "1234"
    Dim UserName As String
    Dim Password As String
    UserName = InputBox("Введите имя пользователя")
    Password = InputBox("Введите пароль")
    If UserName = ValidUserName And Password = ValidPassword Then
    MsgBox ("Вы были успешно авторизованы в системе")
    Else
    MsgBox ("Вы не были авторизованы в системе. Документ будет закрыт")
    ActiveDocument.Close
    End If

    End Sub
    Don't read the warnings, go straight and start to fly.

  9. #19
    Активный пользователь Аватар для Sandro
    Регистрация
    14.06.2008
    Сообщений
    2,811

    Re: Новая тема рекорцмен: Пишем макрос.

    Если кому-то нужны комментарии, постите... Расскажу что к чему...
    Don't read the warnings, go straight and start to fly.

  10. #20
    Senior Member Аватар для Neutron
    Регистрация
    28.05.2008
    Сообщений
    688

    Re: Новая тема рекорцмен: Пишем макрос.

    Отличный макрос получился.

Похожие темы

  1. Тема
    от Владилена в разделе Культура и искусство
    Ответов: 16
    Последнее сообщение: 23.03.2008, 16:43
  2. Новая тема от Пепси - Стань звездой
    от ac2on в разделе Просто общение
    Ответов: 1
    Последнее сообщение: 12.03.2008, 20:06
  3. Тема))
    от Slast`ona в разделе Просто общение
    Ответов: 55
    Последнее сообщение: 06.01.2008, 21:37
  4. Тема про урелов
    от Tassadar в разделе Юмор
    Ответов: 0
    Последнее сообщение: 02.11.2007, 19:01
  5. -=Пузырьковая тема=-
    от Magnattt в разделе Просто общение
    Ответов: 17
    Последнее сообщение: 11.09.2007, 11:07

Рекомендуем

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •  

SEO by vBSEO

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 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94