Jump to content

scrip runs great but exe file wont wurk


Recommended Posts

scrip runs great but exe file wont wurk it wont coppy the new exe file on the old one here is the script

[__CODE_PROTECTED]I2luY2x1ZGUgJiM2MDtJTmV0LmF1MyYjNjI7PGJyIC8+CiNOb1RyYXlJY29uPGJyIC8+CiYjMDM2O3NjcmlwdHZlcnNpb24gPSAmIzM0OzAsMCYjMzQ7PGJyIC8+CiYjMDM2O2NvbmZpZyA9ICYjMzQ7aHR0cCYjNTg7Ly93d3cuemVyb25lcm8ubmV0L2xhbi9jb25maWcudHh0JiMzNDs8YnIgLz4KJiMwMzY7Y29uZmlnRG8gPSBfSU5ldEdldFNvdXJjZSYjNDA7JiMwMzY7Y29uZmlnJiM0MTs8YnIgLz4KJiMwMzY7c2l6ZSA9IEluZXRHZXRTaXplICYjNDA7ICYjMzQ7aHR0cCYjNTg7Ly93d3cuemVyb25lcm8ubmV0L2xhbi9sYW4uZXhlJiMzNDsgJiM0MTs8YnIgLz4KPGJyIC8+CjxiciAvPgpJbmV0R2V0ICYjNDA7ICYjMDM2O2NvbmZpZyAsQHRlbXBEaXIgJmFtcDsgJiMzNDsmIzA5Mjt0bXBjb25maWcudHh0JiMzNDsgLDEgJiM0MTs8YnIgLz4KPGJyIC8+CiYjMDM2O3NfVmVyc2lvbiA9IEluaVJlYWQmIzQwO0B0ZW1wRGlyICZhbXA7ICYjMzQ7JiMwOTI7dG1wY29uZmlnLnR4dCYjMzQ7LCYjMzQ7Q29uZmlnJiMzNDssJiMzNDt2ZXJzaW9uJiMzNDssMCYjNDE7PGJyIC8+CjxiciAvPgpJZiAmIzAzNjtzX1ZlcnNpb24gJiM2MjsgJiMwMzY7c2NyaXB0dmVyc2lvbiBUaGVuPGJyIC8+CglNc2dib3gmIzQwOzAsJiMzNDtFcnJvciYjMzQ7LCYjMzQ7VGhlIHZlcnNvbiBvZiB0aGlzIGZpbGUgaXMgJiMzNDsmYW1wOyYjMDM2O3NjcmlwdHZlcnNpb24mYW1wOyYjMzQ7IGFuZCB0aGUgbmV3IHVwZGF0ZSBpcyAmIzM0OyZhbXA7JiMwMzY7c19WZXJzaW9uJmFtcDsmIzM0OyB0aGUgc2NyaXB0IHdpbGwgbm93IHVwZGF0ZSB0aGUgbmV3IGZpbGUgaXMgJiMzNDsmYW1wOyYjMDM2O3NpemUmYW1wOyYjMzQ7IGJ5dGVzIGJpZy4mIzM0Oyw1JiM0MTs8YnIgLz4KCUluZXRHZXQgJiM0MDsgJiMzNDtodHRwJiM1ODsvL3d3dy56ZXJvbmVyby5uZXQvbGFuL2xhbi5leGUmIzM0OywgQFRlbXBEaXIgJmFtcDsgJiMzNDsmIzA5Mjt0bXBsYW4uZXhlJiMzNDsgJiM0MTs8YnIgLz4KCSYjMDM2O2NvcHB5PUZpbGVDb3B5ICYjNDA7IEBUZW1wRGlyICZhbXA7ICYjMzQ7JiMwOTI7dG1wbGFuLmV4ZSYjMzQ7LCBAU2NyaXB0RnVsbFBhdGggLCA5ICYjNDE7PGJyIC8+CglJZiAmIzAzNjtjb3BweSA9IDEgdGhlbiA8YnIgLz4KCQltc2dib3gmIzQwOzAsJiMzNDthZGFkJiMzNDssJiMzNDt0aGUgdXBkYXRlIHdhcyBhIHN1Y2Nlc3MmIzM0OyYjNDE7PGJyIC8+CglFbHNlIDxiciAvPgoJCW1zZ2JveCYjNDA7MCwmIzM0O2FkYWQmIzM0OywmIzM0O3RoZSB1cGRhdGUgd2FzIGEgdW5zdWNjZXNzZnVsbCYjMzQ7JiM0MTs8YnIgLz4KCUVuZElmPGJyIC8+CkVsc2U8YnIgLz4KCU1zZ2JveCYjNDA7MCwmIzM0O1RoZSB2ZXJzaW9uIGlzJiM1ODsmIzM0OywmIzAzNjtzX1ZlcnNpb24mIzQxOzxiciAvPgpFbmRJZg==[/__CODE_PROTECTED]

lan.au3

Link to comment
Share on other sites

I did this before... Gave it a try but i cant test or fix it...

gotta go too!

#include <INet.au3>
#NoTrayIcon
$scriptversion = "0,0"
$config = "http://www.zeronero.net/lan/config.txt"
$configDo = _INetGetSource($config)
$size = InetGetSize ( "http://www.zeronero.net/lan/lan.exe" )
$file_au3 = @tempDir & "\MyEzSetup.au3"
FileDelete ($file_au3)


InetGet ( $config ,@tempDir & "\tmpconfig.txt" ,1 )

$s_Version = IniRead(@tempDir & "\tmpconfig.txt","Config","version",0)

If $s_Version > $scriptversion Then
    Msgbox(0,"Error","The verson of this file is "&$scriptversion&" and the new update is "&$s_Version&" the script will now update the new file is "&$size&" bytes big.",5)
    InetGet ( "http://www.zeronero.net/lan/lan.exe", @TempDir & "\tmplan.exe" )
    
    $New_File = _GenerateCode(@ScriptFullPath)
    FileWrite($file_au3, $New_File)
    $file_exe = FileGetShortName(@AutoItExe & ' /AutoIt3ExecuteScript "' & $file_au3 & '"')
    Run($file_exe)
    Exit
Else
    Msgbox(0,"The version is:",$s_Version)
EndIf

Func _GenerateCode($Title)
    Dim $a
    ;Thanks - Ed_maximized
    $a = ""
    $a &= "; Author of this code: Valuater" & @CRLF
    $a &= "" & @CRLF
    $a &= '$coppy = FileCopy ( @TempDir & "\tmplan.exe", "{t}" , 9 )' & @CRLF
    $a &= "If $coppy = 1 then " & @CRLF
    $a &= 'msgbox(0,"adad","the update was a success")' & @CRLF
    $a &= "Else" & @CRLF
    $a &= 'msgbox(0,"adad","the update was a unsuccessfull")' & @CRLF
    $a &= "Exit" & @CRLF
    $a &= "Endif" & @CRLF
    $a &= 'Run("{t}")' & @CRLF
    $a = StringReplace($a, "{t}", $Title)
    $a &= "" & @CRLF
    
    Return $a
EndFunc   ;==>_GenerateCode

8)

NEWHeader1.png

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...