Exit case without quit script

[kneze]

Hi

i have a while loop. in this loop i have case statments. First Check is if Computer is online. The next step is Inputbox.

My InpuBox has two Buttons Ok and Cancel. If User clicks Cancel Autoit close completely. Thats wrong.

It has only to exit case to while statement. Could you give me a sugestion how can i do this ?

Thanks.

Case $test

$var = Ping($CPname,250)
If @error = 0 Then  
                        
$s_Command = InputBox("Message", "Computer Number: "&$CPname& @CRLF & @CRLF &"Please Enter Code"& @CRLF & @CRLF & "Log Off = 0" & @CRLF & "Forced Log Off = 0+4" & @CRLF & "Shutdown = 1" & @CRLF & "Forced Shutdown = 1+4" & @CRLF & "Reboot = 2" & @CRLF & "Forced Reboot = 2+4" &@CRLF &" Power Off = 8" &@CRLF &"Forced Power Off = 8+4","","",250,300,400,300)

If @error = 1 Then .... exit case

    _RemoteShutdown($s_Command)

        Func _RemoteShutdown(ByRef $CPname, ByRef $s_Command)
    Local $wbemFlagReturnImmediately, $wbemFlagForwardOnly, $objWMIService, $colItems, $objItem
    
    $wbemFlagReturnImmediately = 0x10
    $wbemFlagForwardOnly = 0x20
    $colItems = ""
    $objWMIService = ObjGet("winmgmts:\\" & $CPname & "\root\CIMV2")
    $colItems = $objWMIService.ExecQuery("SELECT Name From Win32_OperatingSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
    
    For $objItem in $colItems
    $objItem.Win32ShutDown($s_Command); 0=Log Off|0+4=Forced Log Off|1=Shutdown|1+4=Forced Shutdown|2=Reboot|2+4=Forced Reboot|8=Power       Off|8+4=Forced Power Off
   Next

EndFunc
    Else 
    MsgBox(0, "Error", "Client isn't Online or wrong input")
endif
endif

Edited May 27, 2011 by kneze

[jchd]

You seem to have a function inside a Case, which isn't its place.

Now just do nothing. Invert the test in the case and code other Case as needed.

Sanitize/tidy your code.

[BrewManNH]

Without more code it's hard to say, but I'm guessing it's the Exit Case line myself. Seeing as how there's no exit case command, the script sees exit, and exits.

[ahmet]

Try with ContinueCase

[martin]

Hi

i have a while loop. in this loop i have case statments. First Check is if Computer is online. The next step is Inputbox.

My InpuBox has two Buttons Ok and Cancel. If User clicks Cancel Autoit close completely. Thats wrong.

It has only to exit case to while statement. Could you give me a sugestion how can i do this ?

Thanks.

Case $test

$var = Ping($CPname,250)
If @error = 0 Then  
                        
$s_Command = InputBox("Message", "Computer Number: "&$CPname& @CRLF & @CRLF &"Please Enter Code"& @CRLF & @CRLF & "Log Off = 0" & @CRLF & "Forced Log Off = 0+4" & @CRLF & "Shutdown = 1" & @CRLF & "Forced Shutdown = 1+4" & @CRLF & "Reboot = 2" & @CRLF & "Forced Reboot = 2+4" &@CRLF &" Power Off = 8" &@CRLF &"Forced Power Off = 8+4","","",250,300,400,300)

If @error = 1 Then .... exit case

    _RemoteShutdown($s_Command)

        Func _RemoteShutdown(ByRef $CPname, ByRef $s_Command)
    Local $wbemFlagReturnImmediately, $wbemFlagForwardOnly, $objWMIService, $colItems, $objItem
    
    $wbemFlagReturnImmediately = 0x10
    $wbemFlagForwardOnly = 0x20
    $colItems = ""
    $objWMIService = ObjGet("winmgmts:\\" & $CPname & "\root\CIMV2")
    $colItems = $objWMIService.ExecQuery("SELECT Name From Win32_OperatingSystem", "WQL", $wbemFlagReturnImmediately + $wbemFlagForwardOnly)
    
    For $objItem in $colItems
    $objItem.Win32ShutDown($s_Command); 0=Log Off|0+4=Forced Log Off|1=Shutdown|1+4=Forced Shutdown|2=Reboot|2+4=Forced Reboot|8=Power      Off|8+4=Forced Power Off
   Next

EndFunc
    Else 
    MsgBox(0, "Error", "Client isn't Online or wrong input")
endif
endif

First of all you aught to post code which actually makes sense or at least is valid AutoIt code.

If you have an InputBox and someone presses Cancel then @error is set to 1 and it looks like you have decided that when @error is 1 you will shut down.

If you simply want to set your code so that if Cancel is pressed the Case doesn't continue you only need to have

Case $whatever
  $Result = InputBox($blahblah...
 if @error <> 1 then
   ;continue with rest of Case
endif

[kneze]

Thanks for sugestions.

with If @error = 1 Then ContinueLoop

it works.

Edited May 27, 2011 by kneze

[jchd]

Dirty.

[falcontechnics]

Hi,

Try "Return False"...

For example;

Case $insxReport
    if @UserName = "username" Then
    Local $iAnswer = MsgBox (BitOR($MB_YESNO, $MB_ICONWARNING), "WARNING", "Illegal/Unknown software report for the site will be prepared, this process may take some time. Are you sure you want to start?")
    If $iAnswer = 7 Then
    MsgBox($MB_SYSTEMMODAL, "Software 2017", "You canceled.")
    Return False
    EndIf
    insReport ()
   Else

[jchd]

Do you realize how old and dead is this thread?