diff --git a/CLIENT_DATA/browserkill.vbs b/CLIENT_DATA/browserkill.vbs new file mode 100644 index 0000000..d7a69ea --- /dev/null +++ b/CLIENT_DATA/browserkill.vbs @@ -0,0 +1,33 @@ +Option Explicit +KillBrowsers() + +Sub KillBrowsers() +'Declare variables + Dim i + Dim wmiSvc,WQL,Processes,Process + Dim arrBrowserProcesses(7) + +'Initialize variables + arrBrowserProcesses(0)="iexplore.exe" + arrBrowserProcesses(1)="chrome.exe" + arrBrowserProcesses(2)="firefox.exe" + arrBrowserProcesses(3)="safari.exe" + arrBrowserProcesses(4)="opera.exe" + arrBrowserProcesses(5)="iron.exe" + arrBrowserProcesses(6)="MicrosoftEdge.exe" + + Set wmiSvc = GetObject("winmgmts:\\.\root\cimv2") + For i = 0 To UBound(arrBrowserProcesses) + wql = "SELECT * FROM Win32_Process WHERE Name='" & arrBrowserProcesses(i) & "'" + Set processes = wmiSvc.ExecQuery(wql) + Do While processes.Count > 0 + For Each process In processes + process.Terminate + Next + WScript.Sleep 200 + Set processes = wmiSvc.ExecQuery(wql) + Loop + Next + +End Sub + diff --git a/CLIENT_DATA/setup3264.ins b/CLIENT_DATA/setup3264.ins index a9c1cdc..6cd1865 100644 --- a/CLIENT_DATA/setup3264.ins +++ b/CLIENT_DATA/setup3264.ins @@ -75,6 +75,10 @@ else ChangeDirectory "%SCRIPTPATH%" Winbatch_install_32 Sub_check_exitcode + + comment "Close the After Install browser window" + Winbatch_taskkill + comment "Copy files" Files_install_32 /32Bit comment "Patch Registry" @@ -88,6 +92,10 @@ else comment "Start setup program" ChangeDirectory "%SCRIPTPATH%" Winbatch_install_64 + + comment "Close the After Install browser window" + Winbatch_taskkill + Sub_check_exitcode comment "Copy files" Files_install_64 /64Bit @@ -99,6 +107,9 @@ else endif +[Winbatch_taskkill] +cscript //b //nologo %ScriptPath%\browserkill.vbs + [Winbatch_install_32] "$Install32Exe$" /sp- /silent /norestart /nocancel /SUPPRESSMSGBOXES /DIR="$InstallDir32$"