none
Script VBS IE RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Ola Pessoal,

    Possuo um script em .vbs para forçar o uso do proxy no IE. O Script funciona perfeitamente, marca a opção de usar o proxy, inclui as exceções, porém, gostaria que ele marcasse "Não usar servidor proxy para endereços locais". Poderiam me ajudar?

    Segue o script que ultilizo.

    'nome do arquivo: configura_proxy.vbs
    'script vbs para configurar o proxy no windows
    set oShell = Wscript.CreateObject("Wscript.Shell")
    configproxy = "proxy.local:8080"
    execeptions = "contoso.com; 10.10.10.10"
    oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
    oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", configproxy, "REG_SZ"
    oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", execeptions, "REG_SZ"
    Set oShell = Nothing

    Obrigado desde já pela ajuda

    segunda-feira, 29 de julho de 2013 16:05
    |

Respostas

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    boa noite Walter,

    é só vc acrescentar <local> depois dos sites que irá ficar na exclusão.

     set oShell = Wscript.CreateObject("Wscript.Shell")
 configproxy = "proxy.local:8080"
 execeptions = "contoso.com;10.10.10.10;<local>"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", configproxy, "REG_SZ"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", execeptions, "REG_SZ"
 Set oShell = Nothing

    att, Aparecido Deveza

    • Sugerido como Resposta fernando silva 1 terça-feira, 30 de julho de 2013 13:42
    • Marcado como Resposta Walter_Santos quarta-feira, 31 de julho de 2013 18:31
    terça-feira, 30 de julho de 2013 02:10
    |

Todas as Respostas

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Olá Walter

    Estou movendo sua thread para "Scripts Administrativos", onde podemos obter auxílio!

    Obrigado!

    Fernando H. da Silva - Microsoft Contingent Staff

    segunda-feira, 29 de julho de 2013 18:18
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    boa noite Walter,

    é só vc acrescentar <local> depois dos sites que irá ficar na exclusão.

     set oShell = Wscript.CreateObject("Wscript.Shell")
 configproxy = "proxy.local:8080"
 execeptions = "contoso.com;10.10.10.10;<local>"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", configproxy, "REG_SZ"
 oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", execeptions, "REG_SZ"
 Set oShell = Nothing

    att, Aparecido Deveza

    • Sugerido como Resposta fernando silva 1 terça-feira, 30 de julho de 2013 13:42
    • Marcado como Resposta Walter_Santos quarta-feira, 31 de julho de 2013 18:31
    terça-feira, 30 de julho de 2013 02:10
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Maravilha... Funcionou..

    Muito Obrigado!!!

    quarta-feira, 31 de julho de 2013 18:31
    |