sDNSServers = array("167.68.250.129", "10.15.242.12", "172.26.9.20", "10.15.4.136", "167.68.251.130")
Set oLocator=CreateObject("WbemScripting.SWbemLocator")
Set oSvc=oLocator.ConnectServer(sServer)