Größe einer herunterzuladenden Datei ermitteln
Verfasst: 01.12.2018 10:25
Ich habe hier ein leicht abgewandeltes Beispiel aus der PB-Dokumentation, um eine Datei aus dem Internet herunterzuladen:
Funktioniert auch soweit ganz gut. Nun möchte ich gerne vor dem Download wissen, wie groß diese Datei ist, damit ich ausgeben kann, wie viel Prozent schon heruntergeladen wurden.
Wie geht das?
Danke im Voraus & Grüße ... Peter
Code: Alles auswählen
EnableExplicit
Define Download, Progress, Size
InitNetwork()
Download = ReceiveHTTPFile("http://www.purebasic.com/download/OgreAssimpConverter.zip", GetTemporaryDirectory() + "OgreAssimpConverter.zip", #PB_HTTP_Asynchronous)
If Download
Repeat
Progress = HTTPProgress(Download)
Select Progress
Case #PB_HTTP_Success
Size = FinishHTTP(Download)
Debug "Download finished (size: " + Size + ")"
Break
Case #PB_HTTP_Failed
Debug "Download failed"
Break
Case #PB_HTTP_Aborted
Debug "Download aborted"
Break
Default
Debug "Current download: " + Progress
EndSelect
Delay(500)
ForEver
Else
Debug "Download error"
EndIfWie geht das?
Danke im Voraus & Grüße ... Peter