Überschreiben der TCP Einstellung via GPO unter W2k
Ich habe folgende Herausforderung!!!
Ich möchte unter einem w2k Server via GPO die TCP/IP Einstellungen die nicht via DHCP verteilt werden mit einer GPO übersteuern, so das ein anderer DNS Server genommen wird! Ich stelle gerade auf w2k3 um! Mein Plan ist es auch das ganze dann per DHCP zu erledigen! Leider kann ich als Admin nicht frei walten da mich unzählige Vorschriften einschränken in der arbeit! daher der doch sehr alte Standart!
Ich möchte unter einem w2k Server via GPO die TCP/IP Einstellungen die nicht via DHCP verteilt werden mit einer GPO übersteuern, so das ein anderer DNS Server genommen wird! Ich stelle gerade auf w2k3 um! Mein Plan ist es auch das ganze dann per DHCP zu erledigen! Leider kann ich als Admin nicht frei walten da mich unzählige Vorschriften einschränken in der arbeit! daher der doch sehr alte Standart!
Please also mark the comments that contributed to the solution of the article
Content-Key: 111111
Url: https://administrator.de/contentid/111111
Printed on: April 26, 2024 at 10:04 o'clock
2 Comments
Latest comment
Hallo du kannst dir nen VBS Script schreiben welches du z.B. beim Computer start per GPO laufen lässt.
Hier mal ein Code Schnipsel
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
dueIPAddress = Array("192.168.0.1")
dueSubnetMask = Array("255.255.255.0")
dueGateway = Array("192.168.0.11")
dueGatewayMetric = Array(1)
dueDNSServerSearchOrder = Array("192.168.0.12")
For Each objNetAdapter in colNetAdapters
errEnable = objNetAdapter.EnableStatic(dueIPAddress, dueSubnetMask)
errGateways = objNetAdapter.SetGateways(dueGateway, dueGatewaymetric)
errDNSServer = objNetAdapter.setDNSServerSearchOrder(dueDNSServerSearchOrder)
Mfg
Keksprinz
Hier mal ein Code Schnipsel
strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
dueIPAddress = Array("192.168.0.1")
dueSubnetMask = Array("255.255.255.0")
dueGateway = Array("192.168.0.11")
dueGatewayMetric = Array(1)
dueDNSServerSearchOrder = Array("192.168.0.12")
For Each objNetAdapter in colNetAdapters
errEnable = objNetAdapter.EnableStatic(dueIPAddress, dueSubnetMask)
errGateways = objNetAdapter.SetGateways(dueGateway, dueGatewaymetric)
errDNSServer = objNetAdapter.setDNSServerSearchOrder(dueDNSServerSearchOrder)
Mfg
Keksprinz