vbscript оператор условия, основанный на группе членства в Active Directory - PullRequest
0 голосов
/ 14 октября 2011

Я использую vbscript для автоматического запуска окон Internet Explorer через папку клиента в нашей среде. мы только что представили новую систему, которая управляет нашими входами в систему, и автозапуск основан на компьютерной политике в этой системе. он может работать только при определенной политике компьютера. Поэтому моя идея заключалась в том, чтобы добавить условное утверждение, которое гласит. Если один пользователь регистрирует запрос в объявлении, если он не входит в эту группу, запускает это окно, в противном случае запускают окна, которые мы уже запускали. У меня есть код для создания и запуска веб-сайтов через vbscipt, я ищу сценарий для запроса рекламы и на основе запуска корабля участника группы, чтобы другие окна запускали обычные. система называется imprivata.

1 Ответ

0 голосов
/ 17 октября 2011

Этот скрипт может делать то, что вы хотите:

strGroup = "GroupName"
Set objNetwork = CreateObject("WScript.Network")
strDomain = objNetwork.UserDomain
strUser = objNetwork.UserName
Set objUser = GetObject("WinNT://" & strDomain & "/" & 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 на группу, которую вы ищете.

Тем не менее, комментарий Морбо важен, так как, если вы заботитесь о косвенном членстве, вам придется пройти через все найденные группы, чтобы узнать, являются ли какие-либо из них, или группы, членами которых они являются, и т.д., членами группы, о которой вы заботитесь.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...