MS CWGUI DecryptConNString

This commit is contained in:
2021-12-16 13:40:01 +01:00
parent 96f7ef1a9c
commit f3465e4730
4 changed files with 8 additions and 2 deletions

View File

@@ -87,6 +87,7 @@ Public Class ProfileSearches
oSQL = oPatterns.ReplaceClipboardContents(oSQL, _Params.ClipboardContents)
Dim oConnectionString = ProfileUtils.GetConnectionString(_Environment.Database, oConnectionId)
Dim oDatatable As DataTable = _Environment.Database.GetDatatableWithConnection(oSQL, oConnectionString)
If oDatatable Is Nothing Then
@@ -152,6 +153,7 @@ Public Class ProfileSearches
oSQL = oPatterns.ReplaceClipboardContents(oSQL, _Params.ClipboardContents)
Dim oConnectionString = ProfileUtils.GetConnectionString(_Environment.Database, oConnectionId)
Dim oDatatable As DataTable = _Environment.Database.GetDatatableWithConnection(oSQL, oConnectionString)
If oDatatable Is Nothing Then