DNS Domain Suffix update script
A script to help modify/change/update the DNS Domain Suffix on a Network Adapter On Error Resume Next strComputer = “.” arrNewDNSSuffixSearchOrder = Array(“hr.fabrikam.com”, “contoso.com”) Set objWMIService = GetObject(“winmgmts:” _ & “{impersonationLevel=impersonate}!\” & strComputer & “rootcimv2”) Set colNicConfigs = objWMIService.ExecQuery _ (“SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True”) For Each objNicConfig In colNicConfigs strDNSHostName