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>"
Partager