Есть простенький cmd-файл. Если две доменные группы.
Как доработать файл, что бы для разных группы,
копировались разные файлы?
echo off
rem
rem 1C список общих баз
rem Прописываем всем пользователям путь до файла
rem 81
copy /y "C:\1C_list_bases\81\AllBase81.v8l" "%AppData%\1C\1Cv81\ibases.v8l"
rem 82
copy /y "C:\1C_list_bases\82\1CEStart.cfg" "%AppData%\1C\1CEStart\1CEStart.cfg"
CMD/BAT - Разные списки баз, для разных пользователей
-
Галахад
Re: CMD/BAT - Разные списки баз, для разных пользователей
Нашел на просторах Интернета и попытался приспособить вот такой код:
(Проверяю на себе. Вхожу в группу "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")
(Проверяю на себе. Вхожу в группу "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
Re: CMD/BAT - Разные списки баз, для разных пользователей
Если у вас две доменные группы, то делается две политики и фильтруются на предмет "выполнять/не выполнять" по безопасности. Так правильней.