none
Alterar DNS RRS feed

  • Pergunta

  • Bom dia Pessoal,

     

    Gostaria de saber se existe algum script que eu possa usar na minha rede para mudar o DNS das estações. Na verdade existe um DNS configurado manualmente para todas. Só quero habilitar a opção "Obter endereço dos servidores de DNS automaticamente" que ficam nas configurações da conexão de rede.

     

    Fico no aguardo,

     

     

    segunda-feira, 20 de agosto de 2007 12:59

Respostas

  • Eder, você pode usar este aqui:

     

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

    Set colNetAdapters = objWMIService.ExecQuery _
        ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
     
    For Each objNetAdapter In colNetAdapters
        errEnable = objNetAdapter.EnableDHCP()
        arrDNSServers = Array()
        objNetAdapter.SetDNSServerSearchOrder(arrDNSServers)
       
    Next

     

     

     

    Grande abraço.

    segunda-feira, 20 de agosto de 2007 13:16

Todas as Respostas

  • Eder, você pode usar este aqui:

     

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

    Set colNetAdapters = objWMIService.ExecQuery _
        ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
     
    For Each objNetAdapter In colNetAdapters
        errEnable = objNetAdapter.EnableDHCP()
        arrDNSServers = Array()
        objNetAdapter.SetDNSServerSearchOrder(arrDNSServers)
       
    Next

     

     

     

    Grande abraço.

    segunda-feira, 20 de agosto de 2007 13:16
  • Bom dia Wemali,

     

    Muito obrigado... funcionou perfeitamente... valeu!!!

     

    Att.

    quinta-feira, 23 de agosto de 2007 10:18
  • Olá Welington,

     

    Ótima dica.

     

    Pergunto:

    Se eu quiser colocar um DNS de um AD por exemplo 192.168.0.2, neste script, como faço?

     

    Abraços

     

    Jairo

    sábado, 24 de novembro de 2007 05:20