none
Script Para mudar o Gateway RRS feed

  • Pergunta

  • Ola feras, to com um maior problemao aqui , nao estou conseguindo criar um script para alterar o Gateway da maquina , pois gostaria de colocar isso em logon do usuario, alguem pode me ajduar?

    segunda-feira, 27 de outubro de 2008 14:57

Respostas

  • Como ninguem responde esse topico, irei responder pois encontrei a resposta para minha duvida:

     

    Segue o Script para mim mesmo:

     

    copia esse Comando cola em um *.txt e salva como *.vbs . No campo da Mscara / Gateway e DNS vc deve escolher a configuraçao desejada  e acabou!

     

    Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
    Set colNetAdapters = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")


    strSubnetMask = Array("255.255.255.0")
    strGateway = Array("192.168.0.254")
    strGatewayMetric = Array(1)
    strDNS = Array("192.168.0.254")
     
    For Each objNetAdapter in colNetAdapters
         errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
         errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
     
         objNetAdapter.SetDNSServerSearchOrder strDNS
    Next


     

    terça-feira, 28 de outubro de 2008 23:56

Todas as Respostas

  • Ola Adriano,

     

    Vou mover o seu post para a área correta.

     

    Abs.

     

    segunda-feira, 27 de outubro de 2008 16:09
  • Como ninguem responde esse topico, irei responder pois encontrei a resposta para minha duvida:

     

    Segue o Script para mim mesmo:

     

    copia esse Comando cola em um *.txt e salva como *.vbs . No campo da Mscara / Gateway e DNS vc deve escolher a configuraçao desejada  e acabou!

     

    Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
    Set colNetAdapters = objWMIService.ExecQuery("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")


    strSubnetMask = Array("255.255.255.0")
    strGateway = Array("192.168.0.254")
    strGatewayMetric = Array(1)
    strDNS = Array("192.168.0.254")
     
    For Each objNetAdapter in colNetAdapters
         errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
         errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
     
         objNetAdapter.SetDNSServerSearchOrder strDNS
    Next


     

    terça-feira, 28 de outubro de 2008 23:56
  • pessoal como faço para executar esse script remotamente em uma estação com windows Vista?? Executei o script e funcionou perfeitamente, executei localmente na máquina com windows vista e também funcionou.

    Quando executo o script através da minha máquina remotamente não funciona.
    quinta-feira, 19 de fevereiro de 2009 15:52
  • Olá,

    Você pode executar o psexec do sysinternals, segue link para download:
    http://technet.microsoft.com/en-us/sysinternals/bb896649.aspx

    Depois a sintaxe dele é assim:
    psexec \\marklap c:\bin\test.exe

    Se tiver dúvida, segue link com exemplos:
    http://www.microsoft.com/brasil/technet/sysinternals/security/psexec.mspx

    Até mais,

    Jesiel

    Obs.: Se útil, classifique





    quinta-feira, 19 de fevereiro de 2009 18:25
  •  Também pode ser feito através de uma Diretiva de Segurança ou GPO. (local ou do domínio)

    Grande abraço


    http://jmazzoni.spaces.live.com/
    sexta-feira, 27 de fevereiro de 2009 13:30
  • Jesiel,

     

    Muito útil o pstools com todos os comandos não só o psexec mais sim todos serão de grande utilidade na Empresa.

     

    Obrigado.

     

    Junior

    MCSA - Messaging

    sexta-feira, 27 de fevereiro de 2009 15:08
  •  Olá,

    Beleza Juninho....

    Precisando é só postar...

    Até mais,

    Jesiel

    Obs.: Se útil, classifique
    sábado, 28 de fevereiro de 2009 15:39
  •  Pode utilizar este bat tambem


    @echo off

    set Rede="Conexao Local"
    set address1="192.168.1.1"
    set address2="192.168.1.2"
    set address3="192.168.1.3"

    :menu
    cls
    echo ---------------------------------------------------------------
    echo -                                                             -
    echo -  SCRIPT alteracao do Gateway do micro                       -
    echo -                                                             -
    echo -  1 - Gateway 1                                                 -
    echo -  2 - Gateway 2                                         -
    echo -  3 - Gateway 3                                        -
    echo -  4 - Sair                                                   -
    echo -                                                             -
    echo - Selecione uma das opcoes [1 2 3 ou 4]                       -
    echo ---------------------------------------------------------------
    set /p opcao=Selecione :
    set opcao=%opcao:~0,1%

    if "%opcao%"=="1" goto pad
    if "%opcao%"=="2" goto pri
    if "%opcao%"=="3" goto sec
    if "%opcao%"=="4" goto fim
    echo Opcao invalida
    goto menu


    :pad
    echo Alterando o Gateway da %Rede% para %address1%
    netsh interface ip set address %Rede% gateway = %address1% gwmetric = 1
    goto fim

    :pri
    echo Alterando o Gateway da %Rede% para %address2%
    netsh interface ip set address %Rede% gateway = %address2% gwmetric = 1
    goto fim

    :sec
    echo Alterando o Gateway da %Rede% para %address3%
    netsh interface ip set address %Rede% gateway = %address3% gwmetric = 1
    goto fim


    :fim
    echo ---------------------------------------------------------------
    echo -                                                             -
    echo -          Informacoes da placa de rede                 -
    echo -                                                             -
    echo -                                                             -
    echo ---------------------------------------------------------------
    ipconfig
    pause > nul


    as
    quinta-feira, 5 de março de 2009 18:40
  • Pessoal,

    eu preciso definir tambem , dois DNS , Preferencial e Alternativo.  como incluir isso no Script do Alexandre

    Obrigado

    anderson@c3informatica.com
    domingo, 26 de abril de 2009 20:15
  • anderson, troca a linha

    strDNS = Array("192.168.0.254")


    por strDNS = Array("192.168.0.254", "192.168.0.254")

    ai voce altera o ultimo valor para o dns alternativo que voce quiser..



    tenho só uma duvida, estou precisando apagar o valor do gateway da minha placa de rede. que parametros eu passo?

    strGateway = Array("")  ????
    strGateway = Array("   .   .   .   ")  ????
    strGateway = Nothing  ????


    estou procurando desde manha q ainda nao achei nada, se alguem puder me ajudar.


    Obrigado.
    terça-feira, 26 de maio de 2009 16:55
  • ola jose mario, tudo bom?

    entao, tenho aqui um pc com a configuração da placa em ip dinamico

    a rede que ele esta conectado tem duas internets, uma em 192.168.0.1 e outra em .3

    a .3 é mais rapida e mais instavel, gostaria de que a cada minuto ( por exemplo ) eu verificasse

    se a internet esta ativa, caso negativo renovar meu gateway, cheguei no seguinte codigo.....

    TESTE.BAT

    *********************

    :inicio
    ping 8.8.8.8 > ping.txt

    (se primeira letra de ping.txt = R )*
    (contador de tempo pra 1 minuto )*
    goto :inicio

    (se nao)

    ipconfig /release "Ethernet"
    ipconfig /renew "Ethernet"
    goto :inicio

    *************************

    onde coloquei entre ( ) é onde nao sei que codigo usar

    poderia ajudar? muito obrigado

    sábado, 9 de junho de 2018 12:00