Modification DNS a distance

Marsh Posté le 15-06-2017 à 21:26:39

Bonjour a tous,

Nous avons un parc de poste tous en adresse IP fixe + serveurs DNS fixe.

je souhaite changer les DNS sur mes postes, mais comment faire ?

Nos postes sont pour la plupart dans l'AD, donc on doit pouvoir activer une GPO, mais:

-J'ai encore de nombreux postes qui ne sont pas dans l'AD.
Point commun avec ceux qui sont dans l'AD, le compte admin local qui est le même.

-Si je le fais par GPO, est ce que ce n'est pas risqué car la GPO est liée a l'AD et l'AD aux DNS ?
D'autre part, comment contrôler a distance et en masse que ma GPO a bien été appliquée et surtout ce qui m'embête c'est que une fois cette GPO appliquée, je ne peux plus la modifier sauf si je la désactive ?

Merci pour votre aide.

Reply

Marsh Posté le 15-06-2017 à 21:26:39

Reply

Marsh Posté le 15-06-2017 à 22:16:56

script sur chacune des ip qui va modifier les dns via wmi (bon faut que ce soit ouvert qd même)

Reply

Marsh Posté le 16-06-2017 à 08:40:07

Hello
j'ai réalisé cette opération il y a peu
voici un petit vbs qui change les dns pour les pc qui ont comme passerelle
"10.88.250.1"
"10.88.252.1"
"10.88.128.1"

Code :

on error resume next
strComputer = "."
strDNS1 = "10.88.132.1"
strDNS2 = "10.88.4.1"
Passrelle = Array("10.88.250.1", "10.88.252.1","10.88.128.1" )
arrDNSServers = Array(strDNS1, strDNS2)
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2" )
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True" )
For Each objNetCard in colNetCards
'Wscript.Echo "DNS Server 1: " & objNetCard.DNSServerSearchOrder(0)
'Wscript.Echo "DNS Server 2: " & objNetCard.DNSServerSearchOrder(1)
StrPasrellePc = Join(objNetCard.DefaultIPGateway, "," )
Trouvee = false
For i = 0 To UBound(Passrelle)
If Passrelle(i) = StrPasrellePc Then
Trouvee = True
Exit For
End If
Next
if objNetCard.DNSServerSearchOrder(0) <> strDNS1 and Trouvee = true then
objNetCard.SetDNSServerSearchOrder(arrDNSServers)
end if
Next

a toi de le lancer par psexec ou autre.

Message édité par skoizer le 16-06-2017 à 08:41:45

---------------
je veux tout, tout de suite, et gratuitement ! miladiou !

Reply

Marsh Posté le 18-06-2017 à 16:45:59

Sinon en PowerShell avec moins de 10 lignes. Tu fais un fichier source avec les noms des serveurs .

http://pbarth.fr/node/213

Code :

$dnsservers = "172.21.10.1","172.22.10.2"
$computers = Get-Content Liste.txt
foreach ($comp in $computers)
{
$adapters = gwmi -q "select * from win32_networkadapterconfiguration where ipenabled='true'" -ComputerName $comp
foreach ($adapter in $adapters)
{
$adapter.setDNSServerSearchOrder($dnsservers)
}
}

Message édité par phil255 le 18-06-2017 à 16:47:11

Reply

Modification DNS a distance

Sujets relatifs:

Leave a Replay