My Sript

[merde]

Hello,

Sorry for my language but i am french

I am trying to do an automatic update with this poor script :

#NoTrayIcon

#include <Inet.au3>

$size = InetGetSize("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe")

$size1 = FileGetSize("ClamWinPortable.exe")

If $size = $size1 Then

Exit

endif

Else

InetGet("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe", @DesktopDir & "\ClamWinPortable.exe", 1)

If InetGetSize = 0 Then

Sleep(10000)

Run("Myfile.exe")

endif

But it don't work very well

How can i do to release this ?

PS : i am beginner

THANKS

[GaryFrost]

try

#NoTrayIcon
#include <Inet.au3>

$size = InetGetSize("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe")
$size1 = FileGetSize("ClamWinPortable.exe")

If $size = $size1 Then
    Exit
    
Else
    InetGet("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe", @DesktopDir & "\ClamWinPortable.exe", 1)
    
    While @InetGetActive
        Sleep ( 1000 )
    WEnd
    Run("Myfile.exe")
        
EndIf

Edited May 9, 2006 by gafrost

[JSThePatriot]

Okay a few things... Welcome to the forums and AutoIt! Dont worry about your English. I get the meaning of what you are trying to convey.

Use [ code ] [ /code ] (without spaces) to encompass your code. Looks nicer and easier to read.

Now about your code.

You seem to want this to check every 10 seconds to see if there is a new version is this the case? If so why so often? I dont know of any software that checks for an update ever 10 seconds.

Is there a dat file that you can download and check version numbers? That is what we did her at AutoIt so we could include the AutoUpdateIt program. Look around there probably is a better way than checking size.

Study the below code. It only checks every 10 minutes, and should work out for you. You may want to consider getting SciTE it helps with formatting of AutoIt Scripts. It can be found at SciTE4AutoIt3.

expandcollapse popup

#NoTrayIcon
; Press Esc to terminate script, Pause/Break to "pause"

Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Dim $minutes = 10
Dim $sleep = $minutes * 1000 * 60

While 1
    _UpdateCheck()
    Sleep($sleep)
WEnd

Func _UpdateCheck()
    $size = InetGetSize("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe")
    $size1 = FileGetSize("ClamWinPortable.exe")

    If $size = $size1 Then
        Return
    Else
        InetGet("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe", @DesktopDir & "\ClamWinPortable.exe", 1)
    EndIf
EndFunc

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc

I hope this helps you in your scripting endeavors.

Good luck and keep it fun!,

JS

[JSThePatriot]

GJ gafrost...beat me!

[merde]

OK,

Thanks for your answer gafrost

But there's a problem : When the download finish, "autoit" want to run myfile.exe or i it is not the thing wanted.

In my idea, i would like : if the download is right, EXIT the program.

Do you understand me ?

[GaryFrost]

OK,

Thanks for your answer gafrost

But there's a problem : When the download finish, "autoit" want to run myfile.exe or i it is not the thing wanted.

In my idea, i would like : if the download is right, EXIT the program.

Do you understand me ?

sounds like you want to keep trying to you get a sucessful download then exit script

[merde]

Waiting please, i am going to contact a french friend who speak very good english...

Edited May 9, 2006 by merde

[JSThePatriot]

This will do what you are asking..

expandcollapse popup

#NoTrayIcon
; Press Esc to terminate script, Pause/Break to "pause"

Global $Paused
HotKeySet("{PAUSE}", "TogglePause")
HotKeySet("{ESC}", "Terminate")

Dim $minutes = 1
Dim $sleep = $minutes * 1000 * 60

While 1
    _UpdateCheck()
    Sleep($sleep)
WEnd

Func _UpdateCheck()
    $size = InetGetSize("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe")
    $size1 = FileGetSize("ClamWinPortable.exe")

    If $size = $size1 Then
        Return
    Else
        InetGet("http://iportable.tuxfamily.org/dl/ClamWinPortable.exe", @DesktopDir & "\ClamWinPortable.exe", 1)
        Terminate()
    EndIf
EndFunc

Func TogglePause()
    $Paused = NOT $Paused
    While $Paused
        sleep(100)
        ToolTip('Script is "Paused"',0,0)
    WEnd
    ToolTip("")
EndFunc

Func Terminate()
    Exit 0
EndFunc

This will check for the update every minute until it downloads it. You can stop it early by pressing ESC or Pause it by pressing PAUSE. NOTE: You cannot pause the actual download.

I hope this helps accomplish what you want,

JS