Macros für die LBS4 Ausleihe

Nachdem die Resonanz auf das LBS-Macro Thema so groß war, möchte ich nun meine Tageslichttauglichen Scripte veröffentlichen. Wenns was hilft, gern.

F10 – Benutzerkonto – Entleihungen

Es tut im Kern folgendes:

• SHIFT + STRG + 2
• Mausklick auf den Registerreiter Entleihungen.

Voraussetzung: Im IE8 unter Ansicht muss der Zoomfaktor auf 100% gestellt sein. Auch die InPrivate Filterung aus geschaltet sein.

Die Kommentare erläutern den Rest. Viel Spaß damit. Wer andere coole Macros schreibt kann mir gern mal eine Kopie zukommen lassen. Danke.

; ### AHK-Script
; ### Mike Rinne, TUB, 14.07.2011 - Schirm wischen... Wichtig: im IE muss die InPrivate Filterung aus geschaltet sein. (hat den gleichen Shortcut!)
; ### Mike Rinne, TUB, 16.08.2011 - jetzt schneller und ohne blips
; ### Mike Rinne, TUB, 19.08.2011 - verschönert.

; ### Sie sieht der Compileraufruf aus: C:\Programme\AutoHotkey\Compiler\Ahk2Exe.exe /in g:\EDV\RFID\F12_Schirm_wischen.ahk /out g:\edv\RFID\F12_Schirm_wischen.exe ###
; ### AutoHotkey.exe [Switches] [Script Filename] [Script Parameters]  ###



; ### Exakte Titelbezeichnungen! damit wir nicht das falsche Fenster bedienen ###
SetTitleMatchMode, 3



; ### Die Länge der Kontrolltöne - Erleichtert das debuging -  0=kein Ton ###
Tondauer := 0



; ### Schlafdauer - muss dem System gefühlvoll angepasst werden ###
SleepTimer := 1000



; ### Warteschleife bis das Fenster focus hat ###
IEMain:
sleep 50

; ### Das Fenster muss genau diesen Titel haben ###
IfWinExist, LBS4 - Windows Internet Explorer
	WinActivate
else Goto, IEMain



; ### SHIFT + STRG + 2 Benutzer ###
SoundBeep, 750, %Tondauer%
Send, ^+2
sleep %SleepTimer%





; ### Für die Entl = Entleihungen  gibt es keinen Shortcut, man erreicht das Feld auch nicht über Tabulatortaste ### 
; ### Also nehmen wir die Maus. Gefährlich, weil größenabhänging                                                 ###
; ### Zoomstufe im IE: 100%                                                                                      ###
; ### Falls nicht: mit WindowSpy die Koordinaten des Mausklicks neu einstellen                                   ###

SoundBeep, 1050, %Tondauer%
MouseClick, left, 460, 485
; sleep %SleepTimer%


Exit