diff --git a/SQLConfig/App.config b/SQLConfig/App.config
deleted file mode 100644
index cd714553..00000000
--- a/SQLConfig/App.config
+++ /dev/null
@@ -1,14 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
\ No newline at end of file
diff --git a/SQLConfig/My Project/Application.Designer.vb b/SQLConfig/My Project/Application.Designer.vb
deleted file mode 100644
index 8ab460ba..00000000
--- a/SQLConfig/My Project/Application.Designer.vb
+++ /dev/null
@@ -1,13 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
diff --git a/SQLConfig/My Project/Application.myapp b/SQLConfig/My Project/Application.myapp
deleted file mode 100644
index 745fec77..00000000
--- a/SQLConfig/My Project/Application.myapp
+++ /dev/null
@@ -1,10 +0,0 @@
-
-
- true
- frmSQLConfig
- false
- 0
- true
- 0
- true
-
\ No newline at end of file
diff --git a/SQLConfig/My Project/AssemblyInfo.vb b/SQLConfig/My Project/AssemblyInfo.vb
deleted file mode 100644
index c17090a0..00000000
--- a/SQLConfig/My Project/AssemblyInfo.vb
+++ /dev/null
@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' Allgemeine Informationen über eine Assembly werden über die folgenden
-' Attribute gesteuert. Ändern Sie diese Attributwerte, um die Informationen zu ändern,
-' die einer Assembly zugeordnet sind.
-
-' Werte der Assemblyattribute überprüfen
-
-
-
-
-
-
-
-
-
-
-'Die folgende GUID wird für die typelib-ID verwendet, wenn dieses Projekt für COM verfügbar gemacht wird.
-
-
-' Versionsinformationen für eine Assembly bestehen aus den folgenden vier Werten:
-'
-' Hauptversion
-' Nebenversion
-' Buildnummer
-' Revision
-'
-' Sie können alle Werte angeben oder Standardwerte für die Build- und Revisionsnummern verwenden,
-' indem Sie "*" wie unten gezeigt eingeben:
-'
-
-
-
diff --git a/SQLConfig/My Project/Resources.Designer.vb b/SQLConfig/My Project/Resources.Designer.vb
deleted file mode 100644
index f4cda3f5..00000000
--- a/SQLConfig/My Project/Resources.Designer.vb
+++ /dev/null
@@ -1,63 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-
- 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
- '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
- 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
- 'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
- '''
- ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
- '''
- _
- Friend Module Resources
-
- Private resourceMan As Global.System.Resources.ResourceManager
-
- Private resourceCulture As Global.System.Globalization.CultureInfo
-
- '''
- ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
- '''
- _
- Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
- Get
- If Object.ReferenceEquals(resourceMan, Nothing) Then
- Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DigitalData.Controls.SQLConfig.Resources", GetType(Resources).Assembly)
- resourceMan = temp
- End If
- Return resourceMan
- End Get
- End Property
-
- '''
- ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
- ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
- '''
- _
- Friend Property Culture() As Global.System.Globalization.CultureInfo
- Get
- Return resourceCulture
- End Get
- Set
- resourceCulture = value
- End Set
- End Property
- End Module
-End Namespace
diff --git a/SQLConfig/My Project/Resources.resx b/SQLConfig/My Project/Resources.resx
deleted file mode 100644
index af7dbebb..00000000
--- a/SQLConfig/My Project/Resources.resx
+++ /dev/null
@@ -1,117 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/SQLConfig/My Project/Settings.Designer.vb b/SQLConfig/My Project/Settings.Designer.vb
deleted file mode 100644
index 8f2429b8..00000000
--- a/SQLConfig/My Project/Settings.Designer.vb
+++ /dev/null
@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-'
-' Dieser Code wurde von einem Tool generiert.
-' Laufzeitversion:4.0.30319.42000
-'
-' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
-' der Code erneut generiert wird.
-'
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-
- _
- Partial Friend NotInheritable Class MySettings
- Inherits Global.System.Configuration.ApplicationSettingsBase
-
- Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-
-#Region "Automatische My.Settings-Speicherfunktion"
-#If _MyType = "WindowsForms" Then
- Private Shared addedHandler As Boolean
-
- Private Shared addedHandlerLockObject As New Object
-
- _
- Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
- If My.Application.SaveMySettingsOnExit Then
- My.Settings.Save()
- End If
- End Sub
-#End If
-#End Region
-
- Public Shared ReadOnly Property [Default]() As MySettings
- Get
-
-#If _MyType = "WindowsForms" Then
- If Not addedHandler Then
- SyncLock addedHandlerLockObject
- If Not addedHandler Then
- AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
- addedHandler = True
- End If
- End SyncLock
- End If
-#End If
- Return defaultInstance
- End Get
- End Property
- End Class
-End Namespace
-
-Namespace My
-
- _
- Friend Module MySettingsProperty
-
- _
- Friend ReadOnly Property Settings() As Global.DigitalData.Controls.SQLConfig.My.MySettings
- Get
- Return Global.DigitalData.Controls.SQLConfig.My.MySettings.Default
- End Get
- End Property
- End Module
-End Namespace
diff --git a/SQLConfig/My Project/Settings.settings b/SQLConfig/My Project/Settings.settings
deleted file mode 100644
index 85b890b3..00000000
--- a/SQLConfig/My Project/Settings.settings
+++ /dev/null
@@ -1,7 +0,0 @@
-
-
-
-
-
-
-
diff --git a/SQLConfig/My Project/licenses.licx b/SQLConfig/My Project/licenses.licx
deleted file mode 100644
index ab3ecc3a..00000000
--- a/SQLConfig/My Project/licenses.licx
+++ /dev/null
@@ -1,4 +0,0 @@
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/SQLConfig/My Project/licenses.licx.bak b/SQLConfig/My Project/licenses.licx.bak
deleted file mode 100644
index 4f6348a0..00000000
--- a/SQLConfig/My Project/licenses.licx.bak
+++ /dev/null
@@ -1,4 +0,0 @@
-DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
-DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
diff --git a/SQLConfig/SQLConfig.vbproj b/SQLConfig/SQLConfig.vbproj
deleted file mode 100644
index 14c59d2f..00000000
--- a/SQLConfig/SQLConfig.vbproj
+++ /dev/null
@@ -1,160 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {65EFB268-C0E0-40C1-8981-9F70DEE5C74A}
- Library
-
-
- DigitalData.Controls.SQLConfig
- DigitalData.Controls.SQLConfig
- 512
- Windows
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.SQLConfig.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.SQLConfig.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
-
- False
-
-
- False
-
-
- False
- ..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll
-
-
- False
- ..\..\DDModules\Encryption\bin\Debug\DigitalData.Modules.Encryption.dll
-
-
- False
- ..\..\DDModules\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll
-
-
- False
- ..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmSQLConfig.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- frmSQLConfig.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
\ No newline at end of file
diff --git a/SQLConfig/SQLConfig.vbproj.bak b/SQLConfig/SQLConfig.vbproj.bak
deleted file mode 100644
index d7e6924c..00000000
--- a/SQLConfig/SQLConfig.vbproj.bak
+++ /dev/null
@@ -1,163 +0,0 @@
-
-
-
-
- Debug
- AnyCPU
- {65EFB268-C0E0-40C1-8981-9F70DEE5C74A}
- Library
-
-
- DigitalData.Controls.SQLConfig
- DigitalData.Controls.SQLConfig
- 512
- Windows
- v4.6.1
- true
- true
-
-
- AnyCPU
- true
- full
- true
- true
- bin\Debug\
- DigitalData.Controls.SQLConfig.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- AnyCPU
- pdbonly
- false
- true
- true
- bin\Release\
- DigitalData.Controls.SQLConfig.xml
- 42016,41999,42017,42018,42019,42032,42036,42020,42021,42022
-
-
- On
-
-
- Binary
-
-
- Off
-
-
- On
-
-
-
-
-
- False
- D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraEditors.v19.2.dll
-
-
- False
- D:\ProgramFiles\DevExpress 19.2\Components\Bin\Framework\DevExpress.XtraLayout.v19.2.dll
-
-
-
- ..\packages\NLog.4.7.10\lib\net45\NLog.dll
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- frmSQLConfig.vb
-
-
- Form
-
-
-
- True
- Application.myapp
- True
-
-
- True
- True
- Resources.resx
-
-
- True
- Settings.settings
- True
-
-
-
-
- frmSQLConfig.vb
-
-
-
- VbMyResourcesResXFileCodeGenerator
- Resources.Designer.vb
- My.Resources
- Designer
-
-
-
-
- MyApplicationCodeGenerator
- Application.Designer.vb
-
-
- SettingsSingleFileGenerator
- My
- Settings.Designer.vb
-
-
-
-
-
-
- {8a8f20fc-c46e-41ac-bee7-218366cfff99}
- Encryption
-
-
- {eaf0ea75-5fa7-485d-89c7-b2d843b03a96}
- Database
-
-
- {991d0231-4623-496d-8bd0-9ca906029cbc}
- Filesystem
-
-
- {903b2d7d-3b80-4be9-8713-7447b704e1b0}
- Logging
-
-
-
-
\ No newline at end of file
diff --git a/SQLConfig/frmSQLConfig.Designer.vb b/SQLConfig/frmSQLConfig.Designer.vb
deleted file mode 100644
index 03402a96..00000000
--- a/SQLConfig/frmSQLConfig.Designer.vb
+++ /dev/null
@@ -1,271 +0,0 @@
- _
-Partial Class frmSQLConfig
- Inherits DevExpress.XtraEditors.XtraForm
-
- 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
- _
- Protected Overrides Sub Dispose(ByVal disposing As Boolean)
- Try
- If disposing AndAlso components IsNot Nothing Then
- components.Dispose()
- End If
- Finally
- MyBase.Dispose(disposing)
- End Try
- End Sub
-
- 'Wird vom Windows Form-Designer benötigt.
- Private components As System.ComponentModel.IContainer
-
- 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
- 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
- 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
- _
- Private Sub InitializeComponent()
- Me.LayoutControl1 = New DevExpress.XtraLayout.LayoutControl()
- Me.txtServerName = New DevExpress.XtraEditors.TextEdit()
- Me.txtUserName = New DevExpress.XtraEditors.TextEdit()
- Me.txtPassword = New DevExpress.XtraEditors.TextEdit()
- Me.cmbDatabase = New DevExpress.XtraEditors.ComboBoxEdit()
- Me.btnTestConnection = New DevExpress.XtraEditors.SimpleButton()
- Me.txtConnectionString = New DevExpress.XtraEditors.TextEdit()
- Me.chkWinAuth = New DevExpress.XtraEditors.CheckEdit()
- Me.LayoutControlGroup1 = New DevExpress.XtraLayout.LayoutControlGroup()
- Me.LayoutControlItem1 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem2 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem4 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem3 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem6 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.LayoutControlItem5 = New DevExpress.XtraLayout.LayoutControlItem()
- Me.EmptySpaceItem2 = New DevExpress.XtraLayout.EmptySpaceItem()
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.LayoutControl1.SuspendLayout()
- CType(Me.txtServerName.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtUserName.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.cmbDatabase.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.txtConnectionString.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.chkWinAuth.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).BeginInit()
- CType(Me.EmptySpaceItem2, System.ComponentModel.ISupportInitialize).BeginInit()
- Me.SuspendLayout()
- '
- 'LayoutControl1
- '
- Me.LayoutControl1.Controls.Add(Me.txtServerName)
- Me.LayoutControl1.Controls.Add(Me.txtUserName)
- Me.LayoutControl1.Controls.Add(Me.txtPassword)
- Me.LayoutControl1.Controls.Add(Me.cmbDatabase)
- Me.LayoutControl1.Controls.Add(Me.btnTestConnection)
- Me.LayoutControl1.Controls.Add(Me.txtConnectionString)
- Me.LayoutControl1.Controls.Add(Me.chkWinAuth)
- Me.LayoutControl1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.LayoutControl1.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControl1.Name = "LayoutControl1"
- Me.LayoutControl1.Root = Me.LayoutControlGroup1
- Me.LayoutControl1.Size = New System.Drawing.Size(602, 221)
- Me.LayoutControl1.TabIndex = 0
- Me.LayoutControl1.Text = "LayoutControl1"
- '
- 'txtServerName
- '
- Me.txtServerName.Location = New System.Drawing.Point(160, 15)
- Me.txtServerName.Name = "txtServerName"
- Me.txtServerName.Size = New System.Drawing.Size(427, 20)
- Me.txtServerName.StyleController = Me.LayoutControl1
- Me.txtServerName.TabIndex = 4
- '
- 'txtUserName
- '
- Me.txtUserName.Location = New System.Drawing.Point(160, 45)
- Me.txtUserName.Name = "txtUserName"
- Me.txtUserName.Size = New System.Drawing.Size(136, 20)
- Me.txtUserName.StyleController = Me.LayoutControl1
- Me.txtUserName.TabIndex = 5
- '
- 'txtPassword
- '
- Me.txtPassword.Location = New System.Drawing.Point(451, 45)
- Me.txtPassword.Name = "txtPassword"
- Me.txtPassword.Size = New System.Drawing.Size(136, 20)
- Me.txtPassword.StyleController = Me.LayoutControl1
- Me.txtPassword.TabIndex = 6
- '
- 'cmbDatabase
- '
- Me.cmbDatabase.Location = New System.Drawing.Point(160, 75)
- Me.cmbDatabase.Name = "cmbDatabase"
- Me.cmbDatabase.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
- Me.cmbDatabase.Size = New System.Drawing.Size(427, 20)
- Me.cmbDatabase.StyleController = Me.LayoutControl1
- Me.cmbDatabase.TabIndex = 7
- '
- 'btnTestConnection
- '
- Me.btnTestConnection.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
- Me.btnTestConnection.Location = New System.Drawing.Point(303, 164)
- Me.btnTestConnection.Name = "btnTestConnection"
- Me.btnTestConnection.Size = New System.Drawing.Size(287, 22)
- Me.btnTestConnection.StyleController = Me.LayoutControl1
- Me.btnTestConnection.TabIndex = 8
- Me.btnTestConnection.Text = "Verbindung zur Datenbank herstellen"
- '
- 'txtConnectionString
- '
- Me.txtConnectionString.Location = New System.Drawing.Point(160, 137)
- Me.txtConnectionString.Name = "txtConnectionString"
- Me.txtConnectionString.Properties.ReadOnly = True
- Me.txtConnectionString.Size = New System.Drawing.Size(427, 20)
- Me.txtConnectionString.StyleController = Me.LayoutControl1
- Me.txtConnectionString.TabIndex = 9
- '
- 'chkWinAuth
- '
- Me.chkWinAuth.Location = New System.Drawing.Point(17, 107)
- Me.chkWinAuth.Name = "chkWinAuth"
- Me.chkWinAuth.Properties.Caption = "Windows Authentifizierung"
- Me.chkWinAuth.Size = New System.Drawing.Size(568, 18)
- Me.chkWinAuth.StyleController = Me.LayoutControl1
- Me.chkWinAuth.TabIndex = 10
- '
- 'LayoutControlGroup1
- '
- Me.LayoutControlGroup1.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
- Me.LayoutControlGroup1.GroupBordersVisible = False
- Me.LayoutControlGroup1.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem1, Me.LayoutControlItem2, Me.LayoutControlItem4, Me.LayoutControlItem3, Me.LayoutControlItem7, Me.LayoutControlItem6, Me.LayoutControlItem5, Me.EmptySpaceItem2})
- Me.LayoutControlGroup1.Name = "LayoutControlGroup1"
- Me.LayoutControlGroup1.Size = New System.Drawing.Size(602, 221)
- Me.LayoutControlGroup1.TextVisible = False
- '
- 'LayoutControlItem1
- '
- Me.LayoutControlItem1.Control = Me.txtServerName
- Me.LayoutControlItem1.Location = New System.Drawing.Point(0, 0)
- Me.LayoutControlItem1.Name = "LayoutControlItem1"
- Me.LayoutControlItem1.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem1.Size = New System.Drawing.Size(582, 30)
- Me.LayoutControlItem1.Text = "Server Name:"
- Me.LayoutControlItem1.TextSize = New System.Drawing.Size(142, 13)
- '
- 'LayoutControlItem2
- '
- Me.LayoutControlItem2.Control = Me.txtUserName
- Me.LayoutControlItem2.Location = New System.Drawing.Point(0, 30)
- Me.LayoutControlItem2.Name = "LayoutControlItem2"
- Me.LayoutControlItem2.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem2.Size = New System.Drawing.Size(291, 30)
- Me.LayoutControlItem2.Text = "Benutzername:"
- Me.LayoutControlItem2.TextSize = New System.Drawing.Size(142, 13)
- '
- 'LayoutControlItem4
- '
- Me.LayoutControlItem4.Control = Me.cmbDatabase
- Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 60)
- Me.LayoutControlItem4.Name = "LayoutControlItem4"
- Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem4.Size = New System.Drawing.Size(582, 30)
- Me.LayoutControlItem4.Text = "Datenbank:"
- Me.LayoutControlItem4.TextSize = New System.Drawing.Size(142, 13)
- '
- 'LayoutControlItem3
- '
- Me.LayoutControlItem3.Control = Me.txtPassword
- Me.LayoutControlItem3.Location = New System.Drawing.Point(291, 30)
- Me.LayoutControlItem3.Name = "LayoutControlItem3"
- Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem3.Size = New System.Drawing.Size(291, 30)
- Me.LayoutControlItem3.Text = "Passwort:"
- Me.LayoutControlItem3.TextSize = New System.Drawing.Size(142, 13)
- '
- 'LayoutControlItem7
- '
- Me.LayoutControlItem7.Control = Me.chkWinAuth
- Me.LayoutControlItem7.Location = New System.Drawing.Point(0, 90)
- Me.LayoutControlItem7.Name = "LayoutControlItem7"
- Me.LayoutControlItem7.Size = New System.Drawing.Size(582, 32)
- Me.LayoutControlItem7.Spacing = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem7.TextVisible = False
- '
- 'LayoutControlItem6
- '
- Me.LayoutControlItem6.Control = Me.txtConnectionString
- Me.LayoutControlItem6.Location = New System.Drawing.Point(0, 122)
- Me.LayoutControlItem6.Name = "LayoutControlItem6"
- Me.LayoutControlItem6.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
- Me.LayoutControlItem6.Size = New System.Drawing.Size(582, 30)
- Me.LayoutControlItem6.Text = "Aktueller Connectionstring:"
- Me.LayoutControlItem6.TextSize = New System.Drawing.Size(142, 13)
- '
- 'LayoutControlItem5
- '
- Me.LayoutControlItem5.Control = Me.btnTestConnection
- Me.LayoutControlItem5.Location = New System.Drawing.Point(291, 152)
- Me.LayoutControlItem5.Name = "LayoutControlItem5"
- Me.LayoutControlItem5.Size = New System.Drawing.Size(291, 49)
- Me.LayoutControlItem5.TextSize = New System.Drawing.Size(0, 0)
- Me.LayoutControlItem5.TextVisible = False
- '
- 'EmptySpaceItem2
- '
- Me.EmptySpaceItem2.AllowHotTrack = False
- Me.EmptySpaceItem2.Location = New System.Drawing.Point(0, 152)
- Me.EmptySpaceItem2.Name = "EmptySpaceItem2"
- Me.EmptySpaceItem2.Size = New System.Drawing.Size(291, 49)
- Me.EmptySpaceItem2.TextSize = New System.Drawing.Size(0, 0)
- '
- 'frmSQLConfig
- '
- Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
- Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(602, 221)
- Me.Controls.Add(Me.LayoutControl1)
- Me.Name = "frmSQLConfig"
- Me.Text = "Datenbank Verbindung"
- CType(Me.LayoutControl1, System.ComponentModel.ISupportInitialize).EndInit()
- Me.LayoutControl1.ResumeLayout(False)
- CType(Me.txtServerName.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtUserName.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtPassword.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.cmbDatabase.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.txtConnectionString.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.chkWinAuth.Properties, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlGroup1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem1, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem2, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem4, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem3, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem6, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.LayoutControlItem5, System.ComponentModel.ISupportInitialize).EndInit()
- CType(Me.EmptySpaceItem2, System.ComponentModel.ISupportInitialize).EndInit()
- Me.ResumeLayout(False)
-
- End Sub
-
- Friend WithEvents LayoutControl1 As DevExpress.XtraLayout.LayoutControl
- Friend WithEvents LayoutControlGroup1 As DevExpress.XtraLayout.LayoutControlGroup
- Friend WithEvents txtServerName As DevExpress.XtraEditors.TextEdit
- Friend WithEvents txtUserName As DevExpress.XtraEditors.TextEdit
- Friend WithEvents txtPassword As DevExpress.XtraEditors.TextEdit
- Friend WithEvents cmbDatabase As DevExpress.XtraEditors.ComboBoxEdit
- Friend WithEvents btnTestConnection As DevExpress.XtraEditors.SimpleButton
- Friend WithEvents txtConnectionString As DevExpress.XtraEditors.TextEdit
- Friend WithEvents chkWinAuth As DevExpress.XtraEditors.CheckEdit
- Friend WithEvents LayoutControlItem1 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem2 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem4 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem3 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem6 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents LayoutControlItem5 As DevExpress.XtraLayout.LayoutControlItem
- Friend WithEvents EmptySpaceItem2 As DevExpress.XtraLayout.EmptySpaceItem
-End Class
diff --git a/SQLConfig/frmSQLConfig.resx b/SQLConfig/frmSQLConfig.resx
deleted file mode 100644
index 1af7de15..00000000
--- a/SQLConfig/frmSQLConfig.resx
+++ /dev/null
@@ -1,120 +0,0 @@
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- text/microsoft-resx
-
-
- 2.0
-
-
- System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
- System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
-
-
\ No newline at end of file
diff --git a/SQLConfig/frmSQLConfig.vb b/SQLConfig/frmSQLConfig.vb
deleted file mode 100644
index 74149683..00000000
--- a/SQLConfig/frmSQLConfig.vb
+++ /dev/null
@@ -1,154 +0,0 @@
-Imports System.ComponentModel
-Imports System.Data.SqlClient
-Imports DigitalData.Modules.Database
-Imports DigitalData.Modules.Encryption
-Imports DigitalData.Modules.Filesystem
-Imports DigitalData.Modules.Logging
-
-Public Class frmSQLConfig
- Private Const STRING_CONNECTION_SUCCESSFUL = "Die Verbindung wurde erfolgreich aufgebaut!" & vbNewLine & "Möchten Sie diese Verbindung nun in der Anwendung speichern?"
-
- Private ReadOnly Logger As Logger
- Private ReadOnly LogConfig As LogConfig
-
- Public Property ConnectionString As String = String.Empty
- Public Property FormTitle As String = ""
-
- Public Sub New()
- ' Dieser Aufruf ist für den Designer erforderlich.
- InitializeComponent()
-
- ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
- End Sub
-
- Public Sub New(LogConfig As LogConfig)
- ' Dieser Aufruf ist für den Designer erforderlich.
- InitializeComponent()
-
- ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
- Me.LogConfig = LogConfig
- Logger = LogConfig.GetLogger()
- End Sub
-
- Private Sub frmSQLConfig_Load(sender As Object, e As EventArgs) Handles MyBase.Load
- Dim oConnectionString = ConnectionString
-
- If FormTitle.Count > 0 Then
- Text = $"{FormTitle} - {Text}"
- End If
-
- If Not oConnectionString = String.Empty Then
- Dim oBuilder As SqlConnectionStringBuilder
- Try
- oBuilder = New SqlConnectionStringBuilder(ConnectionString)
- Catch ex As Exception
- oBuilder = Nothing
- End Try
-
- If oBuilder Is Nothing Then
- MsgBox("Connection String ist ungültig!", MsgBoxStyle.Critical, Text)
- Exit Sub
- End If
-
- If oConnectionString.Contains("Trusted") Then
- chkWinAuth.Checked = True
- txtConnectionString.Text = oConnectionString
- Else
- chkWinAuth.Checked = False
- txtConnectionString.Text = oConnectionString.Replace(oBuilder.Password, "XXXXXX")
- txtUserName.Text = oBuilder.UserID
- End If
-
- txtServerName.Text = oBuilder.DataSource
- cmbDatabase.Text = oBuilder.InitialCatalog
- End If
- End Sub
-
- Private Sub chkWinAuth_CheckedChanged(sender As Object, e As EventArgs) Handles chkWinAuth.CheckedChanged
- txtPassword.Enabled = Not chkWinAuth.Checked
- txtUserName.Enabled = Not chkWinAuth.Checked
- End Sub
-
- Private Sub cmbDatabase_Click(sender As Object, e As EventArgs) Handles cmbDatabase.Click
- Cursor = Cursors.WaitCursor
-
- Dim oConnectionString As String = GetConnectionString(False)
- Dim oDatabase As New MSSQLServer(LogConfig, oConnectionString)
-
- If oDatabase.DBInitialized = False Then
- MsgBox("Verbindung fehlgeschlagen!", MsgBoxStyle.Critical, Text)
- Exit Sub
- End If
-
- Try
- Using oConnection = New SqlClient.SqlConnection(oConnectionString)
- oConnection.Open()
- Using oCommand As New SqlClient.SqlCommand("sp_databases", oConnection)
- Using oReader As SqlClient.SqlDataReader = oCommand.ExecuteReader
- If oReader.HasRows Then
- cmbDatabase.Properties.Items.Clear()
-
- Do While oReader.Read
- cmbDatabase.Properties.Items.Add(oReader("Database_Name"))
- Loop
- cmbDatabase.ShowPopup()
- Else
- MsgBox("The standard-databases could not be retrieved. The default database will be set!" & vbNewLine & "Check rights in sql-server for user: " & Me.txtUserName.Text, MsgBoxStyle.Exclamation)
- End If
- End Using
- End Using
- End Using
-
- Catch ex As Exception
- Logger.Error(ex)
- Finally
- Cursor = Cursors.Default
- End Try
- End Sub
-
- Private Function GetConnectionString(WithDatabase As Boolean) As String
- Dim oConnectionString As String
-
- If chkWinAuth.Checked Then
- oConnectionString = $"Data Source={txtServerName.Text};Trusted_Connection=True;"
- Else
- oConnectionString = $"Server={txtServerName.Text};User Id={txtUserName.Text};Password={txtPassword.Text};"
- End If
-
- If WithDatabase Then
- oConnectionString &= $"Database={cmbDatabase.Text};"
- End If
-
- Return oConnectionString
- End Function
-
- Private Sub btnTestConnection_Click(sender As Object, e As EventArgs) Handles btnTestConnection.Click
- Try
- Dim oConnectionString = GetConnectionString(True)
-
- Using oConnection As New SqlConnection(oConnectionString)
- oConnection.Open()
- oConnection.Close()
- End Using
-
- Dim oResult = MessageBox.Show(STRING_CONNECTION_SUCCESSFUL, Text, MessageBoxButtons.YesNo, MessageBoxIcon.Question)
-
- If oResult = DialogResult.Yes Then
- Dim oPlainTextConnectionString = $"Server={txtServerName.Text};Database={cmbDatabase.Text};User Id={txtUserName.Text};Password={txtPassword.Text};"
- ConnectionString = MSSQLServer.EncryptConnectionString(oPlainTextConnectionString)
- Close()
- End If
- Catch ex As Exception
- Logger.Error(ex)
- MsgBox("Error while connecting to Database", MsgBoxStyle.Critical, Text)
- End Try
- End Sub
-
- Private Sub frmSQLConfig_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
- If ConnectionString <> String.Empty Then
- DialogResult = DialogResult.OK
- Else
- DialogResult = DialogResult.Cancel
- End If
- End Sub
-End Class
\ No newline at end of file
diff --git a/SQLConfig/packages.config b/SQLConfig/packages.config
deleted file mode 100644
index 63f3075e..00000000
--- a/SQLConfig/packages.config
+++ /dev/null
@@ -1,4 +0,0 @@
-
-
-
-
\ No newline at end of file