Wie Oben in der Überschrift beschrieben habe ich das Problem das ich über
[autoit]_FTP_FileGet()
[/autoit]Datein von meinem Webspace runterlade ~ 37MB (Variable). Alles ganz normal. Doch sobald sie fertig sein sollte löscht er die Datei einfach? eine Erklärung/Hilfe von euch warum?
Greatz Benman
#edit Script stelle vom Download und speichern:
[autoit]$datei = datei.xyz bzw. datei.123
[/autoit]Die $datei wird durch den wert einer Array gesetzt. Der durch eine While Schleife immer um += 1 gesetzt wird.
[autoit]
Func _Energie_Patcher_Download($Number, $Datei)
$Fehler = 0
DirCreate("pack")
GUICtrlSetData($KB, "Aktuelle Datei: /pack/" & $Datei)
$RoundProzent = Round($i/1.31, 2)
GUICtrlSetData($Fortschrittleiste, $RoundProzent)
GUICtrlSetData($DateiPr, $Datei & " ... Prüfung" & @CRLF & GUICtrlRead($DateiPr))
$FTPSize = IniRead(@ScriptDir&"\Version.ini", "Size", $Datei, 0)
$DirSize = FileGetSize(@ScriptDir&"\pack\"&$Datei)
;MsgBox(0, "", "Datei: " & $Datei & @CRLF & "FTP: " & $FTPSize & @CRLF & "Dir: " & $DirSize)
If $FTPSize <> $DirSize Then
GUICtrlSetData($DateiPr, $Datei & " ... Download" & @CRLF & GUICtrlRead($DateiPr))
$FileDownload = _FTP_FileGet($ConnectFTP, $FTP_Files&$Datei, $LocalSave&$Datei)
GUICtrlSetData($DateiPr, $Datei & " ... Erfolg" & @CRLF & GUICtrlRead($DateiPr))
If @error Then
;MsgBox(16, "Fehler", "Datei " & $Datei & " konnte nicht runtergeladen werden." & @CRLF & "Download wird dennoch fortgesetzt.")
$Fehler += 1
EndIf
If $i = 131 Then
Run(@ScriptDir&"\metin2start.exe")
MsgBox(0, "", "Datei Download vollständig!" & @CRLF & "Fehler: " & $Fehler & @CRLF & "Spiel wird nun gestartet.")
Exit
EndIf
Else
GUICtrlSetData($DateiPr, $Datei & " ... Aktuell" & @CRLF & GUICtrlRead($DateiPr))
If @error Then
;MsgBox(16, "Fehler", "Datei " & $Datei & " konnte nicht runtergeladen werden." & @CRLF & "Download wird dennoch fortgesetzt.")
$Fehler += 1
EndIf
If $i = 131 Then
Run(@ScriptDir&"\metin2start.exe")
MsgBox(0, "", "Datei Download vollständig!" & @CRLF & "Fehler: " & $Fehler & @CRLF & "Spiel wird nun gestartet.")
Exit
EndIf
EndIf
Sleep(1)
EndFunc