From 476dbe90d6c5d27ab5431bd1c0b572b27795e6e0 Mon Sep 17 00:00:00 2001
From: Mario Fetka <mario.fetka@gmail.com>
Date: Wed, 18 Nov 2015 20:58:30 +0100
Subject: [PATCH] close brwoser windows

---
 CLIENT_DATA/browserkill.vbs | 33 +++++++++++++++++++++++++++++++++
 CLIENT_DATA/setup3264.ins   | 14 ++++++++++++++
 2 files changed, 47 insertions(+)
 create mode 100644 CLIENT_DATA/browserkill.vbs

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 8987064..be59b0b 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 "Disables the pop-up browser window"
+		Winbatch_killtasks_32
+
 		comment "Copy files"
 		Files_install_32 /32Bit
 		comment "Patch Registry"
@@ -89,6 +93,10 @@ else
 		ChangeDirectory "%SCRIPTPATH%"
 		Winbatch_install_64
 		Sub_check_exitcode
+
+		comment "Disables the pop-up browser window"
+		Winbatch_killtasks_64
+
 		comment "Copy files"
 		Files_install_64 /64Bit
 		comment "Patch Registry"
@@ -102,6 +110,9 @@ endif
 [Winbatch_install_32]
 "$Install32Exe$" /sp- /silent /norestart /nocancel /SUPPRESSMSGBOXES /NORUN /LOADINF="$IniCfgFile$" /Dir="$InstallDir32$"
 
+[Winbatch_killtasks_32]
+cscript /b /nologo %ScriptPath%\browserkill.vbs
+
 [Files_install_32]
 ; copy the ini file to the InstallDir
 copy "$IniCfgFile$" "$InstallDir32$"
@@ -113,6 +124,9 @@ copy "$IniCfgFile$" "$InstallDir32$"
 [Winbatch_install_64]
 "$Install64Exe$" /sp- /silent /norestart /nocancel /SUPPRESSMSGBOXES /NORUN /LOADINF="$IniCfgFile$" /Dir="$InstallDir64$"
 
+[Winbatch_killtasks_64]
+cscript /b /nologo %ScriptPath%\browserkill.vbs
+
 [Files_install_64]
 ; copy the ini file to the InstallDir
 copy "$IniCfgFile$" "$InstallDir64$"