Все мои виртуальные машины имеют пакетный файл, который запускается при входе в систему, который вызывает некоторые другие пакетные файлы, и vbscript. Смесь этих пакетных файлов выполняет очистку средства просмотра событий, а также очистку других каталогов и т. д.
Так что в моем VBScript я добавил следующий код, который в основном очищает существующий DNS-сервер и добавляет два из них, один из которых является моим локальным DNS-сервером
Скрипт запуска для исправления DNS
'Fix DNS Servers
ComputerName = CreateObject("WScript.Network").ComputerName
Select Case ComputerName
Case "LAB1","LAB2","LAB3"
'
Case Else
CreateObject("WScript.Shell").Run "netsh interface ipv4 delete dnsserver ""Local Area Connection"" all"
CreateObject("WScript.Shell").Run "netsh interface ipv4 add dnsserver ""Local Area Connection"" address=192.168.1.201"
CreateObject("WScript.Shell").Run "netsh interface ipv4 add dnsserver ""Local Area Connection"" address=192.168.1.1"
End Select
Теперь нужно всего лишь 5 минут ждать, пока мой сценарий завершится, и эти машины снова подключатся к моей сети.