EMailProfiler.Common: Die Config-Klasse MUSS Config heißen
This commit is contained in:
@@ -1,34 +0,0 @@
|
||||
Imports DigitalData.Modules.Config.ConfigAttributes
|
||||
|
||||
Public Class Config
|
||||
<ConnectionString>
|
||||
Public Property ConnectionString As String = ""
|
||||
|
||||
Public Property Debug As Boolean = False
|
||||
Public Property EmailAccountId As Integer = 0
|
||||
Public Property EmailTitlePrefix As String = "EmailProfiler"
|
||||
Public Property EmailSenderLimitation As String = ""
|
||||
Public Property UseWindream As Boolean = False
|
||||
|
||||
''' <summary>
|
||||
''' GUID des EMail Templates das bei Ablehnungsmails verwendet wird.
|
||||
''' Siehe Tabelle DD_ECM.dbo.TBDD_EMAIL_TEMPLATE
|
||||
''' </summary>
|
||||
Public Property RejectionTemplateId As Integer = 0
|
||||
|
||||
''' <summary>
|
||||
''' GUID des EMail Templates das bei Info-Mails verwendet wird.
|
||||
''' Siehe Tabelle DD_ECM.dbo.TBDD_EMAIL_TEMPLATE
|
||||
''' </summary>
|
||||
Public Property InfoTemplateId As Integer = 0
|
||||
|
||||
Public Property EmailTestReceiver As String = ""
|
||||
Public Property EmailTestHTML As String = ""
|
||||
|
||||
''' <summary>
|
||||
''' Enthält die Version des GDPicture Modules,
|
||||
''' für das der Lizenzschlüssel aus TBDD_3RD_PARTY_MODULES
|
||||
''' gelesen werden soll.
|
||||
''' </summary>
|
||||
Public Property GDPictureVersion As String = ""
|
||||
End Class
|
||||
@@ -96,7 +96,6 @@
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="Config.vb" />
|
||||
<Compile Include="My Project\Application.Designer.vb">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Application.myapp</DependentUpon>
|
||||
|
||||
@@ -17,8 +17,8 @@ Public Class MyService
|
||||
|
||||
Private _DBConfig As ClassDBConfig.Config
|
||||
|
||||
Private ConfigManager As ConfigManager(Of ConfigData)
|
||||
Private _ConfigData As ConfigData
|
||||
Private ConfigManager As ConfigManager(Of Config)
|
||||
Private _ConfigData As Config
|
||||
|
||||
Private Database As MSSQLServer
|
||||
#End Region
|
||||
@@ -31,7 +31,7 @@ Public Class MyService
|
||||
|
||||
Logger.Info("Service started.")
|
||||
|
||||
ConfigManager = New ConfigManager(Of ConfigData)(LogConfig, My.Application.Info.DirectoryPath)
|
||||
ConfigManager = New ConfigManager(Of Config)(LogConfig, My.Application.Info.DirectoryPath)
|
||||
_ConfigData = ConfigManager.Config
|
||||
|
||||
If _ConfigData.ConnectionString = String.Empty Then
|
||||
|
||||
Reference in New Issue
Block a user