#include <GUIConstantsEx.au3> $Form = GUICreate("Form1", 268, 34, 192, 183) $But1 = GUICtrlCreateButton("Смена_1", 0, 0, 129, 33, 0) $But2 = GUICtrlCreateButton("Смена_2", 136, 0, 129, 33, 0) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $But1 $passwd = InputBox("Security Check", "Введите пароль пожалуйста.", "", "*") If @Error== 0 And $passwd=="1234" Then _Smena1() Else MsgBox(0,"Ошибка","Введенный пароль не верный!", 3) EndIf Case $But2 $passwd2 = InputBox("Security Check", "Введите пароль пожалуйста.", "", "*") If @Error== 0 And $passwd2=="5678" Then _Smena2() Else MsgBox(0,"Ошибка","Введенный пароль не верный!", 3) EndIf EndSwitch WEnd Func _Smena1() MsgBox(0,"Поздравляем!","правельно, вместо этого сообщения нужно поставить запуск нужной проги",5) EndFunc Func _Smena2() MsgBox(0,"Поздравляем!","правельно, вместо этого сообщения нужно поставить запуск нужной проги",5) EndFunc |