Login Form...

[FrancescoDiMuro]

Good evening guys ( almost good night here in Italy )  
How are you? Hop you're fine  
I'm trying to do a Login Form ( I did, but I'm missing something in the management ), that allows the user to login when the script is launched, and, when the main GUI is opened, the user can Logout and Login with another username and password.
The username and password "checking" I do is done by a text file, which in there are username and password, crypted through _Crypt_EncryptData().
The "issue" I'm having at the moment, is to manage the Login form when the user hasn't already done the login, and so, the main GUI is not visible, but is created...
I create the main GUI after the Login form... I tried with WinActive, WinGetState, but nothing changed ( even at the first Login, the script says ( through a MsgBox ) that the Win does exists ( or is active... ) and, as I want, it is not shown again...

I really don't know If I missed something, or, I don't know...
I'm going crazy for this thing...
If someone could help me, I'd really appreaciate it!
Thanks for the reading

expandcollapse popup

#Region ### START Koda GUI section ### Form=C:\Users\Portatile-60\Documents\Documenti Lavoro\AutoIt\Gestione_Magazzino_v2\form_Login.kxf
        Global $form_Login = GUICreate("Effettua il Login per continuare:", 405, 120, @DesktopWidth/2 - 202.5, @DesktopHeight/2 - 150) ; 302, 218
        GUISetOnEvent($GUI_EVENT_CLOSE, "GUIDeleteLogin")
        Global $combo_Username = GUICtrlCreateCombo("Di Muro Francesco", 104, 64, 217, 25)
        GUICtrlSetFont(-1, 10, 400, 0, "Arial")
        GUICtrlSetData($combo_Username, "somedata")
        Global $input_Password = GUICtrlCreateInput("", 104, 89, 217, 25, BitOR($GUI_SS_DEFAULT_INPUT,$ES_PASSWORD))
        GUICtrlSetFont(-1, 10, 400, 0, "Arial")
        $button_VerificaDati = GUICtrlCreateButton("", 328, 66, 42, 42, $BS_ICON)
        GUICtrlSetImage(-1, "C:\Users\Portatile-60\Documents\Documenti Lavoro\AutoIt\Gestione_Magazzino_v2\Icone\icon_check.ico", -1)
        GUICtrlSetOnEvent($button_VerificaDati, "CheckLogin")
        $label_Titolo = GUICtrlCreateLabel("Login", 167, 14, 71, 33)
        GUICtrlSetFont(-1, 18, 800, 0, "Arial")
        $label_Username = GUICtrlCreateLabel("Username :", 24, 64, 76, 20)
        GUICtrlSetFont(-1, 10, 800, 0, "Arial")
        $label_Password = GUICtrlCreateLabel("Password :", 24, 89, 73, 20)
        GUICtrlSetFont(-1, 10, 800, 0, "Arial")
#EndRegion ### END Koda GUI section ###

Func CheckLogin()
    Local $sUsername = GUICtrlRead($combo_Username)
    Local $sPassword = GUICtrlRead($input_Password)
    MsgBox($MB_ICONINFORMATION, "", "Username: " & $sUsername & @CRLF & "Password: " & $sPassword)
    Local $sFileUtenti = @ScriptDir & "\utenti.txt"
    If @error Then
        MsgBox($MB_ICONERROR, "Errore!", "Errore durante la lettura del file!")
        Exit
    Else
        Local $hFileUtenti = FileOpen($sFileUtenti, $FO_READ)
        If @error Then
            MsgBox($MB_ICONERROR, "Errore!", "Errore durante l'apertura del file " & $sFileUtenti & "." & @CRLF & "Errore: " & @error)
        Else
            Local $sDatiUtente, $aDatiUtente
            Local $bUtenteTrovato = False
            Local $iLinea = 1
            Local $sControlloWin = ""
            Local $sWin = WinGetState($form_GestioneMagazzino)
            MsgBox($MB_ICONINFORMATION, "", $sWin)
            If @error Then
                MsgBox($MB_ICONERROR, "Errore!", "Errore durante la verifica della GUI attiva." & @CRLF & "Errore: " & @error)
            EndIf
            If($sWin == 5) Then
                MsgBox($MB_ICONINFORMATION, "", "La GUI esiste!")
                Do
                    $sDatiUtente = FileReadLine($hFileUtenti, $iLinea)
                    $aDatiUtente = StringSplit($sDatiUtente, "|", $STR_NOCOUNT)
                    If(BinaryToString(_Crypt_DecryptData($aDatiUtente[0], "CRYPT", $CALG_RC4)) = $sUsername And BinaryToString(_Crypt_DecryptData($aDatiUtente[1], "CRYPT", $CALG_RC4)) = $sPassword) Then
                        $sControlloWin = "ESISTE"
                        $bUtenteTrovato = True
                        ExitLoop
                    Else
                        $iLinea+=1
                        If($sDatiUtente = "" And $bUtenteTrovato = False) Then
                            MsgBox($MB_ICONWARNING, "Attenzione!", "Username o Password errati.")
                            ExitLoop
                        EndIf
                    EndIf
                Until $bUtenteTrovato = True
            Else
                MsgBox($MB_ICONINFORMATION, "", "La GUI esiste!")
                Do
                    $sDatiUtente = FileReadLine($hFileUtenti, $iLinea)
                    $aDatiUtente = StringSplit($sDatiUtente, "|", $STR_NOCOUNT)
                    If(BinaryToString(_Crypt_DecryptData($aDatiUtente[0], "CRYPT", $CALG_RC4)) = $sUsername And BinaryToString(_Crypt_DecryptData($aDatiUtente[1], "CRYPT", $CALG_RC4)) = $sPassword) Then
                        $sControlloWin = "NON ESISTE"
                        $bUtenteTrovato = True
                        ExitLoop
                    Else
                        $iLinea+=1
                        If($sDatiUtente = "" And $bUtenteTrovato = False) Then
                            MsgBox($MB_ICONWARNING, "Attenzione!", "Username o Password errati.")
                            ExitLoop
                        EndIf
                    EndIf
                Until $bUtenteTrovato = True
            EndIf
            If($sControlloWin = "ESISTE") Then
                MsgBox($MB_ICONINFORMATION, "Login effettuato!", "Hai effettuato l'accesso come: " & @CRLF & $sUsername & ".")
                ; Setta come "non-cliccabile" il bottone di Login
                GUICtrlSetState($button_Login, $GUI_DISABLE)
                GUICtrlSetState($button_VisualizzaGiacenze, $GUI_ENABLE)
                GUICtrlSetState($button_AggiungiProdotto, $GUI_ENABLE)
                GUICtrlSetState($button_PrelevaProdotto, $GUI_ENABLE)
                GUICtrlSetState($button_RicercaProdotto, $GUI_ENABLE)
                GUICtrlSetState($button_CreaDDT, $GUI_ENABLE)
                GUICtrlSetState($button_MostraGiacenzeAZero, $GUI_ENABLE)
                GUICtrlSetState($combo_Magazzino, $GUI_ENABLE)
                GUICtrlSetState($button_Logout, $GUI_ENABLE)
                ; Setta come "non-cliccabile" il bottone di Login
                GUICtrlSetState($button_Login, $GUI_DISABLE)
                ; Setta l'utente che ha effettuato l'accesso nella label $label_CaptionUtente
                GUICtrlSetData($label_CaptionUtente, $sUsername)
                ; "Distruggi" la GUI Login
                GUIDelete($form_Login)
                FileClose($hFileUtenti)
            Else
                MsgBox($MB_ICONINFORMATION, "", "La GUI non esiste!")
                MsgBox($MB_ICONINFORMATION, "Login effettuato!", "Hai effettuato l'accesso come: " & @CRLF & $sUsername & ".")
                ; Mostra la GUI Principale
                GUISetState(@SW_SHOW, $form_GestioneMagazzino)
                ; Setta come "non-cliccabile" il bottone di Login
                GUICtrlSetState($button_Login, $GUI_DISABLE)
                ; Setta l'utente che ha effettuato l'accesso nella label $label_CaptionUtente
                GUICtrlSetData($label_CaptionUtente, $sUsername)
                ; "Distruggi" la GUI Login
                GUIDelete($form_Login)
                FileClose($hFileUtenti)
            EndIf
        EndIf
    EndIf
EndFunc

Func Logout()
    GUICtrlSetData($label_CaptionUtente, "")
    MsgBox($MB_ICONINFORMATION, "Logout effettuato!", "Effettua nuovamente il Login per utilizzare il programma.")
    ; Disabilita tutti i bottoni della GUI Principale
    GUICtrlSetState($button_VisualizzaGiacenze, $GUI_DISABLE)
    GUICtrlSetState($button_AggiungiProdotto, $GUI_DISABLE)
    GUICtrlSetState($button_PrelevaProdotto, $GUI_DISABLE)
    GUICtrlSetState($button_RicercaProdotto, $GUI_DISABLE)
    GUICtrlSetState($button_CreaDDT, $GUI_DISABLE)
    GUICtrlSetState($button_MostraGiacenzeAZero, $GUI_DISABLE)
    GUICtrlSetState($combo_Magazzino, $GUI_DISABLE)
    GUICtrlSetState($button_Logout, $GUI_DISABLE)
    ; Abilita il Login
    GUICtrlSetState($button_Login, $GUI_ENABLE)
EndFunc

EDIT:

Solved, making an "integrated" Login form... 

Edited February 9, 2017 by FrancescoDiMuro
Solved...