|
You last visited: Today at 00:29
Advertisement
Updates wie?
Discussion on Updates wie? within the AutoIt forum part of the Coders Den category.
08/27/2010, 18:35
|
#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??
|
|
|
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.
|
|
|
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....
|
|
|
08/27/2010, 19:20
|
#4
|
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
|
|
|
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?
|
|
|
08/27/2010, 20:24
|
#6
|
elite*gold: 255
Join Date: Nov 2009
Posts: 2,900
Received Thanks: 1,408
|
Quote:
Originally Posted by KingZuck
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", 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://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($newversion) Then $Msg = MsgBox(4+32,"Meldung","Neue Version verfügbar - Downloaden?") if $Msg = 6 Then ;Wenn man [JA] drückt dann.. InetGet("[LINKADRESSE]", "[NAME]", 1) EndIf elseif $Version == GuiCtrlRead($newversion) Then $Msg = MsgBox(0,"Meldung","Du hast bereits die neueste Version!") EndIf EndIf EndSwitch WEnd
Hier nochmal mit einem Gui & einer geuploadeten Datei zum testen.
|
|
|
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.
|
|
|
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 >.<
|
|
|
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.
|
|
|
08/28/2010, 13:09
|
#10
|
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", 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://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 [JA] drü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
|
|
|
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", 175, 100) $B_Update = GUICtrlCreateButton("Update", 35, 70, 105, 25) GUICtrlSetState(-1, $GUI_DISABLE) GUICtrlCreateLabel("Deine Version: " & $Version, 10, 10, 165, 17) $L_Version = GUICtrlCreateLabel("Aktuelle Version: " & $InetVersion, 10, 40, 165, 17) 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", 0, 1) 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.
|
|
|
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
|
|
|
08/28/2010, 18:42
|
#13
|
elite*gold: 0
Join Date: Jun 2010
Posts: 171
Received Thanks: 52
|
kingzuck dein postfach is voll
|
|
|
08/28/2010, 19:13
|
#14
|
elite*gold: 50
Join Date: Feb 2009
Posts: 2,173
Received Thanks: 1,765
|
Quote:
Originally Posted by KingZuck
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...
|
|
|
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
|
|
|
|
|
|
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.
|
|