#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Outfile=Install_QualityCenter.exe #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #region --- Au3Recorder generated code Start (v3.3.9.5 KeyboardLayout=00000807) --- #region --- Internal functions Au3Recorder Start --- Func _Au3RecordSetup() Opt('WinWaitDelay',100) Opt('WinDetectHiddenText',1) Opt('MouseCoordMode',0) Local $aResult = DllCall('User32.dll', 'int', 'GetKeyboardLayoutNameW', 'wstr', '') If $aResult[1] <> '00000807' Then MsgBox(64, 'Warning', 'Recording has been done under a different Keyboard layout' & @CRLF & '(00000807->' & $aResult[1] & ')') EndIf EndFunc Func _WinWaitActivate($title,$text,$timeout=0) WinWait($title,$text,$timeout) If Not WinActive($title,$text) Then WinActivate($title,$text) WinWaitActive($title,$text,$timeout) EndFunc _AU3RecordSetup() #endregion --- Internal functions Au3Recorder End --- _WinWaitActivate("Program Manager","FolderView") MouseClick("left",2131,1475,1) _WinWaitActivate("Intranet - Kaiser Partner: Home - Windows Internet Explorer","Kombinationssteuerel") MouseClick("left",216,38,1) Send("https{SHIFTDOWN}.77{SHIFTUP}qualitycenter.kpg.sb3.b-source.net{ENTER}") _WinWaitActivate("HP ALM - Quality Center 11.00 - Windows Internet Explorer","Kombinationssteuerel") MouseClick("left",888,695,1) _WinWaitActivate("Internet Explorer - Sicherheitswarnung","Möchten Sie diese So") MouseClick("left",315,131,1) #endregion --- Au3Recorder generated code End ---