none
Como criar um script para desativar o proxy no IE? RRS feed

 > 

  • Pergunta

  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Pessoal,  alguém com experiencia em script  poderia da mais uma ajuda na criação do script  para desativar o proxy no IE, desta forma eu não ficaria esperando o browser do IE abrir e ir até o menu de configuração para desativar o proxy.

    Porque  desativar o proxy,  na verdade quando estou na rede local automaticamente o proxy é habilitado via GPO, mas quando chego em casa e preciso usar o notebook tenho que desativar o proxy  para poder acessar a interne da minha casa.

    Alguém  com facilidade em .vbs  poderia ajudar?

    Abraço


    sexta-feira, 26 de agosto de 2016 01:46
    |

Respostas

  • Question
    Entrar para Votar
    2
    Entrar para Votar

    Algumas pessoas aqui na minha empresa enfrentam o mesmo problema resolvi com um script vbs salvo na Área de trabalho.

    Basta copiar o script abaixo, colar no bloco de notas e salvar com a extensão .vbs na Área de trabalho.

    Não esqueça de substituir o item "192.168.1.1:3128" pelo endereço do proxy da sua empresa.

    dim oShell
set oShell = Wscript.CreateObject("Wscript.Shell")
configproxy = "192.168.1.1:3128"

if msgbox("Navegar com Proxy?", vbQuestion or vbYesNo) = vbYes then
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"
else
oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"
end if

Set oShell = Nothing
    • Editado Tio do CPD terça-feira, 30 de agosto de 2016 20:41
    • Marcado como Resposta jgama domingo, 4 de setembro de 2016 18:55
    terça-feira, 30 de agosto de 2016 20:34
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Salve o comando abaixo .vbs

    set wshshell = createobject("Wscript.shell")
    WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"

    Abre outra GPO, uma GPO para executar no Logout e coloca o comando acima. Assim quando o pessoal desliga o computador ao sair da empresa roda o Script e retira o proxy.

    Abraço.

    • Marcado como Resposta jgama domingo, 4 de setembro de 2016 18:55
    terça-feira, 30 de agosto de 2016 18:01
    |

Todas as Respostas

  • Question
    Entrar para Votar
    1
    Entrar para Votar

    Veja abaixo uma boa dica.

    Script Powershell Disable or Enable IE Proxy

    Espero ter ajudado.

    • Sugerido como Resposta coelhocarl sexta-feira, 26 de agosto de 2016 11:32
    sexta-feira, 26 de agosto de 2016 01:55
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Quanto tenho executar o script apresenta um erro

    Essa é a linha do script.vbs

    set-itemproperty 'HKCU:\Software\Microsoft\Windows\CurrentVersion\Internet Settings' 
-name ProxyEnable -value 0
    Ai  encontrei um script em bat  que resolveu minha preguiça  kkkk
    segue:
    REG ADD "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings" /v ProxyEnable /t REG_DWORD /d 0x00000000 /f
    terça-feira, 30 de agosto de 2016 17:46
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Salve o comando abaixo .vbs

    set wshshell = createobject("Wscript.shell")
    WSHShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"

    Abre outra GPO, uma GPO para executar no Logout e coloca o comando acima. Assim quando o pessoal desliga o computador ao sair da empresa roda o Script e retira o proxy.

    Abraço.

    • Marcado como Resposta jgama domingo, 4 de setembro de 2016 18:55
    terça-feira, 30 de agosto de 2016 18:01
    |
  • Question
    Entrar para Votar
    2
    Entrar para Votar

    Algumas pessoas aqui na minha empresa enfrentam o mesmo problema resolvi com um script vbs salvo na Área de trabalho.

    Basta copiar o script abaixo, colar no bloco de notas e salvar com a extensão .vbs na Área de trabalho.

    Não esqueça de substituir o item "192.168.1.1:3128" pelo endereço do proxy da sua empresa.

    dim oShell
set oShell = Wscript.CreateObject("Wscript.Shell")
configproxy = "192.168.1.1:3128"

if msgbox("Navegar com Proxy?", vbQuestion or vbYesNo) = vbYes then
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"
else
oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"
end if

Set oShell = Nothing
    • Editado Tio do CPD terça-feira, 30 de agosto de 2016 20:41
    • Marcado como Resposta jgama domingo, 4 de setembro de 2016 18:55
    terça-feira, 30 de agosto de 2016 20:34
    |
  • Question
    Entrar para Votar
    0
    Entrar para Votar

    Obrigado  pessoal  pela dicas

    Abraço

    domingo, 4 de setembro de 2016 18:55
    |