 |
AutoHotkey Community
Wir helfen uns gegenseitig aus der Patsche
|
| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
garry
Anmeldedatum: 25.10.2005
Beiträge: 437
Wohnort: switzerland
|
 Verfasst am: Do Okt 27, 2005 7:29 pm Titel: Check for new AHK-version |
 |
|
startet download site wenn eigener AHK version aelter ist als actual version
klicke denn >Alternate download site here
(beim installieren darf kein AHK script activ sein)
| Code: | ;---2005-10-16 garry, check AutoHotKey for new version -------------
F1=%A_ScriptDir%\AHKURL.TXT
A=%A_AHKVERSION%
URLDownloadToFile,http://www.autohotkey.com,%F1%
I=0
Loop
{
I+=1
FileReadLine, line, %F1%, %i%
if ErrorLevel <> 0
exitApp
IfInString,line,The latest version is
{
stringmid,BA,LINE,25,18
GOTO A2
}
}
A2:
FileDelete,%F1%
B1=%BA%
I=0
loop,parse,B1,`
{
Transform,B2,ASC,%A_LOOPFIELD%
I+=1
if B2<46
GOTO A3
if B2>57
GOTO A3
}
A3:
stringmid,B,B1,1,I-1
if A<>%B%
{
msgbox,(Changed) Your existing version is=%A%, Actual version is=%B%
run,http://www.autohotkey.com/download
ExitApp
}
else
{
msgbox,(Equal) Your existing version is=%A%, Actual version is=%B%
MsgBox, 4, , Start AHK Forum?
IfMsgBox,No
return
Else
Run,http://www.autohotkey.com/forum
ExitApp
}
|
|
|
| Nach oben |
|
 |
Snoop
Gast
|
| Verfasst am: Sa März 04, 2006 1:21 pm Titel: script-update |
|
|
HEy Garry, ich bin mal so frei und paste ausm en-Forum die aktuelle Version, da sie auch nicht so viel Traffic auf en Servern verursacht:
| Code: | ;---- 2006-01-21 Version02.ahk garry ------------------
F1=http://www.autohotkey.com/download/CurrentVersion.txt
F2=%A_ScriptDir%\AHKURL.TXT
A =%A_AHKVERSION%
Splashimage,,M2 x80 y5 w600 Cwred fs10,%F1%,DOWNLOAD >>>
Sleep,1000
URLDownloadToFile,%F1%,%F2%
Splashimage, off
Filereadline,B,%F2%,1
if A<>%B%
{
msgbox,(Changed) Your existing version is=%A%, Actual version is=%B%
run,http://www.autohotkey.com/download/AutoHotkeyInstall.exe
ExitApp
}
else
{
msgbox,(Equal) Your existing version is=%A%, Actual version is=%B%
MsgBox, 4, , Start AHK Forum?
IfMsgBox,No
return
Else
Run,http://www.autohotkey.com/forum
ExitApp
} |
Und behebt auch einige gleine Probs. Jetzt kann man auch seine anderen AHK-Anwendungen laufen lassen, nicht, garry? Soo und nun mach ich mich auf, mal zu reggen  |
|
| Nach oben |
|
|
garry
Anmeldedatum: 25.10.2005
Beiträge: 437
Wohnort: switzerland
|
| Verfasst am: So März 05, 2006 11:12 am Titel: |
|
|
danke snoop,
so ist script kürzer wenn direct CurrentVersion.txt abgefragt wird
script evtl. umkehren: Start Forum, falls geändert Hinweis auf Download-Möglichkeit
entschuldige, wenn ich Deine Sätze nicht richtig verstanden habe |
|
| Nach oben |
|
|
xp-brueder
Gast
|
| Verfasst am: Do Jul 06, 2006 2:49 pm Titel: Deutsche Version |
|
|
Dies ist eine Deutsche Version die weitere Verbesserungen enthält.
Viel Spaß
| Code: | ;
; AutoHotkey Version: 1.x
; Language: Deutsch
; Script version: 3.0.2
; Author: xp-brueder (xp-brueder.de.vu)
;
; Script wurde erweitert um: Deutsche Sprache, abfrage ob gestartet werden soll, Fehler anzeige -internetverbindung, löschen der Versions Datei (unter F2 speicherort/dateiname festgelegt)
Start:
F1=http://www.autohotkey.com/download/CurrentVersion.txt
F2=%A_ScriptDir%/AHK-Versions-überprüfung-Auswertungsdatei.txt
A =%A_AHKVERSION%
MsgBox, 4 , Möchten Sie Starten?, Zum Start der überprüfung bitte auf Ja klicken.
IfMsgBox,yes
Goto, Scriptausfüren
Else
ExitApp
Scriptausfüren:
SplashTextOn , Width 500, 60, Version wird überprüft!, Bitte warten Sie bis die Version überprüft wurde. Je nach Internetverbindung kann dies einige Zeit in anspruch nehmen.
URLDownloadToFile,%F1%,%F2%
Splashimage, off
Sleep, 2000
IfNotExist, %F2%
{
SplashTextoff
MsgBox, ,Fehler - Internet verbindung konnte nicht erstellt werden!, Datei konte nicht heruntergeladen werden. Bitte überprüfen Sie ob ihre Internet Verbindung aktiv ist oder ob Ihr Firewal richtig eingestellt ist.
ExitApp
}
else
Filereadline,B,%F2%,1
if A<>%B%
{
SplashTextoff
msgbox, Es ist eine aktuellere Version vorhanden (Version =%B%) , die Download Seite wird automatisch gestartet.
FileRecycle, %F2%
run,http://www.autohotkey.com/download/AutoHotkeyInstall.exe
ExitApp
}
else
{
SplashTextoff
msgbox,Das Programm ist auf dem neuesten Stand ( Version =%A% ) , bitte überprüfen Sie später erneut, ob einere neuere Version vorhanden ist.
FileRecycle, %F2%
MsgBox, 4,AHK Forum starten? , Möchten Sie dass AHK Forum starten?
IfMsgBox,No
return
Else
Run,http://de.autohotkey.com/forum
ExitApp
}
;
#NoEnv
SendMode Input speed and reliability.
#SingleInstance force |
|
|
| Nach oben |
|
|
xp-brueder
Gast
|
| Verfasst am: Do Jul 06, 2006 6:50 pm Titel: Fehler behebung - Rechtschreibung |
|
|
| Code: | ;
; AutoHotkey Version: 1.x
; Language: Deutsch
; Script version: 3.0.2
; Author: xp-brueder (xp-brueder.de.vu)
;
; Script wurde erweitert um: Deutsche Sprache, abfrage ob gestartet werden soll, Fehler anzeige -internetverbindung, löschen der Versions Datei (unter F2 speicherort/dateiname festgelegt)
Start:
F1=http://www.autohotkey.com/download/CurrentVersion.txt
F2=%A_ScriptDir%/AHK-Versions-überprüfung-Auswertungsdatei.txt
A =%A_AHKVERSION%
MsgBox, 4 , Möchten Sie starten?, Zum Start der überprüfung bitte auf Ja klicken.
IfMsgBox,yes
Goto, Scriptausfüren
Else
ExitApp
Scriptausfüren:
SplashTextOn , Width 500, 60, Version wird überprüft!, Bitte warten Sie, bis die Version überprüft wurde. Je nach Internetverbindung kann dies einige Zeit in Anspruch nehmen.
URLDownloadToFile,%F1%,%F2%
Splashimage, off
Sleep, 2000
IfNotExist, %F2%
{
SplashTextoff
MsgBox, ,Fehler - Internetverbindung konnte nicht erstellt werden!, Datei konte nicht heruntergeladen werden. Bitte überprüfen Sie, ob Ihre Internetverbindung aktiv ist oder ob Ihre Firewall richtig eingestellt ist.
ExitApp
}
else
Filereadline,B,%F2%,1
if A<>%B%
{
SplashTextoff
msgbox, Es ist eine aktuellere Version vorhanden (Version =%B%) , die Download-Seite wird automatisch gestartet.
FileRecycle, %F2%
run,http://www.autohotkey.com/download/AutoHotkeyInstall.exe
ExitApp
}
else
{
SplashTextoff
msgbox,Das Programm ist auf dem neuesten Stand ( Version =%A% ) , bitte überprüfen Sie später erneut, ob eine neuere Version vorhanden ist.
FileRecycle, %F2%
MsgBox, 4,AHK Forum starten? , Möchten Sie dass AHK Forum starten?
IfMsgBox,No
return
Else
Run,http://de.autohotkey.com/forum
ExitApp
}
;
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
#SingleInstance force |
wir bitten um entschuldigung für die vielen Rechtschreibfehler. |
|
| Nach oben |
|
|
Janni
Gast
|
| Verfasst am: Fr Jul 07, 2006 8:37 pm Titel: Die Deutsche version ist wirklich super! |
|
|
Vielen Dank für die Deutsche Version - ist wirklich super.
Das mit der Rechtschreibung macht doch nicht wirklich etwas, aber ist trotzdem besser ohne.
Noch einmal danke und bis bald. |
|
| Nach oben |
|
|
Obi-Wahn
Anmeldedatum: 19.04.2006
Beiträge: 728
Wohnort: Wien
|
| Verfasst am: Do Nov 23, 2006 3:57 pm Titel: Update |
|
|
Hi!
Beim stöbern im Forum ist mir (erst) heute der Updater Aufgefallen. Ich hab den Updater noch etwas upgedatet.
Changelog:
[+] Die Source kompiliert sich vorher Selbst, wenn sie es nicht schon ist
[+] Der AutoHotKey Prozess wird (wenn vorhanden) gekillt
[+] Das Donwloadverzeichnis ist jetzt das Verzeichnis %A_WinDir%
[+] Dialogfelder bearbeitet
[+] Die Alte Version wird automatisch deinstalliert
[+] Der Download erfolgt direkt über AHK, und startet automatisch, wenn die Dateigröße der in der Datei entspricht.
Das war's Eingentlich auch schon.
| Code: | ;
; AutoHotkey Version: 1.0.44.01
; Sprache: Deutsch
; Version: 2.0
; Betriebssystem: WinXP
; Author: xp-brueder (xp-brueder.de.vu) Mod by: Obi-Wahn (www.obi-wahn.net.tc)
;
; Script Funktion: Script wurde erweitert um: Deutsche Sprache, abfrage ob gestartet werden soll,
; Fehler anzeige -internetverbindung, löschen der Versions Datei (unter F2 speicherort/dateiname festgelegt)
;
;
#NoEnv ; Empfohlen zur Steigerung und der Kompatibilität mit zukünftigen AutoHotkey Releases.
SendMode Input ; Empfohlen für neue Skripts zur steigerung des Geschwindigkeits und der Stabilität.
#SingleInstance force ; Empfohlen für die Entwicklungsphase
Start:
If A_IsCompiled != 1
{
AHK_Path = %A_ScriptFullPath%
EXE_Path = %A_ScriptDir%\ahk_updater.exe
CompilePassword = SnapShot
RegRead, InstallPath, HKEY_LOCAL_MACHINE, SOFTWARE\AutoHotkey, InstallDir
RunWait, %InstallPath%\Compiler\Ahk2Exe.exe /in "%AHK_Path%" /out "%EXE_Path%" /pass "%CompilePassword%"
Sleep, 2500
Run, %comspec% /c ""%EXE_Path%"", , Hide
Process, Close, AutoHotkey.exe
ExitApp
}
F1 = http://www.autohotkey.com/download/CurrentVersion.txt
F2 = %A_WinDir%\AHK-Versions-überprüfung-Auswertungsdatei.txt
F3 = http://www.autohotkey.com/download/AutoHotkeyInstall.exe
F4 = %A_WinDir%\AutoHotkeyUpdate.exe
A = %A_AHKVERSION%
MsgBox, 36, Möchten Sie starten?, Zum Start der überprüfung bitte auf Ja klicken.
IfMsgBox, Yes
Goto, Scriptausfüren
Else
ExitApp
Scriptausfüren:
SplashTextOn ,Width 500, 60, Version wird überprüft!, Bitte warten Sie, bis die Version überprüft wurde. Je nach Internetverbindung kann dies einige Zeit in Anspruch nehmen.
URLDownloadToFile, %F1%, %F2%
Splashimage, off
Sleep, 2000
IfNotExist, %F2%
{
SplashTextoff
MsgBox, 21, Verbindungsfehler, Die Datei konte nicht heruntergeladen werden. `nBitte überprüfen Sie, ob Ihre Internetverbindung aktiv ist`, `noder ob Ihre Firewall richtig eingestellt ist.
IfMsgBox Retry
GoTo, Start
Else IfMsgBox Cancel
ExitApp
}
else
Filereadline,B,%F2%,1
if A<>%B%
{
SplashTextoff
MsgBox, 64, Neue Version entdeckt, Es ist eine neue Version von AutoHotkey vorhanden (Ver. %B%).`nSobald der Download abgeschlossen ist`, werden Sie benachrichtigt., 5
RegRead, UnInstall, HKEY_LOCAL_MACHINE, SOFTWARE\AutoHotkey, InstallDir
RunWait, %UnInstall%\uninst.exe /S
URLDownloadToFile, %F3%, %F4%
FileReadLine, C, %F2%, 3
Loop
{
Loop, %F4%
If A_LoopFileSize = %C%
GoTo, Weiter
}
Weiter:
Sleep, 2500
RunWait, %F4%
MsgBox, 64, Installation Fertigstellen, Die Neueste Version von AutoHotkey (Ver. %B%) wurde installiert., 5
FileRecycle, %F2%
FileRecycle, %F4%
ExitApp
}
else
{
SplashTextoff
FileRecycle, %F2%
MsgBox, 36, Aktuelles Programm entdeckt..., Das Programm ist auf dem neuesten Stand (Ver. %A%)`, `nbitte überprüfen Sie später erneut`, ob eine neuere Version vorhanden ist.`n`nMöchten Sie inzwischen dass AHK Forum besuchen?
IfMsgBox, No
Return
Else
Run, http://de.autohotkey.com/forum
ExitApp
}
|
MfG
Obi-Wahn
_________________
Garten ist eine Kunstnatur
Das Leben ist nicht fair. Es ist nur fairer als der Tod, das ist alles.
Obi-Wahns Codeschnipsel @ securityvision.ch |
|
| Nach oben |
|
|
garry
Anmeldedatum: 25.10.2005
Beiträge: 437
Wohnort: switzerland
|
| Verfasst am: Do Nov 23, 2006 9:26 pm Titel: |
|
|
danke Obi-Wahn,xp-brueder,snoop
ich fange wie mit GWBASIC an und Profi's führen es zu Ende...
kein script von mir ist gut programmiert, versuche es, weiss dass ihr es denn optimiert |
|
| Nach oben |
|
|
Obi-Wahn
Anmeldedatum: 19.04.2006
Beiträge: 728
Wohnort: Wien
|
| Verfasst am: Fr Nov 24, 2006 7:45 am Titel: |
|
|
Hi Garry!
Als Profi sehe ich mich zwar nicht, da meine Sachen doch recht einfach sind, aber danke für dein Kompilment. Was deine Skripte angeht kommt das mit der Zeit sicher auch.
MfG
Obi-Wahn
_________________
Garten ist eine Kunstnatur
Das Leben ist nicht fair. Es ist nur fairer als der Tod, das ist alles.
Obi-Wahns Codeschnipsel @ securityvision.ch |
|
| Nach oben |
|
|
Obi-Wahn
Anmeldedatum: 19.04.2006
Beiträge: 728
Wohnort: Wien
|
| Verfasst am: Fr Nov 24, 2006 12:27 pm Titel: |
|
|
OK, man kann zwar noch mehr rauskitzeln, aber von meiner Seite her wars das erstmal mit dem Updater.
| Code: | ;
; AutoHotkey Version: 1.0.45.04
; Sprache: Deutsch
; Version: 3.0
; Betriebssystem: WinXP
; Author: Obi-Wahn (www.obi-wahn.net.tc)
;
; Script Funktion: AHK Updater.
; Das Script checkt alle 2 Std. ob ein neuer Tag ist. Wenn ein neuer Tag angebrochen ist
; wird die Version überprüft. Bei einer neuen Version wird die alte automatisch de- und die
; neue Installiert.
; Der InstallationsPfad, ob die Vorherige Version Deinstalliert und die Downloadpfad können
; im Ini-File abgeändert werden.
;
#NoEnv ; Empfohlen zur Steigerung und der Kompatibilität mit zukünftigen AutoHotkey Releases.
SendMode Input ; Empfohlen für neue Skripts zur steigerung des Geschwindigkeits und der Stabilität.
#SingleInstance force ; Empfohlen für die Entwicklungsphase
#NoTrayIcon
Start:
If A_IsCompiled != 1
{
AHK_Path = %A_ScriptFullPath%
EXE_Path = %A_ScriptDir%\ahk_updater.exe
CompilePassword = SnapShot
RegRead, InstallPath, HKEY_LOCAL_MACHINE, SOFTWARE\AutoHotkey, InstallDir
RunWait, %InstallPath%\Compiler\Ahk2Exe.exe /in "%AHK_Path%" /out "%EXE_Path%" /pass "%CompilePassword%"
Sleep, 2500
Run, %comspec% /c ""%EXE_Path%"", , Hide
ExitApp
}
Process, Close, AutoHotkey.exe
IniRead, Install, updater.ini, General, InstDir
IniRead, Uninstall, updater.ini, General, Uninst
IniRead, Version, updater.ini, URLs, Versionfile
IniRead, Programm, updater.ini, URLs, Downloadfile
VerDlTo = %A_WinDir%\AHK-Versions-überprüfung-Auswertungsdatei.txt
ProDlTo = %A_WinDir%\AutoHotkeyUpdate.exe
InstVersion = %A_AHKVERSION%
Loop
{
IniRead, CurDay, updater.ini, General, Tag
If CurDay != %A_DDD%
{
UrlDownloadToFile, %Version%, %VerDlTo%
Sleep, 2000
IfNotExist, %VerDlTo%
{
MsgBox, 21, Verbindungsfehler, Die Datei konnte nicht heruntergeladen werden.`nBitte überprüfen Sie`, ob Ihre Internetverbindung aktiv ist`,`noder ob Ihre Firewall richtig eingestellt ist.
IfMsgBox Retry
{
Sleep, 5000
GoTo, Start
}
Else IfMsgBox Cancel
ExitApp
}
FileReadLine, NewVersion, %VerDlTo%, 1
If InstVersion != %NewVersion%
{
UrlDownloadToFile, %Programm%, %ProDlTo%
FileReadLine, DlSize, %VerDlTo%, 3
Loop
{
Loop, %ProDlTo%
{
If A_LoopFileSize = %DlSize%
{
If Uninstall = 1
{
RegRead, UnInstallPath, HKEY_LOCAL_MACHINE, SOFTWARE\AutoHotkey, InstallDir
RunWait, %UnInstallPath%\uninst.exe /S
Sleep, 2500
}
RunWait, %ProDlTo% /S /D="%Install%"
Sleep, 1500
SplashTextOn, 175, 120, Update abgeschlossen, AutoHotkey-Update`nabgeschlossen.`nDie neue Version ist`nVersion %NewVersion%.
WinMove, Update abgeschlossen, , (A_ScreenWidth-180), (A_ScreenHeight-125)
Sleep, 7000
SplashTextOff
FileRecycle, %ProDlTo%
FileRecycle, %VerDlTo%
}
}
}
}
IniWrite, %A_DDD%, updater.ini, General, Tag
Sleep, 7200000
}
}
Return
|
Steuerungsfile (updater.ini)
| Code: | ; AHK-Updater Steuerungsfile
[General]
Tag=Mon
InstDir=%programfiles%\AutoHotkey
Uninst=1
; 1 = Ja
[URLs]
Versionfile=http://www.autohotkey.com/download/CurrentVersion.txt
Downloadfile=http://www.autohotkey.com/download/AutoHotkeyInstall.exe
; Downloadpfade nur verändern, wenn der downloadort ein anderer ist. |
Solltet Ihr Fehler finden, nur her damit.
MfG
Obi-Wahn
EDIT: Zum Download:
ahk-File
updater.ini
_________________
Garten ist eine Kunstnatur
Das Leben ist nicht fair. Es ist nur fairer als der Tod, das ist alles.
Obi-Wahns Codeschnipsel @ securityvision.ch |
|
| Nach oben |
|
|
Obi-Wahn
Anmeldedatum: 19.04.2006
Beiträge: 728
Wohnort: Wien
|
| Verfasst am: Di Nov 28, 2006 5:01 pm Titel: Last Update |
|
|
Hi @ All!
Die neueste Version des Updaters.
Version: 4.1.0
Changelog:
+ der AutoHotKey.exe Prozess wird nur gekillt, wenns nötig ist
+ MultiLigualer Sprachsupport (ja, sogar Klingonisch  )
+ "Backup"-Funktioni für 24/7 Skripte die Permanent laufen sollen
+ Wahlmöglichkeit: Automatisch / Benutzerdeffiniert / Nicht Installieren
DOWNLOAD .AHK-File + .INI-STEUERUNGSDATEI
MfG
Obi-Wahn
PS.: Bugs (wenn vorhanden) bitte Posten.
_________________
Garten ist eine Kunstnatur
Das Leben ist nicht fair. Es ist nur fairer als der Tod, das ist alles.
Obi-Wahns Codeschnipsel @ securityvision.ch |
|
| Nach oben |
|
|
BoBo
Gast
|
| Verfasst am: Di Nov 28, 2006 9:11 pm Titel: |
|
|
Klingonisch, fabelhaft! 
winzliger Verbesserungsvorschlag. Die Sprachsektionen nach Telco Ländercode (oder KFZ Ländercode?) zu bezeichnen 44=UK;01=US;49=DE;33=NL?;43=AT --> (tatsächlich hat ein österreichischer Kollege von mir seine eigene Sprachversion zusammen geschrammelt) irgendwie sowas wie ...
| Code: | | 1= A geh, dös wors. D'obload is duach.[CR]So, Gruss an die G'mahlin[CR]und küüss die Hand. |
|
|
| Nach oben |
|
|
AGU
Gast
|
| Verfasst am: Di Nov 28, 2006 10:34 pm Titel: |
|
|
Welchen Planetencode/Ländercode hat eigentlich das "Klingon Empire" 
_______________________
Grüße
AGU |
|
| Nach oben |
|
|
BoBo
Gast
|
| Verfasst am: Mi Nov 29, 2006 7:56 am Titel: |
|
|
D'cha  |
|
| Nach oben |
|
|
AGU
Gast
|
| Verfasst am: Mi Nov 29, 2006 3:03 pm Titel: |
|
|
Torpedos?
___________________
Gruß
AGU |
|
| Nach oben |
|
|
|
|
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
|
Powered by phpBB © 2001, 2005 phpBB Group
Deutsche Übersetzung von phpBB.de |
FAQ
Suchen
Mitgliederliste
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
