_Ftp_ProgressDownload Error

  • Hi Leute !
    Ich habe dieses Script hier: (nur ein teil vom ganzen ^^)

    Spoiler anzeigen
    [autoit]

    $read_download = guictrlread($List1)
    _FTP_ProgressDownload($conn,$read_download,$read_download)
    if @error Then
    msgbox(64,"Download","Download fehlgeschlagen")
    Else
    msgbox(64,"Download","Download erfolgreich!")
    EndIf

    [/autoit]


    Nun zu meinem Problem.
    Wenn ich vorher den Befehl _Ftp_ProgressUpload benutze, lädt er die Datei bei _Ftp_ProgressDownload immer in das Verzeichnis, aus dem vorher die Datei stammt, die ich hochgeladen habe.
    Wenn ich es aber so mache:

    Spoiler anzeigen
    [autoit]

    _FTP_ProgressDownload($conn,$read_download,@scriptdir & "\" & $read_download)]

    [/autoit]


    bekomme ich immer einen Error.
    Kann mir einer weiterhelfen?

  • Hallo Hugbert,

    komplettes Skript bitte, da man an dem Schnipsel nicht erkennen kann wo der Fehler liegen soll. Mein Glaskugel tippt auf einen fehlerhaaften Pfad bei der Remotedatei.

    Interesant ist natürlich auch welchen Wert @error hat,

    mfg autoBert

  • Hmm, okay, aber bitte erzählt mir nichts vonwegen das wäre sinnlos oder sowas, darauf kann ich verzichten.

    Spoiler anzeigen
    [autoit]

    #RequireAdmin
    #include <FTPEx.au3>
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <GUIListBox.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("FTP Share", 490, 442, 192, 124)
    $Button1 = GUICtrlCreateButton("Upload", 8, 8, 75, 25)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Button2 = GUICtrlCreateButton("Download", 88, 8, 75, 25)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Button3 = GUICtrlCreateButton("Refresh", 168, 8, 75, 25)
    GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
    $Button4 = GUICtrlCreateButton("Favorites", 248, 8, 75, 25)
    $Button5 = GUICtrlCreateButton("About", 328, 8, 75, 25)
    $Button6 = GUICtrlCreateButton("Exit", 408, 8, 75, 25)
    $List1 = GUICtrlCreateList("", 8, 40, 473, 383)
    $Label1 = GUICtrlCreateLabel("Status: Verbinden...", 9, 425, 604, 17)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###

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

    $server = 'f'
    $user = 'k'
    $pw = 'k'
    $open = _Ftp_Open("ShareCon")
    $conn = _ftp_connect($open,$server,$user,$pw)
    if @error Then
    msgbox(64,"Fehler","Konnte keine Verbindung zum FTP Server herstellen!")
    Exit
    EndIf

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

    _ftp_fileget($conn,"files.txt","temp.esm")
    $read_files = fileread("temp.esm")
    filedelete("temp.esm")
    guictrlsetdata($List1,$read_files)
    guictrlsetdata($Label1,"Status: Verbunden !")

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

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

    Case $Button1
    $select = fileopendialog("Upload",@scriptdir,"All (*.*)")
    if $select = "" Then
    msgbox(64,"Upload","Keine Datei ausgewählt!")
    Else
    $split=Stringsplit($select,"\")
    $upload_name = $split[$split[0]]
    guictrlsetdata($Label1,"Status: Vorbereiten...")
    _ftp_fileget($conn,"files.txt","temp.esm")
    filewrite("temp.esm","|" & $upload_name)
    _ftp_fileput($conn,"temp.esm","files.txt")
    filedelete("temp.esm")
    guictrlsetdata($Label1,"Status: Hochladen...")
    _FTP_ProgressUpload($conn,$select,$upload_name)
    if @error Then
    msgbox(64,"Upload","Upload fehlgeschlagen!")
    Else
    msgbox(64,"Upload","Upload erfolgreich!")
    EndIf
    guictrlsetdata($Label1,"Status: Aktualisieren...")
    guictrldelete($List1)
    $List1 = GUICtrlCreateList("", 8, 40, 473, 383)
    _FTP_fileget($conn,"files.txt","temp.esm")
    $read_files = fileread("temp.esm")
    filedelete("temp.esm")
    guictrlsetdata($List1,$read_files)
    guictrlsetdata($Label1,"Status: Verbunden !")
    EndIf

    Case $Button2
    $read_download = guictrlread($List1)
    if $read_download = "" Then
    msgbox(64,"Download","Bitte wählen sie eine Datei aus!")
    Else
    _FTP_ProgressDownload($conn,$read_download,$read_download)
    if @error Then
    msgbox(64,"Download","Download fehlgeschlagen")
    Else
    msgbox(64,"Download","Download erfolgreich!")
    EndIf
    EndIf

    Case $Button3
    guictrlsetdata($Label1,"Status: Aktualisieren...")
    guictrldelete($List1)
    $List1 = GUICtrlCreateList("", 8, 40, 473, 383)
    _ftp_fileget($conn,"files.txt","temp.esm")
    $read_files = fileread("temp.esm")
    filedelete("temp.esm")
    guictrlsetdata($List1,$read_files)
    guictrlsetdata($Label1,"Status: Verbunden !")

    Case $Button4
    msgbox(64,"Info","Funktion leider noch nicht verfügbar!")
    Case $Button5
    msgbox(64,"About","FTP Share Tool" & @crlf & "2011 by AKStudios")

    Case $Button6
    _ftp_close($open)
    exit

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

    EndSwitch
    WEnd
    _ftp_close($open)

    [/autoit]

    Einmal editiert, zuletzt von Hugbert (16. Juni 2011 um 17:02)

  • Schau dir mal die Reihenfolge der Parameter an. Die ist nicht ganz konsistent mit _FTP_FileGet(