How to Statically assign preferred Dns Address

[keithvp]

Hello
I am using a script from TechNet to statically assign an IP address for In/Out of office purposes. The script is below. However, I also need to statically assign the preferred and secondary dns servers. What is the vbscript reference to dns for me to assign those addresses?
Thanks

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2&quot
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE&quot
strIPAddress = Array("192.168.1.141&quot
strSubnetMask = Array("255.255.255.0&quot
strGateway = Array("192.168.1.100&quot
strGatewayMetric = Array(1)
For Each objNetAdapter in colNetAdapters
errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
If errEnable = 0 Then
WScript.Echo "The IP address has been changed."
Else
WScript.Echo "The IP address could not be changed."
End If
Next

 

[jonscott8]

strDNSServers=Array("10.10.10.10","20.20.20.20&quot
objNetAdapter.SetDNSServerSearchOrder(strDNSServers)

Jon Hawkins

 

[keithvp]

Thanks that worked perfectly
Keith