Das Downloadfenster hängt sich auf und die Progressbar füllt sich erst nach dem Download.
Hier is der Quellecode:
[autoit]#include <EditConstants.au3>#include <GUIConstantsEx.au3>#include <ProgressConstants.au3>#include <StaticConstants.au3>#include <WindowsConstants.au3>$Form1 = GUICreate("Downloader", 378, 354, 189, 121)
$Progress1 = GUICtrlCreateProgress(8, 320, 361, 25)$Label1 = GUICtrlCreateLabel("Datei:", 8, 296, 32, 17)$Edit1 = GUICtrlCreateEdit("", 8, 8, 361, 289, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_HSCROLL,$WS_VSCROLL))GUICtrlSetData(-1, "Es sind "&$anzahl&" neue Dateien zum Download vorhanden."&@CRLF&"Der Downloadvorgang beginnt......")
$Label3 = GUICtrlCreateLabel("", 48, 296, 230, 17)GUISetState(@SW_SHOW)GUICtrlSetData($Label3, "Dateiname")
While 1
$down1 = InetGet("http://www.seite.de/datei","./datei") If @error Then MsgBox(16,"Error","Die Datei konte nicht gedownloadet werden. Errorcode: "&@error) Exit EndIf $size1 = InetGetSize("http://www.seite.de/datei") $Percent = round ($size1) GUICtrlSetData($Progress1,$Percent) $FileSize = FileGetSize("./datei") If $size1 = $FileSize Then GUICtrlSetData($Edit1,"Der Download der Datei war erfolgreich.") Sleep(3000) Exit EndIf
Ihr müsst mir helfen !!! ![]()