none
Script VBS. RRS feed

Respostas

  • Olá,

    Você pode usar o script em hta no link abaixo:

    http://social.technet.microsoft.com/Forums/pt-BR/scriptadminpt/thread/c6932fab-7a40-4ce7-a2d4-ee3ea0648370

    ou usar o script abaixo (VBS):

    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()
        errEnable = objNetAdapter.SetDNSServerSearchOrder()
        errEnable = objNetAdapter.SetDynamicDNSRegistration
    Next


    Faça os testes e nos retorne.

    Até mais,

    Jesiel

    Obs.: Se útil, classifique

    quarta-feira, 10 de junho de 2009 15:00