Hallo Leute,
Na dann will ich mal mein erstes Script posten.
-----
Programm: vlc Media Player 0.8.4a - German
Website: http://www.videolan.org/vlc/
Beschreibung:
VLC is a free cross-platform media player.
* It supports a large number of multimedia formats, without the need for additional codecs
* It is available for almost every OS
* It needs little CPU power
-----
Spoiler anzeigen
Code
; -- vlc 0.8.4a - German - Install Script - by Mandragora --
;
; -- Installation des vlc Media Players mit ActiveX und Mozilla Plugin --
; -- Website: http://www.videolan.org/vlc/
Opt("WinWaitDelay",100)
Opt("WinTitleMatchMode",4)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Run('"' & @ScriptDir & '\vlc-0.8.4a-win32.exe"')
WinWait("Installer Language","Please select a lang")
If Not WinActive("Installer Language","Please select a lang") Then WinActivate("Installer Language","Please select a lang")
WinWaitActive("Installer Language","Please select a lang")
Send("{TAB}{SPACE}")
WinWait("VideoLAN VLC media player 0.8.4a Installation","Willkommen beim Inst")
If Not WinActive("VideoLAN VLC media player 0.8.4a Installation","Willkommen beim Inst") Then WinActivate("VideoLAN VLC media player 0.8.4a Installation","Willkommen beim Inst")
WinWaitActive("VideoLAN VLC media player 0.8.4a Installation","Willkommen beim Inst")
Send("{SPACE}")
WinWait("VideoLAN VLC media player 0.8.4a Installation ","Nullsoft Install Sys")
If Not WinActive("VideoLAN VLC media player 0.8.4a Installation ","Nullsoft Install Sys") Then WinActivate("VideoLAN VLC media player 0.8.4a Installation ","Nullsoft Install Sys")
WinWaitActive("VideoLAN VLC media player 0.8.4a Installation ","Nullsoft Install Sys")
Send("{SPACE}{TAB}{TAB}{SPACE}{TAB}{DOWN}{DOWN}{DOWN}{SPACE}{DOWN}{SPACE}{TAB}{TAB}{ENTER}{ENTER}")
WinWait("VideoLAN VLC media player 0.8.4a Installation ","Die Installation von")
If Not WinActive("VideoLAN VLC media player 0.8.4a Installation ","Die Installation von") Then WinActivate("VideoLAN VLC media player 0.8.4a Installation ","Die Installation von")
WinWaitActive("VideoLAN VLC media player 0.8.4a Installation ","Die Installation von")
Send("{SPACE}{TAB}{TAB}{TAB}{SPACE}")Viel Spaß damit
cu
mandragora 
