MS merge DEsign

This commit is contained in:
SchreiberM 2023-03-28 13:56:07 +02:00
commit 8097017f9f
15 changed files with 5 additions and 14 deletions

4
.gitignore vendored
View File

@ -154,5 +154,5 @@ $RECYCLE.BIN/
# Mac desktop service store files # Mac desktop service store files
.DS_Store .DS_Store
/.vs/Global_Indexer/v15/Server/sqlite3
/.vs/Global_Indexer/v16/Server/sqlite3 /.vs

View File

@ -1,3 +0,0 @@
{
"CurrentProjectSetting": null
}

View File

@ -1,7 +0,0 @@
{
"ExpandedNodes": [
""
],
"SelectedNode": "\\Global_Indexer.sln",
"PreviewInSolutionExplorer": false
}

Binary file not shown.

View File

@ -527,12 +527,13 @@ Public Class frmAdministration
Dim oDatatable = DATABASE_ECM.GetDatatable($"SELECT * FROM TBDD_INDEX_MAN WHERE DOK_ID = {oDocTypeGuid} AND ACTIVE = 1") Dim oDatatable = DATABASE_ECM.GetDatatable($"SELECT * FROM TBDD_INDEX_MAN WHERE DOK_ID = {oDocTypeGuid} AND ACTIVE = 1")
Dim oPlaceholders = oDatatable.AsEnumerable(). Dim oPlaceholders = oDatatable.AsEnumerable().
ToDictionary(Of String, String)(Function(row) row.Item("NAME"), Function(row) row.Item("WD_INDEX")) ToDictionary(Of String, String)(Function(row) row.Item("NAME"), Function(row) row.Item("NAME"))
Dim oForm2 As New DigitalData.GUIs.Common.frmSQLEditor(LOGCONFIG, DATABASE_ECM) With { Dim oForm2 As New DigitalData.GUIs.Common.frmSQLEditor(LOGCONFIG, DATABASE_ECM) With {
.SQLCommand = oSQLCommand, .SQLCommand = oSQLCommand,
.SQLConnection = oConnection, .SQLConnection = oConnection,
.PlaceholdersManual = oPlaceholders .PlaceholdersManual = oPlaceholders,
.PlaceholdersManualPrefix = "CTRL"
} }
Dim oResult = oForm2.ShowDialog() Dim oResult = oForm2.ShowDialog()