Help with this script, please?

[Merko]

I'm currently working on a script that requires a stub for a secure login system I'll be using $password = "[PASSWORD]" to call the password from another script, on a button click i'd like to display weather the password is right or wrong

$password = "[PASSWORD]"
   Case $msg = $Button_0
     if $userinput = $password Then
                   
    Msgbox(0,"Correct!","Password is correct!")
 Else
                
        MsgBox(0, "Incorrect!","Password is incorrect!")
    EndIf

Basiclly when i press the button no matter what i put in the input box i always get password is incorrect?

Any help wil be highly apreciated, new to autoit!

Thankyoy

[FireFox]

Hi,

Welcome to the autoit forum

Please take a look at the helpfile for the GUICtrlRead function.

Br, FireFox.

[l3ill]

Or this Quick & Easy Down & Dirty StringCompare Method...

Local $userinput = InputBox("Check PW", "Enter here")
$password = "[PASSWORD]"

$result = StringCompare($password, $userinput, 2)

If $result = 0 Then

    MsgBox(0, "Correct!", "Password is correct!")
Else
    MsgBox(0, "Incorrect!", "Password is incorrect!")
EndIf

[water]

BTW: Please give your threads meaningful titles - because everyone on this forum is looking for help (for his scripts)

So we know what you are asking for without having to read the whole thread.

[Merko]

 

Or this Quick & Easy Down & Dirty StringCompare Method...

Local $userinput = InputBox("Check PW", "Enter here")
$password = "[PASSWORD]"

$result = StringCompare($password, $userinput, 2)

If $result = 0 Then

    MsgBox(0, "Correct!", "Password is correct!")
Else
    MsgBox(0, "Incorrect!", "Password is incorrect!")
EndIf

Thanks for your reply, is there a way i can stop the form from closing if the password entered is wrong?

[water]

You have to do it in a loop until the password is correct or the suer cancels the input:

Local $password = "[PASSWORD]", $userinput = ""
While 1
    $userinput = InputBox("Check PW", "Enter here")
    If @error <> 0 Then Exit
    $result = StringCompare($password, $userinput, 2) 
    If $result = 0 Then
        MsgBox(0, "Correct!", "Password is correct!")
        ExitLoop
    Else
         MsgBox(0, "Incorrect!", "Password is incorrect!")
    EndIf
WEnd

Edited November 7, 2013 by water

[dreamzboy]

Try this:

#include <GUIConstantsEx.au3>

GUICreate ("Password Verification", 300, 150)

Local $pw_input, $result, $msg, $verify, $btn
Local $password = "password123" ; Password to verify


GUISetState ()

GUICtrlCreateLabel ("Please enter your password:", 30, 30, 200, 20)
GUICtrlSetFont (-1, 10)
$pw_input = GUICtrlCreateInput ("", 30, 60, 175, 20)
$verify = GUICtrlCreateButton ("Verify", 30, 100, 70, 30)
GUICtrlSetFont (-1, 10)

Do
    $msg = GUIGetMsg ()

    Select
        Case $msg = $GUI_EVENT_CLOSE
            Exit
        Case $msg = $verify
            $result = GUICtrlRead ($pw_input)
            If ($result = $password) Then
                MsgBox(64, "Correct!", "Password is correct!")
            Else
                MsgBox(48, "Incorrect!", "Password is incorrect!  Please try again.")
            EndIf
    EndSelect
Until 0