Jump to content

Updating my software


Recommended Posts

Ok so i want my program to be updateable so i threw in a function that updates but i don't know why it doesn't work.

CODE
FileDelete(@TempDir & "/Version.ini")

InetGet("http://www.andrewshangout.com/aast/Version.ini", @TempDir & "/Version.ini", 1, 1)

While @InetGetActive

TrayTip("AAST", "Checking for Update", 10, 16)

Sleep(250)

Wend

TrayTip("","",0)

$version = IniRead(@TempDir & "/Version.ini", "AAST", "Version", "")

$version2 = "1.7.3.189"

if $version <> $version Then

MsgBox(0,"Andrew's Anti Snooping Tool Version 1.7.3.189", "Your software will now be updated to the latest version. ")

InetGet("http://www.andrewshangout.com/aast/AASTInstall.exe", @TempDir & "/AASTInstall.exe", 1, 1)

While @InetGetActive

TrayTip("AAST", "Downloading Update: Bytes = " & @InetGetBytesRead, 10, 16)

Sleep(250)

Wend

TrayTip("","",0)

TrayTip("AAST","Downloading Update: Complete",10,16)

Sleep(2000)

Run(@TempDir & "/AASTInstall.exe")

Exit

Else

MsgBox(0,"Andrew's Anti Snooping Tool Version 1.7.3.189", "Your AAST software is up to date. ")

EndIf

update: wow i'm a fricken moron, found the problem (if $version <> $version Then) durrrr

Edited by SleepyXtreme
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...