1
0
mirror of https://github.com/heebijeebi/WinTango-Patcher.git synced 2024-06-22 05:21:56 +02:00
This commit is contained in:
heebijeebi
2016-12-08 10:10:48 +01:00
parent f17a5bcb0f
commit 054def11c3
20 changed files with 190 additions and 251 deletions

View File

@@ -4,23 +4,23 @@ Func _CheckForUpdate()
;[1] = URL
;Check Database for new Version
$sUrl = $FilesURL & "/LatestVersion.ini"
$sUrl = $FilesURL & "/v0.0/LatestVersion.ini"
$sDest = @TempDir & "\LatestVersion.ini"
If FileExists($sDest) Then FileDelete($sDest)
InetGet($sUrl,$sDest) ;Download the Infofile
$sData = IniRead($sDest, "Updater", "MainApp", "") ;Version Latest
$sVer = RegRead($AppRegKey, "Version") ;Version Installed
FileDelete($sDest) ;Delete the Infofile
If $sData = "" Then
;MsgBox(0, "error", "download error")
$sVerLatest[0] = $sVer
ElseIf $sData <> $sVer Then
$sUrlChangelog = $FilesURL & "/Changelog.txt"
$sUrlChangelog = $FilesURL & "/v" & $sData & "/Changelog.txt"
$sDestChangelog = @ScriptDir & "\Changelog.txt"
If FileExists($sDestChangelog) Then FileDelete($sDestChangelog)
InetGet($sUrlChangelog,$sDestChangelog) ;Download Changelog to view
@@ -33,6 +33,8 @@ Func _CheckForUpdate()
$sVerLatest[1] = IniRead($sDest, "Updater", "URL", "") ;URL for Installer
FileDelete($sDest) ;Delete the Infofile
Return $sVerLatest ;Return Latest Version Number
EndFunc
@@ -40,6 +42,8 @@ EndFunc
Func _DownloadLatestVersion($sUrl, $sDest)
;Progressbar muss "prgbarUpdate" heissen, damit es keine Fehler gibt!
If FileExists($sDest) Then FileDelete($sDest)
$iSize = InetGetSize($sUrl)
$hDL = InetGet($sURL, $sDest, 1, 1)