Heya !
habe hier meine Patchfunktion umgebaut.
Jetzt wollte ich nur wissen ob ich das so machen kann.
Das der patcht bis zum gleichen Stand der externen Version und der localen Version.
;________________________Func Patch Status_______________________________________________________________________________________________--
;###############################################################################################################################################
Func Patchstatus()
Do ;fang an zu patchen ....
InetGet("http://www.Keanu-AutoIT.de/RisingGods/wowversion.txt", @TempDir & "\wowversion.txt")
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
$versionextern = FileRead(@TempDir & "\wowversion.txt")
If $versionlocal = "2.3.3.7799" Then
Patch1()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "2.4.0.8089" Then
Patch2()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "2.4.1.8125" Then
Patch3()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "2.4.2.8278" Then
Patch4()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "2.4.3.8606" Then
Patch5()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.0.1.8874" Then
Patch6()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.0.2.9056" Then
Patch7()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.2.0.10192" Then
Patch8()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.2.0.10314" Then
Patch9()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.2.2.10482" Then
Patch10()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.2.2.10505" Then
Patch11()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.3.0.10958" Then
Patch12()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.3.0.11159" Then
Patch13()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.3.2.11403" Then
Patch14()
EndIf
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
If $versionlocal = "3.3.3.11685" Then
Patch15()
EndIf
Until ; bis das hier eintrifft
$versionlocal = FileGetVersion($wowpath & "\Wow.exe")
$versionextern = FileRead(@TempDir & "\wowversion.txt")
$versionlocal = $versionextern
MsgBox(0, "", "Auf Rising Gods Stand gepatcht")
logfile("Patchstand Rising Gods: " & $versionlocal)
EndFunc ;==>Patchstatus
Die Frage ist, checkt der wirklich nach jedem Patchvorgang durch ob die Versionen gleich sind?
Ich habe nach jedem Patchdownload wieder die Patchstatus() aufgerufen, damit er nach jedem Patch wieder in diese Funktion reingeht.
Bloß hört er dann auch auf wenn die Versionen gleich sind oder patcht er bis zum unendlichen weil er gar nicht soweit runter schaut, bis zum
until
[/autoit]Gruß
Kev