MS New Properties

This commit is contained in:
2019-11-15 14:35:14 +01:00
parent 9e20642257
commit fefb26b556
28 changed files with 2132 additions and 4130 deletions

View File

@@ -232,7 +232,6 @@ Public Class frmSQL_DESIGNER
'TBPM_PROFILE_FINAL_INDEXINGTableAdapter.cmdUpdateSQL(cmbConnection.SelectedValue, SQL_COMMANDTextBox.Text, Environment.UserName, CURRENT_INDEX_ID)
lblSaveFinalIndex.Visible = True
lblSaveFinalIndex.Text = "SQL für finalen Index wurde erfolgreich gespeichert! " & Now.ToString
Me.SQLCommand = SQL_COMMANDTextBox.Text
Me.ConnectionId = cmbConnection.SelectedValue
ElseIf CURRENT_DESIGN_TYPE = "INPUT_INDEX" Then
Dim command = SQL_COMMANDTextBox.Text
@@ -244,8 +243,8 @@ Public Class frmSQL_DESIGNER
Else
lblSaveFinalIndex.Visible = False
End If
Me.SQLCommand = SQL_COMMANDTextBox.Text
End If
Me.SQLCommand = SQL_COMMANDTextBox.Text
End Sub
Private Sub btnAddControl_Click(sender As Object, e As EventArgs) Handles btnAddControl.Click