Danke hierfür an shajul für die Funktion Unz und natürlich an Ragnar für die deutsche Hilfe (sehr hilfreich).
Hier das Script:
Code: Select all
#SingleInstance ignore
#NoEnv
if(!A_IsAdmin){
Run *RunAs "%A_ScriptFullPath%",, UseErrorLevel
if(ErrorLevel){
MsgBox, 53, Administatorrechte benötigt, Du musst den Updater mit Administratorrechten starten, damit er richtig funktioniert!
IfMsgBox, Retry
Reload
else
ExitApp
}
return
}
Unz(sZip, sUnz){ ;http://www.autohotkey.com/board/topic/60706-native-zip-and-unzip-xpvista7-ahk-l/
fso := ComObjCreate("Scripting.FileSystemObject")
If Not fso.FolderExists(sUnz) ;http://www.autohotkey.com/forum/viewtopic.php?p=402574
fso.CreateFolder(sUnz)
psh := ComObjCreate("Shell.Application")
zippedItems := psh.Namespace( sZip ).items().count
psh.Namespace( sUnz ).CopyHere( psh.Namespace( sZip ).items, 4|16 )
Loop {
sleep 50
unzippedItems := psh.Namespace( sUnz ).items().count
IfEqual,zippedItems,%unzippedItems%
break
}
}
SplitPath, A_AhkPath,, AhkDir
ToolTip, Hilfe wird heruntergeladen...
URLDownloadToFile, http://ragnar-f.github.com/download/AutoHotkey_L_Help_DE.zip, %A_Temp%\AHKHelpDE.zip
if(ErrorLevel OR !FileExist(A_Temp "\AHKHelpDE.zip")){
MsgBox, 21, Fehler beim Download, Ein Fehler beim Download ist aufgetreten!
IfMsgBox, Retry
Reload
else
ExitApp
}
ToolTip, Hilfe wird entpackt...
Unz(A_Temp "\AHKHelpDE.zip", A_Temp "\AHKHelpDE")
if(!FileExist(A_Temp "\AHKHelpDE\Autohotkey.chm")){
MsgBox, 21, Fehler beim Entpacken, Ein Fehler beim Entpacken ist aufgetreten!
IfMsgBox, Retry
Reload
else
ExitApp
}
ToolTip, Hilfe wird verschoben...
FileMove, %A_Temp%\AHKHelpDE\Autohotkey.chm, % AhkDir "\Autohotkey.chm", 1
ToolTip, Temporäre Dateien werden gelöscht...
FileDelete, %A_Temp%\AHKHelpDE.zip
FileRemoveDir, %A_Temp%\AHKHelpDE, 1
ToolTip
MsgBox, Neue deutsche Hilfe kopiert!
ExitApp
Download:
(Vorübergehend) nicht verfügbar - einfach den Code in eine Datei kopieren und starten
Ihr braucht diesen Installer normalerweise nur einmal herunterzuladen, er lädt dann bei jedem Start die neueste Version herunter.
Hinweis:
Ihr benötigt für dieses Programm mindestens Windows XP, außerdem muss die Windows-interne ZIP-Funktion aktiviert sein.