#RequireAdmin #include #include #include #include #include #Region ### START Koda GUI section ### Form= $GUI = GUICreate("GUI", 403, 137, 1106, 671) $AplikacjaDoInstalacjiProgramow = GUICtrlCreateLabel("Instalator zestawu aplikacji firmowych", 112, 16, 183, 17) $Zainstaluj = GUICtrlCreateButton("Install", 40, 56, 75, 25) $Wyjdz = GUICtrlCreateButton("Exit", 296, 56, 75, 25) $Zinstalujzeps = GUICtrlCreateButton("EPS (laptop)", 168, 56, 75, 25) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### Local $SciezkaESET = 'instalki\ESMC_Installer_x64_pl_PL.exe' Local $SciezkaCheckPoint = 'instalki\Check_Point_Identity_Agent_drutex.msi' Local $SciezkaForeScout = 'instalki\SC-rBEBZCcTNIBY_jlmHbfTdBbFQQN0tcYFs19Mqef3F69_tjm1CIUEAAE-.exe' Local $SciezkaAVAMAR = 'instalki\AvamarClient-windows-x86_64-19.2.100-155.msi' Local $SciezkaLOG = 'instalki\log-agent.msi' While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Zainstaluj Instalacja() Case $Zinstalujzeps ZainstalujEPS() Case $Wyjdz Exit EndSwitch WEnd HotKeySet('{ESC}', 'ZakonczProgram') Func ZakonczProgram($process_name = "AutoIt3.exe") $PID = ProcessExists($process_name) If $PID Then ProcessClose($PID) ProcessWaitClose($process_name) EndIf EndFunc Func Instalacja() If ProcessExists("ERAAgent.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "Eset jest zainstalowany", 1) ;If yes then says it in MassageBox Else ShellExecute($SciezkaESET) ;Jezeli nie ma takiego procesu to instaluje program AutoItSetOption('MouseCoorMode', 0) WinWait('ESET Package Installer') WinActivate('ESET Package Installer') MouseClick('primary', 839, 749, 1, 0) Sleep(50000) WinActivate('ESET Package Installer') MouseClick('primary', 832, 750, 1, 0) Sleep(10000) WinActivate('ESET Package Installer') MouseClick('primary', 828, 745, 1, 0) Sleep(100000) WinActivate('ESET Package Installer') MouseClick('primary', 850, 746, 1, 0) Sleep(120000) ;Pouse beetwen Programs EndIf If ProcessExists("IdentityAgent.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "CheckPoint jest zainstalowany", 1) ;If yes then says it in MassageBox MouseClick("primary",987, 593, 1, 0) Else ShellExecute($SciezkaCheckPoint) ;If process dont exist install program AutoItSetOption('MouseCoorMode', 0) Sleep(60000) ;Pouse beetwen Programs EndIf If ProcessExists("SecureConnector.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "ForeScout jest zainstalowany", 1) ;If yes then says it in MassageBox MouseClick("primary",987, 593, 1, 0) Else Local $bFileInstall = True; If $bFileInstall Then FileInstall("C:\Users\TEST\Desktop\instalki\SC-rBEBZCcTNIBY_jlmHbfTdBbFQQN0tcYFs19Mqef3F69_tjm1CIUEAAE-.exe", @ScriptDir & "\SC-rBEBZCcTNIBY_jlmHbfTdBbFQQN0tcYFs19Mqef3F69_tjm1CIUEAAE-.exe") ;Kopiuje plik, poniważ po instalacji sie usuwa Sleep(3000) ShellExecute($SciezkaForeScout) ;If process dont exist install program AutoItSetOption('MouseCoorMode', 0) Sleep(60000) ;Pouse beetwen Programs EndIf If ProcessExists("avscc.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "AVAMAR jest zainstalowany", 1) ;If yes then says it in MassageBox MouseClick("primary",987, 593, 1, 0) Else ShellExecute($SciezkaAVAMAR) ;If process dont exist install program AutoItSetOption('MouseCoorMode', 0) Sleep(22000) WinWait("EMC Avamar for Windows Setup") WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1057, 690, 1, 0) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",747, 638, 1, 0) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1060, 683, 1, 0) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1081, 687, 1, 0) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1063, 688, 1, 0) Sleep(2000) WinActivate("Warning") MouseClick("primary",1115, 600, 1, 0) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1048, 684, 1, 0) Sleep(40000) WinActivate("EMC Avamar for Windows Setup") MouseClick("primary",1053, 686, 1, 0) Sleep(60000); Pouse beetwen Programs EndIf If ProcessExists("LOGSystem.Agent.Service.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "LOG jest zainstalowany", 1) ;If yes then says it in MassageBox MouseClick("primary",987, 593, 1, 0) Else ShellExecute($SciezkaLOG) ;If process dont exist install program AutoItSetOption('MouseCoorMode', 0) WinWait("Instalator programu LOG System Agent") WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1053, 686, 1, 0) Sleep(2000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",746, 637, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1054, 688, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",791, 450, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1065, 685, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1059, 682, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1081, 686, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1054, 685, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1064, 684, 1, 0) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1049, 686, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1055, 686, 1, 0) Sleep(1000) WinActivate("Instalator programu LOG System Agent") MouseClick("primary",1049, 687, 1, 0) EndIf MsgBox($MB_SYSTEMMODAL, "", "Wszystkie Programy Sa Zainstalowane") ;MassageBox Thats say that all programs are install EndFunc Func ZainstalujEPS() If ProcessExists("cptrayUI.exe")Then ;Check If Process Exist MsgBox($MB_SYSTEMMODAL, "", "EPS, jest zainstalowany", 1) ;If yes then says it in MassageBox MouseClick("primary",987, 593, 1, 0) Else ShellExecute('instalki\EPS.msi' ) ;If process dont exist install program AutoItSetOption('MouseCoorMode', 0)) ControlClick('Check Point Endpoint Security', '', 'Button1') MsgBox($MB_SYSTEMMODAL, "", "EPS został zainstalowany") ;MassageBox Thats say that all programs are install EndIf EndFunc