[AutoIt] Password Box 12-03-2011, 02:58 AM
#1
Requires:
Code:
#include <EditConstants.au3>
#include <StaticConstants.au3>Code:
Func PasswordBox($Title, $Prompt, $Password)
;By ReaperX
GUICreate($Title, 200, 180, -1 ,-1)
Local $Prompt_Label = GUICtrlCreateLabel($Prompt, 10, 10, 177, 60, $SS_CENTER)
Local $Input = GUICtrlCreateInput("", 10, 80, 180, 20, $ES_PASSWORD)
Local $Continue = GUICtrlCreateButton("Continue", 70, 120, 50, 30)
GUISetState()
While 1
$Msg = GUIGetMsg()
Switch $Msg
Case -3
Exit
Case $Continue
If GUICtrlRead($Input) = $Password Then
GUIDelete()
Return
Else
MsgBox(0, "Error!", "Incorrect Password!")
EndIf
EndSwitch
WEnd
EndFunc
(This post was last modified: 12-03-2011, 03:11 AM by doojan.)




![[+]](https://sinister.li/images/modern/collapse_collapsed.png)