Script - Alterar Proxy Internet Explorer

1. Fechar todas as páginas do IE que estejam abertas.
2. Clique em Iniciar, Executar, digite regedit e, em seguida, clique em OK.
3. Navegue ate: [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings].
4. Selecione "Internet Settings" a esquerda, clique no menu "Arquivo" e selecione "Exportar", salve com o nome proxy em sua "Área de trabalho".
5. No arquivo proxy.reg salvo, clique com o botão direito do mouse e seguida em "Editar", localize a linha 'ProxyServer' e altere o proxy e porta, salve e feche, se desejar adicionar itens em exceções do proxy, altere a linha abaixo 'ProxyOverride' conforme desejado.
6. Após, executar o arquivo e verificar o acesso.

Não esqueça de deixar seu comentário!

Script - IP Dinâmico para Estático

Definindo um IP Dinâmico (DHCP) para Estático (FIXO)

Salvar o conteúdo abaixo em um arquivo de texto com a extensão .VBS

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")

Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")

strIPAddress = Array("10.0.1.41")
strSubnetMask = Array("255.255.248.0")
strGateway = Array("10.0.0.1")
strGatewayMetric = Array(1)
strDNS = Array("10.0.0.60","10.0.0.1")

For Each objNetAdapter in colNetAdapters
    errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
    errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
    objNetAdapter.SetDNSServerSearchOrder strDNS
Next

Link com solução completa:

 

http://social.technet.microsoft.com/Forums/pt/scriptadminpt/thread/83ff2669-d023-4c16-9844-669bf7322eac

 

Não esqueça de deixar seu comentário!