I have used the following script to set the IE homepages. However, if i attempt to exceed more than 4 addresses, i get a syntax error.
Can anybody advise me on the followg script?:
Option Explicit
Dim arrValues
'Set your homepages here in the following array.
arrValues = Array(" _
" _
"
'declarations
Const HKEY_CURRENT_USER = &H80000001
Dim objRegistry
Dim strComputer, strKeyPath, strValueName
strComputer = "."
'get key object
Set objRegistry=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
'assign variables
strKeyPath = "Software\Microsoft\Internet Explorer\Main"
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
Can anybody advise me on the followg script?:
Option Explicit
Dim arrValues
'Set your homepages here in the following array.
arrValues = Array(" _
" _
"
'declarations
Const HKEY_CURRENT_USER = &H80000001
Dim objRegistry
Dim strComputer, strKeyPath, strValueName
strComputer = "."
'get key object
Set objRegistry=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
'assign variables
strKeyPath = "Software\Microsoft\Internet Explorer\Main"
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