SecurityWin für kurze Büro-Pausen

  • man gibz über die buttons den code ein...

    gedacht ist es für büropausen: man generiert sein passwort. danach ist alles geblockt und man kann z.B. mittagessen. und wenn man zurück kommt muss man nur das passwort über die butons mit der maus eingeben und schon kann man weiterarbeiten.

    eig wollte ich das generierte passwort speichern lassen und beim beim nächsten aufruf kann man dann entweder das gespeicherte passwort eingeben pder mit einem hotkey (den ich noch nicht im scripte habe ) ein neues passwort generieren.

    für admins gibts dann ein extra passwort welches kürzer ist als das benutzerpasswort und einen button bekommt den man nicht sehen kann. dann kann ein admin dieses passwort eingeben (in meinem scripte ist es die 989 als bsp) und erhält eine msgbox welche das gespeicherte passwort anzeigt.

    mein problem ist jetzt, dass ich die erste schleife nicht mehr zum laufen bekomme nachdem die zweite zu ende bzw gelaufen ist.

    Schnitzel kannst du mir helfen??

    @

  • also bis jetzt habe ich nur die Gui umgebaut (1 Endlosschleife reicht völlig^^ )
    Da hättest du dann das problem nichtmehr dass du die Schleife wechseln musst

    Spoiler anzeigen
    [autoit]

    $gui = GUICreate("Security", 1366, 768)
    GUISetBkColor(1)
    Global $Button[10] = [ 9, _
    GUICtrlCreateButton("1", 0, 0, 455, 256), _
    GUICtrlCreateButton("2", 455, 0, 455, 256), _
    GUICtrlCreateButton("3", 910, 0, 455, 256), _
    GUICtrlCreateButton("4", 0, 256, 455, 256), _
    GUICtrlCreateButton("5", 455, 256, 455, 256), _
    GUICtrlCreateButton("6", 910, 256, 455, 256), _
    GUICtrlCreateButton("7", 0, 512, 455, 256), _
    GUICtrlCreateButton("8", 455, 512, 455, 256), _
    GUICtrlCreateButton("9", 910, 512, 455, 256) ]

    [/autoit] [autoit][/autoit] [autoit]

    ;~ For $i = 0 To 2 ; alternative statt den ganzen GuictrlcreateButton
    ;~ For $k = 0 To 2
    ;~ $Button[$i * $k + $i + 1] = GUICtrlCreateButton($i * $k + $i + 1, Mod($k, 3) * 455, Mod($i, 3) * 256, 455, 256)
    ;~ Next
    ;~ Next

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState(@SW_SHOW)
    WinSetTrans("", "", 20)

    [/autoit] [autoit][/autoit] [autoit]

    $gui2 = GUICreate("Passwort generieren", 150, 100)
    $PasswortNeu = GUICtrlCreateInput("Neues Passwort", 5, 5, 100)
    $PasswortNeu2 = GUICtrlCreateInput("Neues Passwort bestätigen", 5, 30, 100)
    $OK = GUICtrlCreateButton("OK", 5, 50, 65, 40)
    $Abbrechen = GUICtrlCreateButton("Abbrechen", 75, 50, 65, 40)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    While 1
    $msg = GUIGetMsg(1)
    Switch $msg[1]
    Case $gui
    Switch $msg[0] ; hier sind alle events für die erste gui enthalten
    Case -3
    Exit
    EndSwitch
    Case $gui2 ; hier sind alle events für die 2te gui enthalten
    Switch $msg[0]
    Case -3
    GUISetState(@SW_HIDE, $gui2)
    WinActivate($gui)
    Case $Abbrechen
    GUISetState(@SW_HIDE, $gui2)
    WinActivate($gui)
    Case $OK
    If GUICtrlRead($PasswortNeu) == GUICtrlRead($PasswortNeu2) Then
    GUISetState(@SW_HIDE, $gui2)
    WinActivate($gui)
    $sPasswort = GUICtrlRead($PasswortNeu)
    Else
    MsgBox(0,"Falsche Eingabe", "Die beiden Passwörter stimmen nicht überein")
    EndIf
    GUICtrlSetData($PasswortNeu, "")
    GUICtrlSetData($PasswortNeu2, "")
    EndSwitch
    EndSwitch
    WEnd

    [/autoit]