How do I close the script if cancel is pressed in a msgbox or inputbox?

[computergroove]

I want the script to exit if cancel is pressed on the msgbox or inputbox. How do I do that?

If $PinLen < 3 Then
    Do
    MsgBox(0, "Customer Pin Length Error", "This field requires 3 digits") <--- Here
    $CustomerID = InputBox("Customer ID", "Please enter your 3 digit Pin Number which is also on your card.", "", " M8")<--- and Here
        Until StringLen($CustomerID) = 3
EndIf

...

Func _Exit()
    Exit
EndFunc

Edited January 10, 2011 by computergroove

[water]

MsgBox returns the ID of the button pressed. So you could use something like:

$iButton = MsgBox(1, "Customer Pin Length Error", "This field requires 3 digits")
if $iButton = 2 then Exit ; Cancel button pressed

The help file is your friend

Edited January 10, 2011 by water

[Raupi]

Inputbox set @error to 1 ,when Cancel or Close pressed.

If $PinLen < 3 Then
    Do
        $iButton = MsgBox(1, "Customer Pin Length Error", "This field requires 3 digits")
        If $iButton = 2 Then Exit ; Cancel button pressed
        $CustomerID = InputBox("Customer ID", "Please enter your 3 digit Pin Number which is also on your card.", "", " M8")
        If @error = 1 Then Exit ; Cancel or Close pressed
    Until StringLen($CustomerID) = 3
EndIf

Edited January 10, 2011 by Raupi

[computergroove]

That worked fine. Thanks

Edited January 10, 2011 by computergroove

[Darknight1366]

Woooo

Try this

$answer = MsgBox(3, "Wow", "Man")  

If $answer = 2 Then Exit