16
Windows / [РЕШЕНО] На пользователе не отрабатывают логон скрипты
« : 05 марта 2017, 22:59:00 »
Политиками маппируются сетевые ресурсы - на основании принадлежности в группе.
Скрипты работают у всех за исключением одного пользователя (секретарь ВИПов).
Берем проблемную учетку - логинимся с любой другой машины в домене - получаем точно такую же ошибку.
Ошибка выдается на таком шаге скрипта:
Пересоздавать учетку крайне не хочется - из-за проблем с кэшем exchange
Что еще может быть?
Скрипты работают у всех за исключением одного пользователя (секретарь ВИПов).
Берем проблемную учетку - логинимся с любой другой машины в домене - получаем точно такую же ошибку.
Ошибка выдается на таком шаге скрипта:
Код: [Выделить]
'FinDept
'
'Поиск пользователя по DistingishedName и поиск по группам в которых он состоит
'Получаем fqdn домена
Set oRoot = GetObject("LDAP://rootDSE")
Set oDomain = GetObject("LDAP://" & oRoot.Get("defaultNamingContext"))
fqDomain = oRoot.Get("defaultNamingContext")
'Получаем netbios username, computername и domainname
Set objNetwork = CreateObject("Wscript.Network")
currentDomain = objNetwork.UserDomain
currentUser = objNetwork.UserName
strComputerName = objNetwork.ComputerName
uCN = findDN
GRP = "T-RO" 'Переменная искомой группы'
Set objUser = GetObject("LDAP://" & uCN) 'Делаем поиск по ЛДАП' - выдает ошибку в этой строке
If IsMember(GRP) Then
CheckAndMountDrive()
End If
ClearAll()
Wscript.Quit
Что еще может быть?