В настоящее время я пытаюсь добавить групповые разрешения на веб-сайт и имею раскрывающийся список для добавления группы к указанному разрешению. В настоящее время я могу найти все группы, в которых я нахожусь, но не могу найти способ отобразить все группы в домене, даже если я не в группе. Ниже мой текущий рабочий код. Спасибо за любую помощь!
Private Sub PopulateDropDownLists()
Dim context As WebCMEntities.WebCMModelContainer
Dim strGroupName As String
context = New WebCMEntities.WebCMModelContainer
ddlAddAuthorizedWebsites.DataSource = context.WebCMWebsites.OrderBy(Function(x) x.WebsiteName).ToList
ddlAddAuthorizedWebsites.DataTextField = "WebsiteName"
ddlAddAuthorizedWebsites.DataValueField = "WebsiteID"
ddlAddAuthorizedWebsites.DataBind()
For Each tmpGroup In System.Security.Principal.WindowsIdentity.GetCurrent().Groups
strGroupName = FormatGroupName(tmpGroup.Translate(GetType(System.Security.Principal.NTAccount)).ToString)
ddlAddGroups.Items.Add(New ListItem(strGroupName))
Next
End Sub