Как поменять IP на 1500 компах безболезненно для админа ;)

[Kitaro]

Привет Алл !!!
есть роблема .....
поменялась централизовано вся ip адресация по учереждению (1500 компов)....
удаленное изменение не возможно (слов нет, одни выражения)
необходимо нечто (прога, ключи реестра, идеи) бегая от компа к компу одним нажатием менять dns, wins, gate, маску и первые два байта ip адреса .... помогите, люди добрые, кто чем может ;))))

Исправлено: Kitaro, 13:16 23-05-2003

[Sera]

Статические IP на 1500 компов :wow:
ИМХО DHCP поднимать надо
PS Вот к чему приводит неправильное планирование

Исправлено: Sera, 15:58 23-05-2003

[Kitaro]

дык, был бы я админом, может так бы и сделал ....
а так ....
так, что, савсем никаких идей ?????
эх, так не хотелось умирать молодым ...
:weep: :help:

[SerSh]

Может тебе какой-мабудь скрипт накропать, например:

Configuring a Static IP Address

Description
Sets the IP address of a computer to 192.168.1.141, and sets the IP gateway to 192.168.1.100.

Script Code

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
   ("Select * from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
strIPAddress = Array("192.168.1.141")
strSubnetMask = Array("255.255.255.0")
strGateway = Array("192.168.1.100")
strGatewayMetric = Array(1)
For Each objNetAdapter in colNetAdapters
   errEnable = objNetAdapter.EnableStatic(strIPAddress, strSubnetMask)
   errGateways = objNetAdapter.SetGateways(strGateway, strGatewaymetric)
   If errEnable = 0 Then
       WScript.Echo "The IP address has been changed."
   Else
       WScript.Echo "The IP address could not be changed."
   End If
Next

(с) The System Administration Scripting Guide, part of the Windows .NET Server Resource Kit. For more information, contact scripter@microsoft.com.

[Kitaro]

СПСИБО огромное !!!!
а то тут с нетом напряг ...
просто так искать неполучалось ;)
:idea:

[Kitaro]

ну, наглеть, так по черному ;)))
а WINS & DNS как поменять таким же образом ???? :gigi:

[SerSh]

SetDNSServerSearchOrder, SetWINSServer.
Подробности исчи у мелкомягких http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_networkadapterconfiguration.asp

[Kitaro]

спасибо !!! ;)