My company has an AD Group Policy that overwrites my browser's home page with the company's intranet landing page. On top of that any additional home page tabs I configure are removed.
I have always been a big fan of scripts, shortcuts and quick ways to do things (hence my dev tools post). I'm also a big fan of IE homepage tabs, and I want my tabs back!
While I respect the Group Policy and the requirement for staff to see the intranet home page, I still feel the urge to have control over my homepage tabs, so here's a quick script that I wrote.
This VBscript will set the “Secondary Start Pages” key in the registry. It will keep the “Start Page” key that the AD Group Policy configures, so your company intranet page will still load.
Here's the code:
'Written by Radi A. @ UW
'Use at your own risk and I take no blame if you get fired because of this… (:
Option Explicit
Dim arrValues
'Set your homepages here in the following array.
arrValues = Array("http://forums.microsoft.com/MSDN/ShowForum.aspx?ForumID=1203&SiteID=1", _
"http://www.google.com.au/ig?hl=en", _
"/radi")
'declarations
Const HKEY_CURRENT_USER = &H80000001
Dim objRegistry
Dim strComputer, strKeyPath, strValueName
strComputer = "."
'get key object
Set objRegistry=GetObject("winmgmts:{impersonationLevel=impersonate}!\" & strComputer & "
ootdefault:StdRegProv")
'assign variables
strKeyPath = "SoftwareMicrosoftInternet ExplorerMain"
strValueName = "Secondary Start Pages" 'change this property only to keep Click as a home page
'set the property
objRegistry.SetMultiStringValue HKEY_CURRENT_USER,strKeyPath,strValueName,arrValues
Just modify the lines with your homepages, save it as .vbs and place it in your “Startup” folder.
I have also packed it in a ZIP for convenience. Download Browser_Secondary_Homepage_Overwrite_Script.Zip