none
Desativar campo "Usar script de configuração automática" RRS feed

  • Pergunta

  • Boa noite,

    Estou necessitando de algun script se possivel em vbscript que desative automaticamente a opção "Usar script de configuração automática" que fica nas "configurações da LAN / Configuração automática", pois a mesma esta vindo ativa apontando pra um endereço. 

    quarta-feira, 28 de fevereiro de 2018 20:59

Respostas

  • Bom dia a todos,

    Passando pra informar que encontrei a seguinte solução abaixo via vbscript:

    ============================================================

    dim oShell
    set oShell = Wscript.CreateObject("Wscript.Shell")
    configproxy = "proxy:porta"

    if msgbox("Navegar com Proxy?", vbQuestion or vbYesNo) = vbYes then
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", configproxy, "REG_SZ"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", "<Inserir exceções aqui>"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL", ""
    else
    oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"
    end if

    Set oShell = Nothing

    ============================================================

    sexta-feira, 2 de março de 2018 14:02

Todas as Respostas

  • Olá,

    Essa configuração não está sendo entregue via GPO?

    A disposição,

    Marcos Roberto de Lima
    MCT-MCTS-MCITP-MCP

    Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    quinta-feira, 1 de março de 2018 15:47
  • Sim é aplicado via GPO, sempre ao logar no dominio especifico é aplicado automaticamente essa configuração, estou querendo utilizar minhas proprias configurações de proxy. Resumindo, preciso de um script que ao ser executado desative essa opção e aplique minhas configurações de proxy.
    quinta-feira, 1 de março de 2018 17:17
  • Olá,

    Neste caso, vejo que o ideal seria solicitar ao Administrador da Rede que esta configuração não se aplique ao seu usuário.

    Isso é possível?

    A disposição,

    Marcos Roberto de Lima
    MCT-MCTS-MCITP-MCP

    Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    quinta-feira, 1 de março de 2018 17:29
  • Não é possivel, pois essa configuração é aplicadas em diversas unidades da empresa, preciso aplicar essa configuração especifica com o script em apenas uma unidade.
    quinta-feira, 1 de março de 2018 17:42
  • Bom dia a todos,

    Passando pra informar que encontrei a seguinte solução abaixo via vbscript:

    ============================================================

    dim oShell
    set oShell = Wscript.CreateObject("Wscript.Shell")
    configproxy = "proxy:porta"

    if msgbox("Navegar com Proxy?", vbQuestion or vbYesNo) = vbYes then
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 1, "REG_DWORD"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer", configproxy, "REG_SZ"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyOverride", "<Inserir exceções aqui>"
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL", ""
    else
    oShell.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable", 0, "REG_DWORD"
    end if

    Set oShell = Nothing

    ============================================================

    sexta-feira, 2 de março de 2018 14:02
  • Olá amigo, 

    Faz da seguinte maneira que vai dar certo: 

    dim oShell
    set oShell = Wscript.CreateObject("Wscript.Shell")
    configURL = "script_de_proxy"
    configURL0 = ""

    if msgbox("Navegar com Proxy?", vbQuestion or vbYesNo) = vbYes then
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL", configURL, "REG_SZ"
    else
    oShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\AutoConfigURL", configURL0, "REG_SZ"
    end if

    Set oShell = Nothing
    quinta-feira, 8 de novembro de 2018 18:59