AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

update active directory interface to sync to mssql and to sync custom attributes

Browse Source
This commit is contained in:
Jonathan Jenne
2019-04-17 16:29:44 +02:00
parent 32b000c947
commit 0374016cde
10 changed files with 437 additions and 133 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Jobs/EDMI/ADSync/ADSyncJob.vb
View File

@@ -8,12 +8,12 @@ Public Class ADSyncJob
Inherits JobBase
Implements IJob(Of ADSyncArgs)
Public Sub New(LogConfig As LogConfig, Firebird As Firebird)
MyBase.New(LogConfig, Firebird)
Public Sub New(LogConfig As LogConfig, Firebird As Firebird, MSSQL As MSSQLServer)
MyBase.New(LogConfig, Firebird, MSSQL)
End Sub
Public Sub Start(Arguments As ADSyncArgs) Implements IJob(Of ADSyncArgs).Start
Dim oSync = New ActiveDirectoryInterface(_LogConfig, _Firebird, Arguments.RootPath)
Dim oSync = New ActiveDirectoryInterface(_LogConfig, _Firebird, _MSSQL, Arguments.RootPath)
Dim oJobName As String = [GetType]().Name
_Logger.Info("Running job {0}", oJobName)

4
Jobs/JobBase.vb
View File

@@ -5,10 +5,12 @@ Public Class JobBase
Protected _LogConfig As LogConfig
Protected _Logger As Logger
Protected _Firebird As Firebird
Protected _MSSQL As MSSQLServer
Public Sub New(LogConfig As LogConfig, Firebird As Firebird)
Public Sub New(LogConfig As LogConfig, Firebird As Firebird, MSSQL As MSSQLServer)
_LogConfig = LogConfig
_Logger = LogConfig.GetLogger()
_Firebird = Firebird
_MSSQL = MSSQL
End Sub
End Class