Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Microsoft Windows 2000/XP (http://forum.oszone.net/forumdisplay.php?f=6)
-   -   Как поменять IP на 1500 компах безболезненно для админа ;) (http://forum.oszone.net/showthread.php?t=9667)

Kitaro 23-05-2003 12:14 50348

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

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

Sera 23-05-2003 14:56 50349

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

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

Kitaro 26-05-2003 09:17 50350

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

SerSh 26-05-2003 12:58 50351

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

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 26-05-2003 15:15 50352

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

Kitaro 27-05-2003 18:01 50353

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

SerSh 28-05-2003 11:38 50354

SetDNSServerSearchOrder, SetWINSServer.
Подробности исчи у мелкомягких http://msdn.microsoft.com/library/de...figuration.asp

Kitaro 29-05-2003 13:11 50355

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


Время: 03:42.

Время: 03:42.
© OSzone.net 2001-