Login Script Help

[blemoine]

i help with a login script to set proxy settings for users. i don't want to use group policy for this if i don't have to. can anyone please help with this. here is what i have so far.

'Script Start

On Error Resume Next
strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Proxy")


Const HKEY_CURRENT_USER = &H80000001
Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings"
strValueName = "ProxyEnable"
strProxyOveride ="192.168.1.0"
dim dWord
objRegistry.GetDWORDValue HKEY_CURRENT_USER , strKeyPath , strValueName ,dWord
if dWord = 1 then
dwValue = 0
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
else
For Each objItem in colItems
dwValue = 1
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
objItem.SetProxySetting "192.168.1.1","8080" 'Change parameters here
Next
end if

 

[blemoine]

forgot to mention that this script works except for the fact that it doesn't set exceptions. that is what i need the help with. thanks

 

[TheKub]

Is there a particular reason why you wish to avoid GP?

 

[blemoine]

i have 4 branches. i have a default policy for the domain and a custom policy for each branch. i only want to change the proxy settings on a few workstations at each branch. i don't want to have to create any additional group policies unless necessary.

 

[TheKub]

So you have 5 policies in your domain and do not want to add more? Well, I don't have enough experience in VBScript to offer alot of help, but I would personally just make a new group that contains the needed workstations and apply the GPO to that group.

 

[spidey07]

Why not use DHCP to provide proxy server? This way no matter where a user goes they will get the correct proxy server.

 

[blemoine]

can't use dhcp on our network. its more for certain workstations than users.