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