use new Encryption methods

This commit is contained in:
Jonathan Jenne
2021-05-28 11:01:59 +02:00
parent 3d30ab7309
commit 33cfb257b1
3 changed files with 8 additions and 14 deletions

View File

@@ -116,12 +116,8 @@ Public Class ClassInit
End Sub
Private Sub CheckConnectivity(MyApplication As My.MyApplication)
Dim oCrypt As New EncryptionLegacy()
Dim oBuilder = My.SystemConfig.GetConnectionStringBuilder(My.SystemConfig.ConnectionString)
oBuilder.Password = oCrypt.DecryptData(oBuilder.Password)
Dim oDecryptedConnectionString = oBuilder.ToString
My.Database = New MSSQLServer(My.LogConfig, oDecryptedConnectionString)
Dim oConnectionString = MSSQLServer.DecryptConnectionString(My.SystemConfig.ConnectionString)
My.Database = New MSSQLServer(My.LogConfig, oConnectionString)
If My.Database.DBInitialized = False Then
_Logger.Warn("Could not initialize DD_ECM-Database!")