Upload per FTP

    Hi
    ich möchte mithilfe der FTPEx.au3 eine Datei auf einem FTP-Server hochladen.
    Ich habe bereits folgendes, kleines Script geschrieben:

    [autoit]

    #include <FTPEx.au3>

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

    $server = "server.com"
    $username = "user123"
    $pass = "secret"

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

    $localfile = "file.txt"
    $remotefile = "file.txt"
    $remotedir = "/folder"

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

    $ftpo = _FTP_Open("ftp")
    $ftpcon = _FTP_Connect($ftpo, $server, $username, $pass)

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

    If Not $ftpcon Then
    MsgBox(16, "Debugstatus", "Error while connecting!")
    Exit
    Else
    MsgBox(0, "Debugstatus", "Connected.")
    EndIf

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

    _FTP_DirSetCurrent($ftpcon, $remotedir)

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

    $ftpupload = _FTP_FilePut($ftpcon, $localfile, $remotefile)

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

    If Not $ftpupload Then
    MsgBox(16, "Debugstatus", "Error while uploading!"&@CRLF&@error)
    Exit
    Else
    MsgBox(0, "Debugstatus", "Uploading.")
    EndIf

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

    $ftpc = _FTP_Close($ftpo)
    MsgBox(0, "Debugstatus", "Disconnected.")

    [/autoit]


    Leider gibt es beim Uploaden immer -1 als Error.

    Kann mir jemand helfen :?:
    THX im vorraus!