Чтобы переименовать компьютер с помощью VBScript, вы можете использовать следующий скрипт:
Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
Set colComputers = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")
For Each objComputer in colComputers
objComputer.Rename "NewComputerName"
Next
Замените «NewComputerName» на желаемое имя, которое вы хотите назначить своему компьютеру. Сохраните сценарий с расширением.vbs (например, RenamePC.vbs), а затем дважды щелкните его для выполнения.
Вот несколько дополнительных способов переименовать компьютер в Windows:
-
Использование свойств системы:
- Нажмите правой кнопкой мыши «Этот компьютер» (или «Мой компьютер») и выберите «Свойства».
- В окне «Система» нажмите ссылку «Изменить настройки».
- В окне «Свойства системы» перейдите на вкладку «Имя компьютера» и нажмите кнопку «Изменить».
- Введите новое имя компьютера и нажмите «ОК», чтобы сохранить изменения.
-
Использование PowerShell:
- Откройте PowerShell с правами администратора.
- Выполните следующую команду:
Rename-Computer -NewName «NewComputerName»
Замените «NewComputerName» нужным именем.
-
Использование командной строки:
- Откройте командную строку с правами администратора.
- Выполните следующую команду:
wmic компьютерная система, где name="%computername%" call rename name="NewComputerName"
Замените “NewComputerName” нужным именем.