#vbscript
#vbscript
Вопрос:
Я использую vbscript для автоматического запуска Internet Explorer Windows через клиентскую папку в нашей среде. мы только что представили новую систему, которая управляет нашими входами в систему, и автозапуск основан на компьютерной политике в этой системе. он может выполняться только в соответствии с определенной компьютерной политикой. Итак, моя идея состояла в том, чтобы добавить условный оператор, который сказал. Если один пользователь регистрирует запрос, и если он не входит в эту группу, запустите это окно, иначе запустите окна, которые мы уже запускали. У меня есть код для создания и запуска веб-сайтов через vbscipt, то, что я ищу, — это скрипт для запроса ad и на основе запуска отправки членами группы, который Windows запускает обычные. система называется imprivata.
Комментарии:
1. система называется imprivata, если это помогает
2. Будут ли пользователи всегда быть прямым членом группы или возможно косвенно (т. Е. Членом какой-либо дочерней группы, которая сама является членом группы, с которой вы имеете дело)
Ответ №1:
Этот скрипт может делать то, что вы хотите:
strGroup = "GroupName"
Set objNetwork = CreateObject("WScript.Network")
strDomain = objNetwork.UserDomain
strUser = objNetwork.UserName
Set objUser = GetObject("WinNT://" amp; strDomain amp; "/" amp; strUser)
Dim found
found = false
For Each objGroup In objUser.Groups
If StrComp(objGroup.Name, strGroup, 1) = 0 Then
found = true
Exit For
End If
Next
' use the found variable to decide what to do
Просто измените "GroupName на группу, которую вы ищете.
Тем не менее, комментарий Морбо важен, поскольку, если вы заботитесь о косвенных членствах, вам придется повторно просмотреть все найденные группы, чтобы узнать, является ли какая-либо из них или группы, в которые они входят, и т. Д., Членом группы, о которой вы заботитесь.