[решено] Форма ввода пароля

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

[решено] Форма ввода пароля

Anarasius

Пользователь

Сообщения: 54
Благодарности: 0

Профиль | Отправить PM | Цитировать

Цитата:

$sPass = InputBox("Ввод пароля", "Введите пароль учётной записи:", "", "*") If $sPass = 7 Then MsgBox(16, "Успех", "Верный пароль") If @Error = 0 Then Exit MsgBox(16, "Ошибка", "Неверный пароль")

как это правильно скомповать

Отправлено: 16:44, 25-11-2009

Creat0R

Must AutoIt

Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать

Цитата Anarasius:

как это правильно скомповать »

Код:

$sPass = InputBox("Ввод пароля", "Введите пароль учётной записи:", "", "*")
If @error Then Exit MsgBox(48, "Ошибка", "Отмена ввода пароля.")

If $sPass = 7 Then
    MsgBox(64, "Успех", "Верный пароль.")
Else
    MsgBox(16, "Ошибка", "Неверный пароль.")
EndIf