Question : Appliying registry settings to current users profiles.

I have three registry settings that i need to apply to all of my users. I found a Microsoft artical on how to do this but it is not working. I do not know what i am missing. Here is a link to the aritical that i am using. http://support.microsoft.com/kb/823586/en-us

Answer : Appliying registry settings to current users profiles.

This is on a windows 2003 terminal server. I think i figured out what is causing the timeout. If you remove the -s it is waiting for the user to confirm that they want to apply the registry settings. Using the script mentioned above is there a way to tell it yes we want to apply the registry settings? If not i found a VB script to do this but i am no wiz at vb and cant get it to apply the registry settings even locally. I will past that code and see if any of you can figure out the vb code. Here is the microsoft link for the vb code. http://msdn.microsoft.com/en-us/library/aa384906.aspx

Here are the registry values i need applied.

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run] "ctfmon.exe"=-
[HKEY_CURRENT_USER\Software\Microsoft\CTF] "Disable Thread Input Manager"=dword:00000001
[HKEY_CURRENT_USER\Software\Microsoft\CTF\MSUTB] "ShowDeskBand"=dword:00000000
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
const HKEY_CURRENT_USER = &H80000002 
strComputer = "."
 
Set objRegistry = _
    GetObject("winmgmts:{impersonationLevel=impersonate}!\\" _ 
    & strComputer & "\root\default:StdRegProv")
 
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Run"
strValueName = "ctfmon.exe"
arrStringValues = Array("-")
 
strKeyPath = "Software\Microsoft\CTF"
strValueName = "Disable Thread Input Manager"
arrStringValues = Array("dword:00000001")
 
objRegistry.SetMultiStringValue HKEY_CURRENT_USER, strKeyPath,_
    strValueName, arrStringValues
Open in New Window Select All
Random Solutions  
 
programming4us programming4us