add surname and guid to users, filter users and groups

This commit is contained in:
Jonathan Jenne
2019-11-08 14:52:15 +01:00
parent faa86ed0be
commit 68dfc365ee
5 changed files with 75 additions and 19 deletions

View File

@@ -19,14 +19,14 @@ Public Class Form1
_firebird = New Firebird(_logConfig, "172.24.12.41", "172.24.12.41:E:\DB\Firebird\Databases\DD_ICM.fdb", "sysdba", "dd")
_sql = New MSSQLServer(_logConfig, "Server=172.24.12.41\tests;Database=DD_ECM_TEST;User Id=sa; Password=dd")
_sync = New ActiveDirectoryInterface(_logConfig, Nothing, _sql)
_sync = New ActiveDirectoryInterface(_logConfig)
_sync.Authenticate()
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim oGroup As String = ListBox1.SelectedItem
Dim oAttributeMappings = GetAttributeMappings()
_sync.SyncUsersForGroup(oGroup, oAttributeMappings)
_sync.SyncUsersForGroup(oGroup, oAttributeMappings, _firebird, _sql)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click