Note: To see a content of the demonstrated script click on "Read more" link.
If WinExists(@ScriptName) Then Exit
AutoItWinSetTitle(@ScriptName)
AutoItSetOption("TrayIconDebug", 1)
; AutoItSetOption("SendKeyDelay", 20)
global $title='Avira AntiVir Personal - Free Antivirus', $file='avira_antivir_personal_en.exe'
Run ( @ScriptDir&'\'&$file )
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "")
ControlClick ($title, "Continue", "Button1")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "This wizard will install Avira AntiVir Personal on your computer.")
send ("!n")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "")
ControlClick ($title, "&Next >", "Button2")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "Licence agreement Avira AntiVir Personal - Free AntiVirus")
send ("!a")
ControlClick ($title, "&Next >", "Button3")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "Please confirm that you will use the Avira AntiVir Personal - Free Antivirus only for private and not for commercial purposes.")
ControlClick ($title, "", "Button2")
ControlClick ($title, "&Next >", "Button5")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "Select the program features you want to install")
ControlClick ($title, "C&omplete", "Button1")
ControlClick ($title, "&Next >", "Button7")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "Yes, I would like to subscribe to the Avira newsletter")
ControlClick ($title, "", "Button2")
ControlClick ($title, "&Next >", "Button5")
WinWaitActive("Avira AntiVir Personal - Free Antivirus", "Installation complete")
ControlClick ($title, "Show readme.txt", "Button1")
ControlClick ($title, "Finish", "Button12")
Do
WinWait("Configuration wizard")
ControlClick("Configuration wizard", "", "Button2")
WinWaitActive("Configuration wizard", "")
ControlClick("Configuration wizard", "", "Button6")
WinWaitActive("Configuration wizard", "")
ControlClick("Configuration wizard", "", "Button8")
WinWaitActive("Configuration wizard", "")
ControlClick("Configuration wizard", "", "Button10")
WinWaitActive("Configuration wizard", "")
ControlClick("Configuration wizard", "", "Button1")
WinWaitActive("Configuration wizard", "")
ControlClick("Configuration wizard", "", "Button11")
WinWaitActive("Configuration wizard", "You have now specified the basic configuration of Avira AntiVir Personal - Free Antivirus")
ControlClick("Configuration wizard", "", "Button12")
Until 1=2
If you enjoyed this post consider subscribing via
or
Email





1 Comments: