[Галахад]

Нашел на просторах Интернета и попытался приспособить вот такой код:
(Проверяю на себе. Вхожу в группу "Administrators", домен "linom")

Set WshNetwork = WScript.CreateObject("WScript.Network")
Set oSysInfo = WScript.CreateObject("ADSystemInfo")
sUserDN = oSysInfo.UserName
MsgBox sUserDN
Set oUser = GetObject("LDAP://" & sUserDN)
Set oGroup = GetObject ("LDAP://CN=Administrators,DC=linom,DC=ru")
If oGroup.IsMember("LDAP://" & sUserDN) then
MsgBox "Входит в группу"
Else
MsgBox "Не входит в группу"
End If

Возвращает такую ошибку:

Строка: 6
Символ: 1
Ошибка: Сервер возвратил ссылку
Код: 8007202B
Источник: (null)

Подскажите что нужно исправить в строке:
Set oGroup = GetObject ("LDAP://CN=Administrators,DC=linom,DC=ru")

[van1985]

Если у вас две доменные группы, то делается две политики и фильтруются на предмет "выполнять/не выполнять" по безопасности. Так правильней.