Can a script be written to change all IE settings across a network?

RolandJS said:

Dell Computers, Round Rock TX, has had for years, from DOS/Windows 3.1 - Windows 7 & beyond, one of the finest, most thorough push-technologies [for updating umpteen computers] that I've known about. You will probably have to pay something for a Dell tech to give you knowledge-wise what you need to: know, purchase, implement, and maintain your own push-technology. From line-items to whole net-station downloads...

Are you just trying to push a service here? You are trying to say that there is no GPO or script that can be written to change IE settings across a domain network?

Okay, I'll bite.

Here's your script, Mike.


th-367767.vbs

Code:

'''
use_ssl_20 = True
use_ssl_30 = True
use_tls_10 = True
use_tls_11 = True
use_tls_12 = True

close_internet_explorer_first = True
restart_computer = False
display_done_message = -1 'Number of seconds. Zero for no message. Negative number for infinite. 
'''

intValue = 0
If use_ssl_20 = True Then intValue = intValue + 8
If use_ssl_30 = True Then intValue = intValue + 32
If use_tls_10 = True Then intValue = intValue + 128
If use_tls_11 = True Then intValue = intValue + 512
If use_tls_12 = True Then intValue = intValue + 2048

If close_internet_explorer_first = True Then
	With CreateObject("Shell.Application").Windows()
		For I = 0 To .Count - 1
			J = 0
			If .Item(J).Name = "Internet Explorer" Then
				Call .Item(J).Quit()
			Else
				J = J + 1
			End If
		Next
	End With
End If

Set WshShell = CreateObject("WScript.Shell")

strKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\SecureProtocols"
strType = "REG_DWORD"
WshShell.RegWrite strKey, intValue, strType

If display_done_message <> 0 Then 
	WshShell.Popup "Done.", display_done_message
End If

If restart_computer = True Then 
	WshShell.Run "shutdown.exe /r /t 0", 0
End If

RolandJS said:

Nope, not at all! I'm just saying that what you want and need may carry a price tag. However, keep watching this thread, there are many great techs [of which I'm not one of] who probably can give you valuable guidance.

Thanks. I thought it wasn't that difficult to push out a GPO or something to update all internet settings to be the same. Myt network admin is back later today, hopefully he has some knowledge regarding how to do this. Everyone I have asked, just in passing, said it was not a difficult thing to achieve.

Pyprohly said:

Okay, I'll bite.

Here's your script, Mike.


th-367767.vbs

Code:

'''
use_ssl_20 = True
use_ssl_30 = True
use_tls_10 = True
use_tls_11 = True
use_tls_12 = True

close_internet_explorer_first = True
restart_computer = False
display_done_message = -1 'Number of seconds. Zero for no message. Negative number for infinite. 
'''

intValue = 0
If use_ssl_20 = True Then intValue = intValue + 8
If use_ssl_30 = True Then intValue = intValue + 32
If use_tls_10 = True Then intValue = intValue + 128
If use_tls_11 = True Then intValue = intValue + 512
If use_tls_12 = True Then intValue = intValue + 2048

If close_internet_explorer_first = True Then
	With CreateObject("Shell.Application").Windows()
		For I = 0 To .Count - 1
			J = 0
			If .Item(J).Name = "Internet Explorer" Then
				Call .Item(J).Quit()
			Else
				J = J + 1
			End If
		Next
	End With
End If

Set WshShell = CreateObject("WScript.Shell")

strKey = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\SecureProtocols"
strType = "REG_DWORD"
WshShell.RegWrite strKey, intValue, strType

If display_done_message <> 0 Then 
	WshShell.Popup "Done.", display_done_message
End If

If restart_computer = True Then 
	WshShell.Run "shutdown.exe /r /t 0", 0
End If

Hey, thanks! I wasn't expecting anyone to actually do it, just what would be best. It actually was pretty simple to do by creating a GPO on the domain controller.