1
WINS bei Clients mit fester IP eintragen
Hallo!
Ich möchte bei meinen CLients (XP PRO) den WINS-Server eintragen. Sie haben allerdings statische IPs. Wie kann ich per Grupenrichtlinie oder ähnliches bei allen Clients den WINS-Server (ist auch DC, SBS2003) eintragen?
viele grüße und danke
Ich möchte bei meinen CLients (XP PRO) den WINS-Server eintragen. Sie haben allerdings statische IPs. Wie kann ich per Grupenrichtlinie oder ähnliches bei allen Clients den WINS-Server (ist auch DC, SBS2003) eintragen?
viele grüße und danke
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 32111
Url: https://administrator.de/forum/wins-bei-clients-mit-fester-ip-eintragen-32111.html
Ausgedruckt am: 06.04.2025 um 07:04 Uhr
1 Kommentar
z.B. per VBS-Script über WMI
;WINS-SERVER
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
strPrimaryServer = "192.168.0.11"
strSecondaryServer = "192.168.0.22"
objNetCard.SetWINSServer strPrimaryServer, strSecondaryServer
Next
;DNS Server
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
arrDNSServers = Array("192.168.0.11", "192.168.0.22")
objNetCard.SetDNSServerSearchOrder(arrDNSServers)
Next
Karo
;WINS-SERVER
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
strPrimaryServer = "192.168.0.11"
strSecondaryServer = "192.168.0.22"
objNetCard.SetWINSServer strPrimaryServer, strSecondaryServer
Next
;DNS Server
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetCards = objWMIService.ExecQuery _
("Select * From Win32_NetworkAdapterConfiguration Where IPEnabled = True")
For Each objNetCard in colNetCards
arrDNSServers = Array("192.168.0.11", "192.168.0.22")
objNetCard.SetDNSServerSearchOrder(arrDNSServers)
Next
Karo
