Input box

[brian873]

Hi I have an input box that collects a password and it works fine. But I would now like to add a message box if the Cancel button is clicked.

I have been tearing my hair out trying to get this to work, can anyone help ?

Thanks

Original Code

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")
                    
Run("truecrypt.exe /l " & $Found & "/m /a /q, 1, true /v encrypted.tc /p " & $passwd)

What I'm Trying

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")

If @error = 1 Then
    MsgBox(0,"Error","Cancel")
Else

; Continue script

Edited August 29, 2007 by brian873

[Bert]

Ok, what you need to do is make a GUI instead of a inputbox. That way you can have whatever button you like, and control what they do. To have it so when the password is entered you see *****, do this: GUICtrlCreateInput for the input field, and use $ES_PASSWORD for the style.

[silvano]

Hi I have an input box that collects a password and it works fine. But I would now like to add a message box if the Cancel button is clicked.

I have been tearing my hair out trying to get this to work, can anyone help ?

Thanks

Original Code

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")
                    
Run("truecrypt.exe /l " & $Found & "/m /a /q, 1, true /v encrypted.tc /p " & $passwd)

What I'm Trying

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")

If @error = 1 Then
    MsgBox(0,"Error","Cancel")
Else

; Continue script

the cancel button return 2

$a = msgBox(1,"","Cancel")

if $a == 2 then msgBox(0,"","press cancel Button")

[brian873]

Thanks Guys for the quick response.

I managed to get it working with the following code.

Thanks again for the help

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")

If @error = 1 Then
    MsgBox(0,"Error","Cancel")
Else
    Run("truecrypt.exe /l " & $Found & "/m /a /q, 1, true /v encrypted.tc /p " & $passwd)                       EndIf

[silvano]

sorry... i don't understand...

this work for me...

$passwd = InputBox("Security Check", "This is a secure device and should only be used by the owner." & @CRLF & " " & @CRLF & " " & @CRLF & "Enter your password.", "", "*")

If @error = 1 Then
    MsgBox(0,"Error","Cancel")
ElseIf $passwd == "" Then
MsgBox(0,"","Empty field")
Else
MsgBox(0,"","Continue script -- digit= "&$passwd)
EndIf

[brian873]

Yeah I had forgot the ENDIF !