Auto-Start-Login Prog

  • Vorab, ich bin ein Neuling, und die Tutorials habn mir bis jetzt nicht sonderlich weitergeholfen.

    [Blockierte Grafik: http://www.pictureupload.de/originals/pictures/210210001134_tut.png
    Grundgedanke ist, dass wenn man auf Start klickt, ein bestimmtes Programm geöffnet wird und je nach Input die Daten eingegeben werden. Gut wäre auch noch ein Button, der eine .ini erstellt, der die Input-Informationen speichert.

    Was fehlt noch am Code bzw. was muss verändert werden?

    Einmal editiert, zuletzt von mipez (21. Februar 2010 um 14:43)

  • Hallo mipez,

    herzlich willkommen im Forum und viel Spass mit AutoIt.

    Vorab, ich bin ein Neuling, und die Tutorials habn mir bis jetzt nicht sonderlich weitergeholfen.

    besonders lange hast du dich mit den Tuts nicht aufgehalten, sonst hättest du nicht ausserhalb der "Message-Loop" Schleife einen GuiGetMsg() Abfrage verwendet und dass in einer Func, die nie aufgerufen wird. So sollte das Skript aussehen:

    Spoiler anzeigen
    [autoit]

    #cs ----------------------------------------------------------------------------

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

    AutoIt Version: 3.3.4.0
    Author: mipez
    #ce ----------------------------------------------------------------------------
    #include <GUIConstantsEx.au3>

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

    GUICreate("Auto-Start & Auto-Login", 335, 100)

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

    GUICtrlCreateLabel("ID", 8, 10)
    $input1 = GUICtrlCreateInput("", 35, 8, 120)
    GUICtrlCreateLabel("Password", 8, 44)
    $input2 = GUICtrlCreateInput("", 35, 40, 120)

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

    $startbutton = GUICtrlCreateButton("Start", 190, 8, 60)

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

    $exitbutton = GUICtrlCreateButton("Exit", 190, 40, 60)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()

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

    Switch $msg

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

    Case $exitbutton
    GUIDelete()
    Exit
    Case $startbutton
    eingabe()
    EndSwitch

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

    WEnd

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

    Func eingabe()
    MsgBox(0, GUICtrlRead($input1), GUICtrlRead($input2))

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

    EndFunc ;==>eingabe

    [/autoit]

    mfg (Auto)Bert

  • Ich habs jetzt so hinbekommen...
    IniWrite usw hab ich alles schon.

    Spoiler anzeigen
    [autoit]

    #include <GUIConstantsEx.au3>

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

    GUICreate("Auto-Start & Auto-Login", 335, 100)

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

    GUICtrlCreateLabel("ID", 8, 10)
    $input1 = GUICtrlCreateInput("", 35, 8, 120)
    GUICtrlCreateLabel("PW", 8, 44)
    $input2 = GUICtrlCreateInput("", 35, 40, 120)

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

    $startbutton = GUICtrlCreateButton("Start", 10, 74, 60)

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

    $exitbutton = GUICtrlCreateButton("Exit", 80, 74, 60)

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

    $savebutton = GUICtrlCreateButton("Save", 170, 6, 60)

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

    $loadbutton = GUICtrlCreateButton("load", 170, 38, 60)

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

    GUISetState(@SW_SHOW)

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

    While 1
    $msg = GUIGetMsg()

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

    Switch $msg

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

    Case $exitbutton
    GUIDelete()
    Exit

    Case $startbutton
    eingabe()

    Case $savebutton
    save()

    Case $loadbutton
    load()

    EndSwitch

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

    WEnd

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

    Func eingabe()

    WinActivate("S4 Client")
    Send(GUICtrlRead($input1) & "{TAB}" & GUICtrlRead($input2) & "{ENTER}")

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

    EndFunc

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

    Func save()

    $write1 = InputBox("Save ID", "Save your ID in the configuration file", "", "", 300, 130)
    IniWrite(@ScriptDir & "\config.ini", "ID", "ID", $input1)

    $write2 = InputBox("Save PW", "Save your PW in the configuration file", "", "", 300, 130)
    IniWrite(@ScriptDir & "\config.ini", "PW", "PW", $input2)

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

    EndFunc

    [/autoit]


    Nur wie krieg ich jetzt einen Wert aus der ini in das 1. Input?