username & password (loginbox )

  • hi,

    SuFu nix ergeben^^ hat wer ne idee wie man so ne einfache loginbox kreieren kann, ich habs probiert mit ein paar projekten das einfach umzuschreiben aber hat ned geklappt =(. also hat da einer ne idee bzw kann mir weiterhelfen :) thx

  • Hi!

    Erstelle deine Eigene Gui mit dem Koda:

    Labels und Inputs und ein Button: Fertig!

    Denn Case $button1
    Und hier die Inputs auslesen und mit einer ausgelesenen Text oder Ini Datei überprüfen ob die eingaben übereinstimmen!

    GGF. die Werte verschlüsselt in die registry schreiben!

    Ich hoffe ich konnte helfen!


    Mfg Lenny!

    Jaja, Moo does the Cow!

  • Villeicht mit 2 inputs?

    [autoit]

    #Include <process.au3>
    HotKeySet("^!y", "MeinExit")

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

    if InputBox("Passort","Um auf meine geheimsten Sachen zugreifen zu können muss du das Passwort kennen.", "", "*M10") = "Passwort" then
    Login()

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

    EndIf

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

    Func Login()
    if InputBox("Login","Um auf meine geheimsten Sachen zugreifen zu können muss du den login kennen.", "", "*M10") = "Loginname" then
    Login()

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

    Func MeinExit()
    Exit
    EndFunc

    [/autoit]
  • boa >.> ich überreis das ned jetzt fang ich ma so an wo ich vor 2 stunden auch schon war xD

    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 193, 125)
    $Label1 = GUICtrlCreateLabel("username", 32, 184, 111, 33)
    GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif")
    $Input1 = GUICtrlCreateInput("Input1", 176, 184, 377, 21)
    $Button1 = GUICtrlCreateButton("Button1", 160, 336, 289, 81, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $button1 = IniRead(@ScriptDir & '/hiduei.ini',"section1","key","not found")


    EndSwitch
    WEnd

    [/autoit]

    lg


    sry for de blöde frage -.-

  • Das sollte dir wohl weiterhelfen.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GuiEdit.au3>

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

    $form = GUICreate("Login", 321, 162, 193, 115)
    GUISetBkColor(0xFFFBF0)

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

    GUICtrlCreateLabel("Login:", 40, 40, 46, 20)
    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
    GUICtrlCreateLabel("Password:", 40, 80, 76, 20)
    GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")

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

    $input1 = GUICtrlCreateInput("", 120, 40, 161, 21)
    $input2 = GUICtrlCreateInput("", 120, 80, 161, 21, $ES_PASSWORD)

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

    GUICtrlCreateLabel("Benutzer-Konto", 72, 8, 181, 31)
    GUICtrlSetFont(-1, 14, 800, 0, "Arial Black")

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

    $leave = GUICtrlCreateButton("LEAVE", 168, 120, 113, 25, 0)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $go = GUICtrlCreateButton("GO =>", 40, 120, 113, 25, 0)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")

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

    GUISetState(@SW_SHOW)

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

    While 1
    Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
    Exit
    Case $leave
    Exit
    Case $go
    If GUICtrlRead($input1) = "uschi" AND GUICtrlRead($input2) = "6b864261efd5f125aca5e8bd27a7c7a4" Then
    MsgBox(0, "Meldung", "alles prima")
    Else
    MsgBox(0, "Meldung", "Login falsch")
    Exit
    EndIf
    EndSwitch
    WEnd

    [/autoit]

    6 Mal editiert, zuletzt von h00k (6. August 2008 um 23:34)

  • [autoit]


    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 633, 447, 193, 125)
    $Label1 = GUICtrlCreateLabel("username", 32, 184, 111, 33)
    GUICtrlSetFont(-1, 18, 400, 0, "MS Sans Serif")
    $Input1 = GUICtrlCreateInput("Input1", 176, 184, 377, 21)
    $Button1 = GUICtrlCreateButton("Button1", 160, 336, 289, 81, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $button1
    $inhalt = GUICtrlRead($input1)
    If $inhalt = "bla" Then; Oder hier dein Ini Kram
    "Hier was passieren soll wenn eingabe stimmt"
    EndSwitch
    WEnd

    [/autoit]


    Mfg Lenny!

    Jaja, Moo does the Cow!

    Einmal editiert, zuletzt von Lenny (7. August 2008 um 01:04)