Set objNICs Help Needed

[jackdaniels]

i can set TCP/IP Preferred DNS and Alternate DNS with that code below;

Set objNICs = GetObject("winmgmts://.").InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objNIC In objNICs
If objNIC.IPEnabled Then
objNIC.SetDNSServerSearchOrder Array("4.2.2.1","4.2.2.2")
End If
Next

i need help to restore the default (" . . . "," . . . ")


i used this 3 code below but i couldnt manage it;

Set objNICs = GetObject("winmgmts://.").InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objNIC In objNICs
If objNIC.IPEnabled Then
objNIC.IPDisable
End If
Next

Set objNICs = GetObject("winmgmts://.").InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objNIC In objNICs
If objNIC.IPEnabled Then
objNIC.SetDNSServerSearchOrder Array(" . . . "," . . . ")
End If
Next

Set objNICs = GetObject("winmgmts://.").InstancesOf("Win32_NetworkAdapterConfiguration")
For Each objNIC In objNICs
If objNIC.IPEnabled Then
objNIC.SetDNSServerSearchOrder Array("0.0.0.0","0.0.0.0")
End If
Next

[GoOgLe]

i liked that... i can use it aswell