FAQ по Microsoft Windows Server 2003


Как организовать переименование рабочих станций в домене удаленно - часть 3


Примечание: Эта команда представлена в несколько строк для лучшего восприятия. Вводить команду необходимо в одну строку.

netdom renamecomputer mycomputer /newname:yourcomputer

/userD:mydomain\administrator /passwordd:*

/usero:administrator /passwordo:* /reboot:60

Будет показано следующее предупреждение и будет показан запрос на подтверждение продолжения процедуры переименования компьютера:

This operation will rename the computer "Mycomputer" to "Yourcomputer". Certain services, such as certification authority, rely on a fixed computer name. If any services of this type are running on "Mycomputer", a computer name change would have an adverse impact.

Если вы не хотите подтверждать выполнение команды, то вместе с остальными параметрами используйте /force при вводе команды netdom

Способ 2

Использование утилиты Workstation Name Changer (WSName.exe)

Переименование удаленных компьютеров:

Посмотрите пример VB скрипта для изменения имени удаленного компьютера (используется WMI только для Windows 2000 и старше) или, если вам удобнее будет использовать Batch файлы, посмотрите этот вариант который использует PSEXEC от SysInternals.

За дополнительной информацией по использованию утилиты WSName.exe и поддерживаемых ею параметрах вы можете обратиться к этому ресурсу

Способ 3

В качестве альтернативного варианта возможно использование VB скриптов для переименования рабочих станций в составе домена.

Вот два примера скриптов (*.vbs):

Вариант 1:

' ------ SCRIPT CONFIGURATION ------ strComputer = "" e.g. joe-xp strNewComputer = "" e.g. joe-pc strDomainUser = "" e.g. administrator@domain strDomainPasswd = "" strLocalUser = "" e.g. joe-xp\administrator strLocalPasswd = "" ' ------ END CONFIGURATION ---------

'########################### ' Connect to Computer '########################### set objWMILocator = CreateObject("WbemScripting.SWbemLocator") objWMILocator.Security_.AuthenticationLevel = 6 set objWMIComputer = objWMILocator.ConnectServer(strComputer, _ "root\cimv2", _ strLocalUser, _ strLocalPasswd) set objWMIComputerSystem = objWMIComputer.Get( _ "Win32_ComputerSystem.Name='" & _ strComputer & "'") '########################### ' Rename Computer '########################### rc = objWMIComputerSystem.Rename(strNewComputer, _ strDomainPasswd, _ strDomainUser) if rc <> 0 then WScript.Echo "Rename failed with error: " & rc else WScript.Echo "Successfully renamed " & strComputer & " to " & _ strNewComputer end if




- Начало -  - Назад -  - Вперед -