Jump to content
gahhon

While Not question

Recommended Posts

gahhon
While Not _Login()
    _Initial_Check()
WEnd

Func _Login()
    Local $FLAG_LOGIN = _Password_Check()

    If @error = 1 Then
        _Close_Application()
    ElseIf @error = 2 Then
        _Metro_MsgBox(0, "", $FLAG_LOGIN)
        Return False
    Else ; $FLAG_LOGIN return TRUE
        _Metro_MsgBox(0, "", "Access granted!")
        Return True
    EndIf
EndFunc

 I do have a question regarding the While Not Loop.

According to the code I post above, While Not _Login() is similar to While _Login() = False right?

Which mean when _Login() return False and it will execute the _Initial_Check() function, but somehow the logic is not right and I also don't understand why While Not _Login() loop is executed as expected.

What I wanna achieve is when _Login() is not success, which mean return False then it continue loop the _Login() function until it return True

When It return True only execute the _Initial_Check() function.

Please kindly clarify. Thanks

Share this post


Link to post
Share on other sites
Subz

You could try something like the following:

Local $bLogin = False
While $bLogin = False
    $bLogin = _Login()
    Sleep(500) ;~ Sleep 500ms and try again
WEnd
_Initial_Check()

 

Share this post


Link to post
Share on other sites
gahhon
On 14/01/2019 at 3:23 PM, Subz said:

You could try something like the following:

Local $bLogin = False
While $bLogin = False
    $bLogin = _Login()
    Sleep(500) ;~ Sleep 500ms and try again
WEnd
_Initial_Check()

 

I think I know why the logic wrong and the wrong logic is works as expected.

While Not _Login()
    _Initial_Check()
WEnd

GUISetState(@SW_SHOW)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE, $GUI_CLOSE_BUTTON, $BTN_EXIT
            _GUIDisable($GUI_MAIN, 0, 30)
            _Close_Application()
        Case $GUI_MINIMIZE_BUTTON
            GUISetState(@SW_MINIMIZE, $GUI_MAIN)
        Case $BTN_LOCKED
            _Lock_Folder()
        Case $BTN_UNLOCKED
            _Unlock_Folder()
        Case $OVERRIDE_FOLDER
            _GUIDisable($GUI_MAIN, 0, 30)
            _Override_Folder()
            _GUIDisable($GUI_MAIN)
    EndSwitch
WEnd

Func _Login()
    Local $FLAG_LOGIN = _Password_Check()

    If @error = 1 Then
        _Close_Application()
    ElseIf @error = 2 Then
        _Metro_MsgBox(0, "", $FLAG_LOGIN)
        Return False
    Else
        _Metro_MsgBox(0, "", "Access granted!")
        Return True
    EndIf
EndFunc

Firstly, While Not _Login() is equivalent to While _Login() = False.

So if _Login() returne False, it go into the While Loop and execute _Initial_Check() but the _Initial_Check() does not return any True/False. Therefore, it continue loop the _Login() function.
So if _Login() return True, it will exit the While Loop and execute the GUI setting.

I am finally understand of it. Thanks lot.

But then I modify my code into like this instead,

While Not _Login()
    _Login()
WEnd

_Initial_Check()

;GUI SETTINGS

When I enter few times wrong password it show Access Denied as expected, but after that I enter correct password it show Access granted and loop 1 more time of _Login()?
As I have tested out, I using Enter Key and Mouse Click result are different.
Enter Key: Result as expected
Mouse Click: Few Time wrong, then enter correct one. It show Access Granted and ask for password again
Any idea?

Edited by gahhon

Share this post


Link to post
Share on other sites
Bilgus
15 hours ago, gahhon said:

 

While Not _Login()
    ;;;_Login()
WEnd

_Initial_Check()

;GUI SETTINGS

 

This should do what you want...

Share this post


Link to post
Share on other sites
gahhon
On 16/01/2019 at 3:51 PM, Bilgus said:

This should do what you want...

Yeah, logically it should do what I want.

But when the application prompt for password to login, I use mouse click the LOGIN instead of using ENTER key,

then it show "Access Granted" and re-prompt the password for login again.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

  • Similar Content

    • gahhon
      By gahhon
      I have a python script automate.py and I wanna run it via CMD.
      As I know to execute python via CMD is something like this
      $CMD = "Something python here" Run(@ComSpec & " /c " & $CMD) But how can I just open the 1 CMD and send multiple commands to the CMD based on the function called?
      For instance like:

      Launch CMD and send python then send import automate If google() function is called - send automate.google() to the CMD If yahoo() function is called - send automate.yahoo() to the CMD  I don't want to execute multiple CMD to call the automate functions. This is due to inside the python script have global variable to handle duplicate flag.
      So if I execute multiple CMD to call the functions, the global variable will be keep new as NULL. Which is not my expectation.
       
      Thanks
    • gahhon
      By gahhon
      I only found that AutoIt can actually execute the entire python script or execute the .exe (converted to .exe from .py)
      But what if I just want call the particular function? If that possible to do so?
      This is because python can't create fancy GUI like AutoIT does. So my plan is use AutoIT to have fancy GUI.
      Then each buttons will trigger specific function in the python script or .exe file.
      For instances:
      btnSum - trigger function in python script or .exe file (funcSum)
      btnMinus - trigger function in python script or .exe file (funcMinus)
       
      Thanks for advance information.
    • nacerbaaziz
      By nacerbaaziz
      Hello my friends
      Can we create a single context menu on more than one item?
      For example, a context menu includes standardized options on more than one control, such as buttons or check boxes
      to Create a context menu on one item am using this function
      GUICtrlCreateContextMenu ($ HWND)
      How to link it with more than one element please?
      or if we can't do that, please give me a solution
      so i tried to add an context menus to all the controls but the script will be long, for that if their are any solutions i hope to give it to me
      thanks in advanced
    • gahhon
      By gahhon
      _Metro_SplashTextScreen(1, "", $iMsg) AdlibRegister("_Metro_LoopInProgress") DirRemove($DIR_WA_FOLDER, 1) Local $iCopy = _WinAPI_ShellFileOperation($CUR_WA_FOLDER, $DIR_WA_FOLDER, $FO_COPY, BitOr($FOF_SIMPLEPROGRESS, $FOF_NOCONFIRMMKDIR)) AdlibUnRegister("_Metro_LoopInProgress") _Metro_SplashTextScree If @error Then _Metro_MsgBox(0, "", $iCopy) _FileWriteLog($LOG_INSTALLATION, "Error: " & $iCopy) Else _Metro_MsgBox(0, "", "Application is up to date!") _FileWriteLog($LOG_INSTALLATION, "Debug: Application is up to date.") EndIf According to the help file of _WinAPI_ShellFileOperation there are a lot of failure and error code. But how can I handle all of them and display corresponding error message based on the help file?
      The incident is like this:
      I'll lock the folder with permission, so when I execute the _WinAPI_ShellFileOperation to copy and overwrite the folder contents, it popped me an error message saying that permission issue to caused I can't access the folder and overwrite the contents.

      Then I clicked Cancel button, and my AutoIT application exit immediately and it's not execute the function _Metro_MsgBox(0, "", $iCopy) to display the message.
       
      Anyway, I did also tried the code below, the it still display "Application is up to date!"
      According to the help file, 120 - Security settings denied access to the source.
      If @error = 120 Then _Metro_MsgBox(0, "", $iCopy) _FileWriteLog($LOG_INSTALLATION, "Error: " & $iCopy) Else _Metro_MsgBox(0, "", "Application is up to date!") _FileWriteLog($LOG_INSTALLATION, "Debug: Application is up to date.") EndIf  
    • gahhon
      By gahhon
      I have a application that have a function is to create a shortcut to desktop, lets say is ChromePortable.lnk.
      $iCreate = FileCreateShortcut($DIR_WA_FOLDER & '\GoogleChromePortable.exe', $DIR_SHORTCUT, $DIR_WA_FOLDER, '--kiosk "https://example.com/"') So the shortcut will be launch as kiosk mode and force to enter the specific website. However, the user is still able to right-click on the shortcut and modify the target value to remove the kiosk mode. What can I do to disable the user to editing the target value?
      So far, I had asked and tried from SuperUser for advises Disable Shortcut Target Field
      icacls "ChromePortable.lnk" /GRANT EVERYONE:RX So this will set the permission of this shortcut file to only Read & Execute only! But after I set it, the user is still can modify.
      Please kindly advise.
      Please note and assume that user don't have Administration account or etc, that should be only have 1 account to logon to the computer.
       
      EDIT:
      I must disable inheritance to remove all others permissions like SYSTEM, ADMINISTRATORS, etc. Then only GRANT everyone for READ & EXECUTE only.
      But still the user can go to edit the permissions tho. Any advise?
×