none
Script Para mudar o Gateway

    Question

  • 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?

    Monday, October 27, 2008 2:57 PM

Answers

  • 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


     

    Tuesday, October 28, 2008 11:56 PM

All replies

  • Ola Adriano,

     

    Vou mover o seu post para a área correta.

     

    Abs.

     

    Monday, October 27, 2008 4:09 PM
  • 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


     

    Tuesday, October 28, 2008 11:56 PM
  • 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.
    Thursday, February 19, 2009 3:52 PM
  • 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





    Thursday, February 19, 2009 6:25 PM
  •  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/
    Friday, February 27, 2009 1:30 PM
  • 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

    Friday, February 27, 2009 3:08 PM
  •  Olá,

    Beleza Juninho....

    Precisando é só postar...

    Até mais,

    Jesiel

    Obs.: Se útil, classifique
    Saturday, February 28, 2009 3:39 PM
  •  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
    Thursday, March 05, 2009 6:40 PM
  • Pessoal,

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

    Obrigado

    anderson@c3informatica.com
    Sunday, April 26, 2009 8:15 PM
  • 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.
    Tuesday, May 26, 2009 4:55 PM