Hi ich habe hier einen Downloader aber ich wollte noch anzeigen lassen. mit wie viel Kb man läd und wie lange es noch dauert aber ich weiss nicht wie .
kann mir einer script schreiben oder befehle geben .
Spoiler anzeigen
$Form1 = GUICreate("Form1", 632, 450, 356, 164)
$Button1 = GUICtrlCreateButton("Button1", 240, 168, 75, 25)
$Progress1 = GUICtrlCreateProgress(8, 264, 614, 17)
$Label1 = GUICtrlCreateLabel("", 136, 288, 36, 17)
$Graphic1 = GUICtrlCreateGraphic(184, 288, 97, 17)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $Button1
Dim $download[10]
Global $aSize[10], $aGotSize[10], $Size = 0, $GotSize=0
For $i = 0 To UBound($download)-1
$aSize[$i] = InetGetSize("http://www.google.de/intl/de_ALL/images/logos/images_logo_lg.gif")
$Size += $aSize[$i]
Next
$Label1 = $Size
For $i = 0 To UBound($download)-1
$download[$i] = InetGet("http://www.google.de/intl/de_ALL/images/logos/images_logo_lg.gif", "C:\Users\D\Desktop\logo" & $i & ".jpg")
$GotSize += $aSize[$i]
GUICtrlSetData($Progress1, ($GotSize / $Size)*100)
Next
MsgBox(0,"","Fertig")
EndSwitch
WEnd
Gebe dort ein :
