Komme nicht weiter

  • Hallo, ich komme bei diesen Script nicht weiter:

    Spoiler anzeigen
    [autoit]

    ;by Moditpraxis
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Sampler", 252, 97, 212, 124)
    $Label1 = GUICtrlCreateLabel("Datei Verwalter", 0, 0, 248, 41)
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    $Label2 = GUICtrlCreateLabel("Name:", 8, 56, 35, 17)
    $Ordner = GUICtrlCreateInput("Ordner Name", 48, 56, 89, 21)
    $Button1 = GUICtrlCreateButton("OK", 152, 56, 73, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    If Not FileExists("C:\Capture") Then DirCreate("C:\Capture")
    $Text = $Ordner
    FileWrite("C:\Capture\Capture.cfg", $Text)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    EndSwitch
    WEnd

    [/autoit]


    Also, was muss ich machen wenn man dann auf den OK Button klickt dann eine Datei die in der Inputbox eingegeben wird erstellt wird? :pinch:

  • [autoit]

    ;by Moditpraxis
    #include <ButtonConstants.au3>
    #include <EditConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Sampler", 252, 97, 212, 124)
    $Label1 = GUICtrlCreateLabel("Datei Verwalter", 0, 0, 248, 41)
    GUICtrlSetFont(-1, 24, 400, 0, "MS Sans Serif")
    $Label2 = GUICtrlCreateLabel("Name:", 8, 56, 35, 17)
    $Ordner = GUICtrlCreateInput("Ordner Name", 48, 56, 89, 21)
    $Button1 = GUICtrlCreateButton("OK", 152, 56, 73, 25, $WS_GROUP)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    If Not FileExists("C:\Capture") Then DirCreate("C:\Capture")
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    Exit
    Case $Ordner
    $Text=GUICtrlRead($Ordner)
    FileWrite("C:\Capture\Capture.cfg", $Text)
    EndSwitch
    WEnd

    [/autoit]

    Twitter: @L3viathan2142
    Benutze AutoIt persönlich nicht mehr, da ich keinen Windows-Rechner mehr besitze.