Blog of Khlebalin Dmitriy

(Дорогу осилит идущий…)

Узнаем название PC по учетной записи залогинившегося пользователя (GPO).


Сеть сетью, но инфраструктуру тоже необходимо не забывать постепенно «пилить». Бывает, звонит пользователь, чего-то хочет, необходимо уточнить, название его компа, чтоб посмотреть, куда подключиться и как ему помочь. Для этого надо попросить пользователя посмотреть название компа в свойствах, а он это делать не умеет или не хочет… В общем, все сложно.

Но Андрей посоветовал использовать небольшой скрипт, который позволяет в Computers, посмотреть имя компа на который залогинился пользователь автоматом-это экономит и время и нервы при общении с пользователями, за что ему большое спасибо.

Для этого «запилим» отдельную политику.

Линкуем ее к нужным OU.

Добавляем Logon Script.

‘Для работы скрипта необходимо делегировать разрешения пользователям на изменение поля

‘объекта компьютеров (Computer Objects > Write Description), в которое пишем имя  залогиненного пользователя.

‘Скрипт помещается в Logon скрипты в групповую политику для OU, в котором находятся учетные записи пользователей.

‘Для изменения параметра реестра необходимо запускать скрипт с правами администратора

 

On Error Resume Next

Dim adsinfo, ThisComp, oUser, Sh

Set adsinfo = CreateObject(«adsysteminfo»)

Set ThisComp = GetObject(«LDAP://» & adsinfo.ComputerName)

Set oUser = GetObject(«LDAP://» & adsinfo.UserName)

Thiscomp.put «description», oUser.SN & » » & oUser.GivenName

ThisComp.Setinfo

 

В прилинкованных OU видим залогигившихся пользователей на компьютеры:

Реально очень удобно.

Всем хорошей работы!!!

26.11.2019 - Posted by | scripts&GPO

Sorry, the comment form is closed at this time.

%d такие блоггеры, как: