AutoIt | Global $ueberschrift = "Passwo - Henk - m7396a938

Global $ueberschrift = "Passwortsave v1.0"


#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\user\Desktop\AutoIT\Koda\Forms\Passworttresor.kxf
$Form1 = GUICreate("Form1", 625, 443, 192, 124)
$Label1 = GUICtrlCreateLabel("Label1", 144, 24, 284, 25)
$Input1 = GUICtrlCreateInput("Input1", 56, 104, 249, 21)
$Input2 = GUICtrlCreateInput("Input2", 56, 144, 249, 21)
$Input3 = GUICtrlCreateInput("Input3", 56, 184, 249, 21)
$Input4 = GUICtrlCreateInput("Input4", 56, 224, 249, 21)
$Input5 = GUICtrlCreateInput("Input5", 56, 264, 249, 21)
$Input6 = GUICtrlCreateInput("Input6", 56, 304, 249, 21)
$Input7 = GUICtrlCreateInput("Input7", 56, 344, 249, 21)
$Input8 = GUICtrlCreateInput("Input8", 56, 384, 249, 21)
$Button2 = GUICtrlCreateButton("Speichern", 368, 144, 75, 25, $WS_GROUP)
$Button1 = GUICtrlCreateButton("Speichern", 368, 104, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Speichern", 368, 184, 75, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Speichern", 368, 224, 75, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Speichern", 368, 264, 75, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("Speichern", 368, 304, 75, 25, $WS_GROUP)
$Button7 = GUICtrlCreateButton("Speichern", 368, 344, 75, 25, $WS_GROUP)
$Button8 = GUICtrlCreateButton("Speichern", 368, 384, 75, 25, $WS_GROUP)
$Group1= GUICtrlCreateGroup("Passw�rter", 48, 80, 273, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Speichern", 360, 80, 89, 337)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button9 = GUICtrlCreateButton("Infos", 504, 200, 75, 25, $WS_GROUP)
$Button10 = GUICtrlCreateButton("Sicherheit des Scriptes", 504, 240, 75, 25, $WS_GROUP)
$Button11 = GUICtrlCreateButton("Beenden", 504, 280, 75, 25, $WS_GROUP)
$Group3 = GUICtrlCreateGroup("Einstellungen", 488, 176, 105, 145)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                Exit

                Case $Button11
                        Exit

                Case $Button10
                        Sleep (100)
                        MsgBox (0, $ueberschrift , "Die Sicherheit deiner Passw�rter steht nat�rlich an erster Stelle. Die Passw�rter sind in der Registry in einem verschl�sselten Ordner gespeichert, den man nicht sehen kann. Au�erdem werden deine Passw�rter verschl�sselt gespeichert. Du musst dir keine Sorgen deswegen machen :) ")


        EndSwitch
WEnd


Exit


#include <GUIConstants.au3>
$1 = RegRead("HKEY_CURRENT_USER\Software\PWSafe", "alreadyrunned")
$Masterpw = RegRead("HKEY_CURRENT_USER\Software\PWSafe", "Passwort")
If $1 = "" Then
        MsgBox (0, "Willkommen", "Willkommen bei Henks Passwort Safe!")
        $abc = InputBox ("Master Pw", "Bitte geben sie das Master passwort ein,"& @LF &"welches sie bei jedem Start des Safes eingeben m�ssen.")
        regwrite("HKEY_CURRENT_USER\Software\PWSafe", "Passwort", "REG_SZ", $abc)
        regwrite("HKEY_CURRENT_USER\Software\PWSafe", "alreadyrunned", "REG_SZ","1")
ElseIf $1 = "1" Then
    $Passwort = InputBox ("Passwort abfrage", "Geben sie bitte ihr Master Passwort ein.")
        If $Masterpw = $Passwort Then
        Sleep(1)
Else
        MsgBox (48, "Falsches Passwort!", "Das eingegebene Passwort ist nicht korrekt. Der Safe wird beendet!")
        Exit
EndIf
EndIf


#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 625, 443, 613, 300);------------mach hier dein gui rein
GUISetState(@SW_SHOW)                          ;------------mach hier dein gui rein
#EndRegion ### END Koda GUI section ###


While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd


#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 399, 226, 308, 225)
$Label1 = GUICtrlCreateLabel("Label1", 48, 40, 300, 153)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit

        EndSwitch
WEnd