#RequireAdmin
#include <FTPEx.au3>
#include <Array.au3>
#include <misc.au3>
Global $sPassword = "*****"
Global $sUser = "*****"
Global $sServer = "*****"
Global $spath = "C:\arbeitsprojekt.doc"
Global $sOrdner = "/"
Global $sFilename = "arbeitsprojekt.doc"

While 1
Sleep (60000)
$hProgress = GUICtrlCreateProgress(8, 32, 297, 25)
$hLabel = GUICtrlCreateLabel("", 91, 70, 200, 25)
$hOpen = _FTP_Open("Autoit")
$hConnect = _FTP_Connect($hOpen, $sServer, $sUser, $sPassword, 1)

 _FTP_ProgressUpload($hConnect, $sPath, $sOrdner&$sFilename, "_Update_Progress")


_FTP_Close($hOpen)
_FTP_Close($hConnect)
Sleep(1000)
WEnd

 Func _Update_Progress($iProzent)
    GUICtrlSetData($hProgress, $iProzent)
    GUICtrlSetData($hLabel, "Hochladen bei " & $iProzent & "% (Abbruch mit F8)")
    If _IsPressed("77") Then Return 0
    Return 1
EndFunc