Fortschritt!?!

1. offizieller Beitrag

    In Kurzform sollte es so aussehen:


    GUICtrlSetDATA ( $progressbarID, Round ([Bytes geschafft]/[Bytes gesamt] * 100))


    Wobei $progressbarID die ID Deiner mit "GUICtrlCreateProgress" erzeugten Progressbar ist.
    Kompliziert ist meist, die Größe des gesamten Downloads bei Beginn zu wissen.

    Zur Nutzung dieses Forum's, ist ein Übersetzer für folgende Begriffe unerlässlich:

    "On-Bort, weier, verscheiden, schädliges, Butten steyling, näckstet, Parr, Porblem, scripe, Kompletenz, harken, manuel zu extramieren, geckukt, würglich, excell, acces oder Compilevorgeng"

    Hi,

    naja wie gesagt mit einer progressbar,
    dann mit inetget und @InetGetBytesRead und dem richtigen flag bei inetget.
    dort muesste alles beschrieben stehn.
    und um zu wissen wie gross die datei ist inetgetsize.

    irgendjemand hat hier auch mal genau sowas mit schoenem style gemacht kannst ja mal suchen :)

    mfg

    • Offizieller Beitrag

    Hallo

    Hab mal vor Jahren ein Script geschrieben was das gemacht hat (damals noch mit FileGetSize und If $Prozent > 99 Then Exitloop^^)
    Hab es mal etwas überarbeitet, so das es abgestimmt für die neue AutoIt version ist:

    Spoiler anzeigen
    [autoit]

    $site = InputBox("Internet Download","Site wo der Download drauf ist",ClipGet())
    If @error Then Exit
    $save = StringSplit($site,"/")
    $erw = StringSplit($save[$save[0]],".")
    $erw = $erw[$erw[0]]
    $erwtext = $erw&" Datei"
    If $erw = "" Or StringLen($erw) > 5 Then
    $erw = "*"
    $erwtext = "Alle"
    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    $punkt = FileSaveDialog("Pfad wo Download hinkopiert werden Soll","D:\donwload\Alle downloads",$erwtext&"(*."&$erw&")",16,$save[$save[0]])
    If @error Then Exit
    $orisize = InetGetSize($site)
    InetGet($site,$punkt,1,1)
    ProgressOn("Download","")
    While @InetGetActive
    $size1 = FileGetSize($punkt)
    $MBsize1 = FileGetSize($punkt)
    $Prozent = 100 * @InetGetBytesRead / $orisize
    $decimalplace = Round ($Prozent)
    $decimalplaceMBsize1 = Round (@InetGetBytesRead / 1024)
    ProgressSet ($Prozent, $decimalplace & "% " & "(" & $decimalplaceMBsize1 & ") Kb has been Downloaded.")
    WEnd
    ProgressOff ()
    RunWait("explorer.exe """&$punkt)

    [/autoit]

    Mfg Spider