jj: tweak final index table, fix sql command

This commit is contained in:
Jonathan Jenne
2018-09-18 16:44:12 +02:00
parent 55a7c99417
commit 35c46987e9
3 changed files with 72 additions and 59 deletions

View File

@@ -1016,7 +1016,14 @@ Public Class frmAdministration
If Not IsNothing(obj) Then
Dim value = ClassFinalIndex.GetValue(obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types, obj.VectorIndex)
Dim value
If obj.SQLCommand.Value <> String.Empty Then
value = "SQL-Command"
Else
value = ClassFinalIndex.GetValue(obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types, obj.VectorIndex)
End If
Dim guid = obj.GUID
Dim profileId As Integer = PROFILGUIDTextBox.Text
Dim connectionId As Integer = obj.ConnectionId
@@ -1080,7 +1087,7 @@ Public Class frmAdministration
If value.Value <> String.Empty Then
obj.ConnectionId = CURRENT_SQL_CON
obj = ClassFinalIndex.SetValue("", obj, obj.IndexName, Windream_Indicies, Windream_Indicies_Types)
obj.StringValue = "SQL-Command"
End If
propertyGrid.Refresh()