Download + Progress Bar

[ca143508]

This is what I have at the moment. Unfortunately the progress bar comes up but does not show the graphical filling. Is it that it downloads faster than the progress bar can re-calculate? Or is this a pipe dream???

Any help would be great.

Thanks,

Mike.

==========================================================

#include <GuiConstants.au3>

$DownloadNow = MsgBox(4,"My App","Would you like to download the latest update now?")

If $DownloadNow = 6 Then

Call("Download")

Else

Msgbox(0,"My App","The latest update will not be downloaded. The previous version will be opened.")

Run("OldFile.exe",2)

EndIf

Func Download()

InetGet("ftp://myserver/updatedfile.exe", "C:\Replacedfile.exe", 1, 1)

While @InetGetActive

$FileSize = InetGetSize("ftp://myserver/updatedfile.exe")

$filedownload = round(@InetGetBytesRead/1048576, 2)

$Percent = $filedownload/$FileSize

ProgressOn("My Download","")

ProgressSet($Percent,"Downloaded - " & $filedownload & " Mb")

;TrayTip("Downloading...", "Downloaded = " & $filedownload & " Mb", 10, 16)

Sleep(250)

Wend

ProgressOff()

EndFunc

============================================================

[RazerM]

ive commented your code to show you where you went wrong

#include <GuiConstants.au3>
Note: this should be in support, i just noticed it wasn't
$DownloadNow = MsgBox(4,"My App","Would you like to download the latest update now?")
If $DownloadNow = 6 Then
    Download();you don't need to use call
Else
    Msgbox(0,"My App","The latest update will not be downloaded. The previous version will be opened.")
    Run("OldFile.exe",2)
EndIf

Func Download()
    ProgressOn("My Download","", "", -1, -1, 16);you must set progress on before loop
    InetGet("ftp://myserver/updatedfile.exe", , "C:\Replacedfile.zip", 1, 1)
    $FileSize = InetGetSize("ftp://myserver/updatedfile.exe", )/1048576;need to divide by 1048576 also, variables that don't change should be outside loop
    While @InetGetActive
        $filedownload = round(@InetGetBytesRead/1048576, 2)
        $Percent = Round(($filedownload/$FileSize)*100);need to mutliply by 10 to get percentage
        ProgressSet($Percent,"Downloaded - " & $filedownload & " Mb")
;TrayTip("Downloading...", "Downloaded = " & $filedownload & " Mb", 10, 16)
        Sleep(250)
    Wend
    ProgressOff()
EndFunc ;==>Download

Edited May 7, 2006 by RazerM

[Valuater]

this one is really nice

http://www.autoitscript.com/forum/index.ph...opic=16868&hl=#

8)

[ca143508]

Sorry guys. I just realised this is in the wrong forum.

[doomsday_jesus]

This script rules. Thank you guys. This is just what the doctor ordered...

I needed something very straight and to the point for a script I am working on for a group of rather high maintenance users. All I needed was a method of download with a progress bar... no option to cancel download. RazorM's modification delivered exactly what I needed.

Thanks Dudes!