Bonjour à tous, je viens de mettre en place un serveur proxy et il faut que je lance un script vbs pour paramètrer IE sur une vingtaine de postes

Mon script vbs active le proxy, ajoute l'adresse et le port, et coche la case "ne pas utiliser le proxy pour les adresses locales"

j'ai quelques sites à mettre en exception, après plusieurs essai je n'arrive pas à ajouter d'exceptions

voici mon script
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Const HKEY_CURRENT_USER = &H80000001
 
strComputer = "."
Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
Set oWshShell = CreateObject("WScript.Shell")
 
strKeyPath = "SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings"
strRegPath = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\"
strValueName = "ProxyEnable"
dwValue = 1
objRegistry.SetDWORDValue HKEY_CURRENT_USER, strKeyPath, strValueName, dwValue
Call oWshShell.RegWrite(strRegPath & "ProxyEnable", "00000001", "REG_DWORD")
 
strValueName = "ProxyServer"
strValue = "192.168.10.58:3128"
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue
 
strValueName = "ProxyOverride"
strValue = "<local>"