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

DDZUGFeRDSErvice: Version 1.1.0.0

Browse Source
This commit is contained in:
Jonathan Jenne
2020-03-10 11:44:21 +01:00
parent 204151b78c
commit 0c8a4fb8e3
6 changed files with 21 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
DDZUGFeRDService/ThreadRunner.vb
View File

@@ -27,7 +27,7 @@ Public Class ThreadRunner
Private Const TIMER_INTERVAL_MS = 10_000
Public Sub New(LogConfig As LogConfig, Firebird As Firebird, Optional MSSQL As MSSQLServer = Nothing)
Public Sub New(LogConfig As LogConfig, GDPictureKey As String, Firebird As Firebird, Optional MSSQL As MSSQLServer = Nothing)
_logConfig = LogConfig
_logger = _logConfig.GetLogger()
_firebird = Firebird
@@ -37,6 +37,7 @@ Public Class ThreadRunner
Dim args As New WorkerArgs()
args = LoadFolderConfig(args)
args = LoadPropertyMapFor(args, "DEFAULT")
args.GDPictureKey = GDPictureKey
' Use MSSQL Server if available
If Not IsNothing(_mssql) Then