AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Zooflow: Add Active Directory User Import

Browse Source
This commit is contained in:
Jonathan Jenne
2022-03-07 15:51:27 +01:00
parent 4dec4be471
commit 6ffc699fb1
30 changed files with 1514 additions and 348 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
Modules.Interfaces/ActiveDirectoryInterface.vb
View File

@@ -123,6 +123,9 @@ Public Class ActiveDirectoryInterface
Return ListGroups(_rootNode, Query)
End Function
Public Async Function ListGroupsAsync(Optional Query As String = DEFAULT_GROUP_FILTER) As Task(Of List(Of ADGroup))
Return Await Task.Run(Function() ListGroups(Query))
End Function
Public Function ListGroups(RootNode As DirectoryEntry, Optional Query As String = DEFAULT_GROUP_FILTER) As List(Of ADGroup)
Dim oGroups As New List(Of ADGroup)
@@ -148,6 +151,10 @@ Public Class ActiveDirectoryInterface
Return ListUsers(GroupName, New List(Of AttributeMapping), Filter)
End Function
Public Async Function ListUsersAsync(GroupName As String, Optional Filter As String = DEFAULT_USER_FILTER) As Task(Of List(Of ADUser))
Return Await Task.Run(Function() ListUsers(GroupName, Filter))
End Function
Public Function ListUsers(GroupName As String, AttributeMappings As List(Of AttributeMapping), Optional Filter As String = DEFAULT_USER_FILTER) As List(Of ADUser)
Dim oUsers As New List(Of ADUser)