[Iska]

Anton04, расскажите, что отличает «текущий (активный) сетевой интерфейс» от прочих.

[Anton04]

что отличает «текущий (активный) сетевой интерфейс» от прочих. »

Активный сетевой интерфейс это тот на котором, на данный момент времени, установлено соединение (поднят линк), т.е. подключен к свичу/wi-fi или другому сетевому оборудованию .

[Iska]

Тогда почему:

Данное задание напоминает топик Смена адресов DNS на всех компах в домене, но предложенный там вариант не совсем подходит, а именно нужно смена dns только на текущем (активном) интерфейсе, не затрагивая остальные интерфейсы »

не подходит? Там ведь есть:

Код: "Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE"

[Anton04]

не подходит? »

Честно, как то попытался его запустить не заработал, а в самом коде я профан. Если не трудно подредактируйте тот скрипт под текущую задачу?

[Iska]

Если речь про это:

читать дальше »

то, можно, например, так:

читать дальше »

Код:

Option Explicit

Dim objSWbemObjectEx

With WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2")
	For Each objSWbemObjectEx In .ExecQuery("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = 'True'")
		With objSWbemObjectEx
			WScript.Echo "[" & .Index & "]", .Description, "(" &  .MACAddress & ")", .SettingID
			
			If .SetDNSServerSearchOrder(Array("192.168.224.2", "192.168.224.3", "192.168.224.4", "192.168.224.5")) = 0 Then
				WScript.Echo "Successfully assign DNS server(s) to connection"
			Else
				WScript.Echo "Can't assign DNS server(s) to connection"
			End If
		End With
		
		Exit For
	Next
End With

WScript.Quit 0

Если Вам помимо того ещё и статику задавать надо, то: Script Assign a Static IP Address.

[Anton04]

Если речь про это: »

Ну это одно и тоже что и на первой закладке, так что конечно пойдёт!

то, можно, например, так: »

Только вод вывод сообщений вообще не нужен, а так работает идеально.
Что нужно закомментировать чтобы убрать вывод сообщений?

Если Вам помимо того ещё и статику задавать »

Нет, статику трогать не надо, только DNS.

[Iska]

Ну это одно и тоже что и на первой закладке, …»

Отчасти. На первой вкладке можно задать не более двух.

Только вод вывод сообщений вообще не нужен, а так работает идеально. Что нужно закомментировать чтобы убрать вывод сообщений? »

1. Поставить символ апострофа «'» перед обеими «WScript.Echo "…"».
2. Просто удалить строки с «WScript.Echo "…"».
3. Указывать параметром скрипта при его запуске параметр пакетной обработки «//b».

[Anton04]

Iska,

Ещё раз огромное спасибо. Решение более чем устраивает.

Удачи Вам.

[atx]

Можно подниму тему.

В компании сменился PDC, старый адрес DNS скоро будет неактивен, нужно на всех серверах со статикой прописать обновленный DNS.

1. Нужно поменять только 2й DNS на определенных серверах. В том числе и на домен контроллерах.
2. Нужно поменять оба DNS
3. Есть некоторое количество машин со статикой, на W7, там тоже надо поменять

Какой кусок скрипта нужно использовать по ссылке выше? Как скормить скрипту список серверов? Только для активного адаптера.