GUI Input

  • ich mal wieder

    aber was muss ich machen wenn ich will das das eingegebene in

    [autoit]

    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)

    [/autoit]

    dann in dem skript bei

    [autoit]

    $sPath =

    [/autoit]

    eingefügt wird???


    GUI:

    [autoit]

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\pfad+url abfrage.kxf
    $Form1 = GUICreate("Wolfenstein Pk3 Downloader", 633, 447, 187, 118)
    $Hintergrund = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\wolfenstein-1.jpg", 0, 0, 628, 444, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)
    $URL = GUICtrlCreateInput("URL", 392, 320, 225, 21)
    $OK = GUICtrlCreateButton("OK", 272, 128, 81, 41, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

    Exit

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

    EndSwitch
    WEnd

    [/autoit]

    SKRIPT:

    [autoit]

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

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

    AutoIt Version: 3.2.12.1
    Author: Markus K.

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

    Script Function: New Pk3 Files auto downlaode

    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    #include <IE.au3>
    #Include <File.au3>

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

    $sPath = InputBox ("Pfad/Zielordner", "Gib hier den Zielordner ein,wo die neuen pk3 files gespeichert werden sollen. z.B C:\Programme\Wolfenstein - Enemy Territory\etmain\ <---- Das Letzte \ ist Wichtig.")
    $oIE = _IECreate(InputBox ("URL", "Gib hier den Link ein von dem die neuen pk3 files gedownloaded werden sollen.(z.B. http://dri-downloads.net/etmain/)"))
    $oLinks = _IELinkGetCollection($oIE)
    For $oLink In $oLinks
    If StringInStr($oLink.href, "pk3") Then
    If Not FileExists($sPath & $oLink.innerHTML) Then
    InetGet($oLink.href, $sPath & $oLink.innerHTML)
    EndIf
    EndIf
    Next
    _IEQuit($oIE)

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

    :?::?::?:

    Einmal editiert, zuletzt von bandido1 (6. November 2008 um 13:24)

  • das geht in etwa so:

    [autoit]

    $sPath = InputBox ("Pfad/Zielordner", "Gib hier den Zielordner ein,wo die neuen pk3 files gespeichert werden sollen. z.B C:\Programme\Wolfenstein - Enemy Territory\etmain\ <---- Das Letzte \ ist Wichtig.", Guictrlread($path))

    [/autoit]

    GUIctrlread( ) liest den wert aus dem input feld

  • dann siehts jetzt bei mir so aus:

    [autoit]

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

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

    AutoIt Version: 3.2.12.1
    Author: Markus K.

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

    Script Function: New Pk3 Files auto downlaode

    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    #include <IE.au3>
    #Include <File.au3>

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

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\pfad+url abfrage.kxf
    $Form1 = GUICreate("Wolfenstein Pk3 Downloader", 633, 447, 187, 118)

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

    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)
    $URL = GUICtrlCreateInput("URL", 392, 320, 225, 21)
    $OK = GUICtrlCreateButton("OK", 272, 128, 81, 41, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()

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

    Switch $nMsg

    Case $GUI_EVENT_CLOSE

    Exit

    EndSwitch
    WEnd

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

    $sPath = Guictrlread($pfad))
    $oIE = _IECreate Guictrlread($URL))
    $oLinks = _IELinkGetCollection($oIE)
    For $oLink In $oLinks
    If StringInStr($oLink.href, "pk3") Then
    If Not FileExists($sPath & $oLink.innerHTML) Then
    InetGet($oLink.href, $sPath & $oLink.innerHTML)
    EndIf
    EndIf
    Next
    _IEQuit($oIE)

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit]
  • stimmt das wenn ja, wie kann ich sagen dass wenn ok gedrückt wird der gui geschlossen werden sol , die werte eingtragen (pfad+url)
    und das skript weiter macht??? :?:

  • [autoit]

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

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

    AutoIt Version: 3.2.12.1
    Author: Markus K.

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

    Script Function: New Pk3 Files auto downlaode

    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    #include <IE.au3>
    #Include <File.au3>

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

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\pfad+url abfrage.kxf
    $Form1 = GUICreate("Wolfenstein Pk3 Downloader", 633, 447, 187, 118)

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

    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)
    $URL = GUICtrlCreateInput("URL", 392, 320, 225, 21)
    $OK = GUICtrlCreateButton("OK", 272, 128, 81, 41, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()

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

    Switch $nMsg

    Case $GUI_EVENT_CLOSE

    Exit

    Case $OK

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

    GUIDelete($Form1)
    ExitLoop
    EndSwitch
    WEnd

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

    $sPath = Guictrlread($pfad))
    $oIE = _IECreate Guictrlread($URL))
    $oLinks = _IELinkGetCollection($oIE)
    For $oLink In $oLinks
    If StringInStr($oLink.href, "pk3") Then
    If Not FileExists($sPath & $oLink.innerHTML) Then
    InetGet($oLink.href, $sPath & $oLink.innerHTML)
    EndIf
    EndIf
    Next
    _IEQuit($oIE)

    [/autoit]
  • Guck dir den Fehler an , und du wirst sehen das er eine Klammer falsch gesetzt hat!!!
    So gehts:

    [autoit]


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

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

    AutoIt Version: 3.2.12.1
    Author: Markus K.

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

    Script Function: New Pk3 Files auto downlaode

    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    #include <IE.au3>
    #Include <File.au3>

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

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\pfad+url abfrage.kxf
    $Form1 = GUICreate("Wolfenstein Pk3 Downloader", 633, 447, 187, 118)

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

    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)
    $URL = GUICtrlCreateInput("URL", 392, 320, 225, 21)
    $OK = GUICtrlCreateButton("OK", 272, 128, 81, 41, 0)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    While 1
    $nMsg = GUIGetMsg()

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

    Switch $nMsg

    Case $GUI_EVENT_CLOSE

    Exit

    Case $OK

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

    GUIDelete($Form1)
    ExitLoop
    EndSwitch
    WEnd

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

    $sPath = Guictrlread($pfad)
    $oIE = _IECreate (Guictrlread($URL))
    $oLinks = _IELinkGetCollection($oIE)
    For $oLink In $oLinks
    If StringInStr($oLink.href, "pk3") Then
    If Not FileExists($sPath & $oLink.innerHTML) Then
    InetGet($oLink.href, $sPath & $oLink.innerHTML)
    EndIf
    EndIf
    Next
    _IEQuit($oIE)

    [/autoit]
  • warum gibts bei mir mim pic immer ne fehlermeldung???


    Festplattenbelegung.au3


    [autoit]

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

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

    AutoIt Version: 3.2.12.1
    Author: Markus K.

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

    Script Function: New Pk3 Files auto downlaode

    Template AutoIt script.

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

    #ce ----------------------------------------------------------------------------

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

    #include <IE.au3>
    #Include <File.au3>

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

    #include <GUIConstants.au3>

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

    #Region ### START Koda GUI section ### Form=C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\pfad+url abfrage.kxf
    $Form1 = GUICreate("Wolfenstein Pk3 Downloader", 633, 447, 187, 118)
    $Hintergrund = GUICtrlCreatePic("C:\Dokumente und Einstellungen\Markus\Desktop\autoit-Projekts\Projects\Dowloader\Final\wolfenstein-1.jpg", 0, 0, 628, 444, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    $Pfad = GUICtrlCreateInput("Pfad", 8, 320, 225, 21)
    $URL = GUICtrlCreateInput("URL", 392, 320, 225, 21)
    $OK = GUICtrlCreateButton("OK", 272, 128, 81, 41, 0)
    $Information = GUICtrlCreateLabel("z.B C:\Programme\Wolfenstein - Enemy Territory\etmain\", 8, 424, 274, 17)
    GUICtrlSetBkColor(-1, 0x004E98)
    $Informatio = GUICtrlCreateLabel("z.B. http://alienzown.co.uk/etmain/", 392, 424, 177, 17)
    GUICtrlSetBkColor(-1, 0x004E98)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

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

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

    GUIDelete($Form1)
    ExitLoop

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

    EndSwitch
    WEnd

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

    $sPath = Guictrlread($pfad)
    $oIE = _IECreate (Guictrlread($URL))
    $oLinks = _IELinkGetCollection($oIE)
    For $oLink In $oLinks
    If StringInStr($oLink.href, "pk3") Then
    If Not FileExists($sPath & $oLink.innerHTML) Then
    InetGet($oLink.href, $sPath & $oLink.innerHTML)
    EndIf
    EndIf
    Next
    _IEQuit($oIE)

    [/autoit]
  • Also alles können wir dir nun auch nicht vorkauen!
    Solltest vllt mal das Include für Gui-Styles raussuchen!
    Habe echt keine Lust dir dein komplettes Script zu schreiben , sry.