Есть проблема: не все пользователи знают имя своего ПК.
Мы эту проблему решили, наклеив на все ПК стикеры с именем (помимо инвентарного номера). Но всё равно, остаётся часть пользователей, которые и на наклейке не могут найти имя ПК.
Решение2:
меняем имя значка "Мой компьютер" или просто "Компьютер".
Скрипт на vbs простенький:
Const MY_COMPUTER = &H11&
Set objNetwork = CreateObject("Wscript.Network")
strComputer = objNetwork.ComputerName
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.Namespace(MY_COMPUTER)
Set objFolderItem = objFolder.Self
objFolderItem.Name = "Компьютер: " & strComputer
Для тех, кто забыл:
открываем блокнот, вставляем вышеуказанное содержимое и сохраняем с расширением .vbs, устанавливаем скрипт в качестве стартового в групповой политике (либо выполняем вручную).
Результат выполнения скрипта такой:
Write a comment
Дмитрий (Wednesday, 05 December 2018 19:50)
Класс