Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 00:29

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Updates wie?

Discussion on Updates wie? within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
Updates wie?

hi liebe com :P

wie kann man ins ein script es einstellen das wenn einer z.b auf den button update geht das dann die neue version kommt??
KingZuck is offline  
Old 08/27/2010, 18:52   #2
 
elite*gold: 0
Join Date: Mar 2010
Posts: 79
Received Thanks: 32
Ich wüsste eine Möglichkeit. Du legst dir ne HP zu dort lädst du immer die neuste Version hoch zum Downloaden. Und wenn du auf den Button klickst soll er die Datei herunterladen.
luckkylooser is offline  
Old 08/27/2010, 19:09   #3
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
hmmm so hätte ich es gemacht dachte es geht i-wie anders schade....
KingZuck is offline  
Old 08/27/2010, 19:20   #4
 
93hacker's Avatar
 
elite*gold: 0
Join Date: Jun 2010
Posts: 171
Received Thanks: 52
du machst dir nen webspace *b*l*a*c*e*d*.*d*e
dann machst du dir ne .txt datei wo die aktuelle version drin steht.
Die lädst du auf deinen webspace mit filezilla (einfach ma googlen)
und beginnst den script mit diesem code:
Code:
$aktuelleversion = "1.0"
inetget ("downloadlink zur datei","version.txt")
$datei = fileopen ("version.txt")
$version = fileread ($datei)
fileclose ($datei)
if $version = $aktuelleversion then
msgbox (0,"Version","Version stimmt überein")
else
msgbox (0,"Version","Version stimmt nicht überein")
msgbox (0,"Version","Die neueste Version wird heruntergeladen")
inetget ("neue version link","neue version.exe")
run ("neue version.exe")
exit
endif
93hacker is offline  
Thanks
1 User
Old 08/27/2010, 20:07   #5
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
thx=)

aber dann downlaodet er aber doch nicht die neue version o.O

bzw wie soll ich den link zur neuen exe einbauen wenn die neue version nicht exestiert?
KingZuck is offline  
Old 08/27/2010, 20:24   #6
 
Imaginär's Avatar
 
elite*gold: 255
Join Date: Nov 2009
Posts: 2,900
Received Thanks: 1,408
Quote:
Originally Posted by KingZuck View Post
thx=)

aber dann downlaodet er aber doch nicht die neue version o.O

bzw wie soll ich den link zur neuen exe einbauen wenn die neue version nicht exestiert?
Dann schreibste in die Datei ( Version.txt z.Bsp ) den gleichen Wert wie $Version.

PHP Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>



Global $Version 3.08


$Form1 
GUICreate("Updater"176119192124)
$Button1 GUICtrlCreateButton("Check for Updates"3272107250)
$Label1 GUICtrlCreateLabel("Deine Version:"887317)
$Label2 GUICtrlCreateLabel("Aktuelle Version:"8408317)
$version_label GUICtrlCreateLabel($Version9683817)
$newversion GUICtrlCreateLabel("0.00"96405817)
GUISetState(@SW_SHOW)


While 
1
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
            
        Case 
$Button1
            $Datei 
InetGet("http://tivipri.ti.funpic.de/Version.txt""Version.txt"1)
            
            
$open FileOpen("Version.txt")
            
$read FileRead($open)
            
$close FileClose($open)
            
            
GuiCtrlSetData($newversion$read)
            
FileDelete("Version.txt")
            
            if 
$Version <> GuiCtrlRead($newversionThen
                $Msg 
MsgBox(4+32,"Meldung","Neue Version verfügbar - Downloaden?")
                
            if 
$Msg 6 Then ;Wenn man [JAdrückt dann..
                  
InetGet("[LINKADRESSE]""[NAME]"1)
            EndIf
                        elseif 
$Version == GuiCtrlRead($newversionThen
                          $Msg 
MsgBox(0,"Meldung","Du hast bereits die neueste Version!"
            EndIf
                        EndIf
            
        EndSwitch
    
WEnd 
Hier nochmal mit einem Gui & einer geuploadeten Datei zum testen.
Imaginär is offline  
Thanks
1 User
Old 08/27/2010, 23:59   #7
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,147
Die Programm eigene Version würde ich einfach mit
PHP Code:
FileGetVersion(@AutoItExe
ermitteln.
Vor der Versionsabfrage am besten noch ein
PHP Code:
If @Compiled Then ;... 
und man kann sich das anpassen der Variable sparen.
KDeluxe is offline  
Old 08/28/2010, 12:39   #8
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
ich check es nit bei mir will es net >.<
KingZuck is offline  
Old 08/28/2010, 12:50   #9
 
elite*gold: 0
Join Date: Mar 2010
Posts: 79
Received Thanks: 32
Was checkst du denn nicht? Ist doch ganz simpel.
luckkylooser is offline  
Old 08/28/2010, 13:09   #10
 
93hacker's Avatar
 
elite*gold: 0
Join Date: Jun 2010
Posts: 171
Received Thanks: 52
Hab den script von _DownTime noch bissl verbessert mit der neuen Version download:
PHP Code:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>



Global $Version 3.08


$Form1 
GUICreate("Updater"176119192124)
$Button1 GUICtrlCreateButton("Check for Updates"3272107250)
$Label1 GUICtrlCreateLabel("Deine Version:"887317)
$Label2 GUICtrlCreateLabel("Aktuelle Version:"8408317)
$version_label GUICtrlCreateLabel($Version9683817)
$newversion GUICtrlCreateLabel("0.00"96405817)
GUISetState(@SW_SHOW)


While 
1
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
            
        Case 
$Button1
            $Datei 
InetGet("http://tivipri.ti.funpic.de/Version.txt""Version.txt"1)
            
            
$open FileOpen("Version.txt")
            
$read1 FileReadline($open,1)
            
$read2 filereadline ($open,2)
            
$close FileClose($open)
            
            
GuiCtrlSetData($newversion$read)
            
FileDelete("Version.txt")
            
            if 
$Version <> $read1 Then
                $Msg 
MsgBox(4+32,"Meldung","Neue Version verfügbar - Downloaden?")
                
            if 
$Msg 6 Then ;Wenn man [JAdrückt dann..
                  
InetGet($read2"neue version.exe"1)
run ("neue version.exe")
            EndIf
                        elseif 
$Version == $read1 Then
                          $Msg 
MsgBox(0,"Meldung","Du hast bereits die neueste Version!"
            EndIf
                        EndIf
            
        EndSwitch
    
WEnd 
In der 2ten zeile in der Version.txt sollte der downloadlink stehen zur neuen version
93hacker is offline  
Old 08/28/2010, 14:59   #11
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,147
Ihr denkt zu umständlich:
PHP Code:
#include <GUIConstantsEx.au3>

$Version FileGetVersion(@AutoItExe)
$Server "http://tivipri.ti.funpic.de/"
$InetVersion _GetVersion()
$Form GUICreate("Updater"175100)
$B_Update GUICtrlCreateButton("Update"357010525)
GUICtrlSetState(-1$GUI_DISABLE)
GUICtrlCreateLabel("Deine Version: " $Version101016517)
$L_Version GUICtrlCreateLabel("Aktuelle Version: " $InetVersion104016517)
If 
$Version <> $InetVersion Then GUICtrlSetState($B_Update$GUI_ENABLE)
GUISetState(@SW_SHOW)


While 
True
    $nMsg 
GUIGetMsg()
    Switch 
$nMsg
        
Case $GUI_EVENT_CLOSE
            
Exit
        Case 
$B_Update
            InetGet
($Server "File." $InetVersion ".exe""NewExe.exe"01)
    EndSwitch
WEnd

Func _GetVersion
()
    
$InetVersion InetRead($Server "Version.txt")
    If @
error Then
        MsgBox
(48"Fehler""Die Version konnte nicht überprüft werden")
        Exit
    Else
        Return 
BinaryToString($InetVersion)
    EndIf
EndFunc 
Die Version in der "Version.txt" muss 3 Punkte beinhalten, also "1.2.3.4".
Restliche Fragen sollte das Script beantworten.
KDeluxe is offline  
Old 08/28/2010, 18:30   #12
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
wer kann mir helfen würde ihn dann die daten ect sagen pn me pls
KingZuck is offline  
Old 08/28/2010, 18:42   #13
 
93hacker's Avatar
 
elite*gold: 0
Join Date: Jun 2010
Posts: 171
Received Thanks: 52
kingzuck dein postfach is voll
93hacker is offline  
Old 08/28/2010, 19:13   #14
 
Neon™'s Avatar
 
elite*gold: 50
Join Date: Feb 2009
Posts: 2,173
Received Thanks: 1,765
Quote:
Originally Posted by KingZuck View Post
wer kann mir helfen würde ihn dann die daten ect sagen pn me pls
Erklär doch einfach einmal genau wo dein Problem liegt...
Neon™ is offline  
Old 08/28/2010, 23:40   #15
 
elite*gold: 1
Join Date: Aug 2010
Posts: 1,300
Received Thanks: 524
das sit das problem kp warum es nicht eght habe alles so ^^


Quote:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>



Global $Version = 1.08


$Form1 = GUICreate("Updater", 176, 119, 192, 124)
$Button1 = GUICtrlCreateButton("Check for Updates", 32, 72, 107, 25, 0)
$Label1 = GUICtrlCreateLabel("Deine Version:", 8, 8, 73, 17)
$Label2 = GUICtrlCreateLabel("Aktuelle Version:", 8, 40, 83, 17)
$version_label = GUICtrlCreateLabel($Version, 96, 8, 38, 17)
$newversion = GUICtrlCreateLabel("0.00", 96, 40, 58, 17)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
$Datei = InetGet("http://metin2tamagotchi.***********/Version.txt", "Version.txt", 1)

$open = FileOpen("Version.txt")
$read = FileRead($open)
$close = FileClose($open)

GuiCtrlSetData($newversion, $read)
FileDelete("Version.txt")

if $Version <> GuiCtrlRead($newversion) Then
$Msg = MsgBox(4+32,"Meldung","Neue Version verfügbar - Downloaden?")

if $Msg = 6 Then ;Wenn man [JA] drückt dann..
InetGet("http://metin2tamagotchi.***********/metin2tamagotchi.rar", "[NAME]", 1)
EndIf
elseif $Version == GuiCtrlRead($newversion) Then
$Msg = MsgBox(0,"Meldung","Du hast bereits die neueste Version!")
EndIf
EndIf

EndSwitch

WEnd
KingZuck is offline  
Reply


Similar Threads Similar Threads
NO GG for the new updates
10/24/2009 - Shaiya - 2 Replies
guys any one know why the no GG files is not working in the new updates of shaiya i need new no GG file ?
GC US new updates! (11-20-09)
10/22/2009 - Grand Chase - 1 Replies
just want to remind,all who using gc us 1 hit hack the new patch has arrive again and a lot of work for this one i hope u can release a new patch for the us script thanks brian..!
May 30 Updates
06/03/2009 - Soldier Front Philippines - 8 Replies
Na Patch na po ba ISO ngayn? Na try ko po kaninang 5am working pa po ang WireFrame USB method pero ang ISO method detect na po...:bandit:
Any Updates?
05/23/2009 - RF Online - 9 Replies
Iam just wondering if there are new WPEs CEs for the latest RF online updates,patches and for private servers aswell and w/c are undetectable? Cause on the private server where i play in dupping items has become rampant and well i just cant beat them soo... You cant beat em join em ;3 so can some1 share me info on how to dupe stuff? w/o getting detected :D



All times are GMT +2. The time now is 00:29.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.