MS24112015

This commit is contained in:
SchreiberM
2015-11-24 11:13:04 +01:00
parent 80247e18dd
commit ad1308fe18
47 changed files with 5379 additions and 1570 deletions

View File

@@ -129,6 +129,7 @@ Public Class SQLConfigAutoIndex
End If
Try
Me.TBDD_INDEX_MANTableAdapter.Fill(Me.MyDataset.TBDD_INDEX_MAN, CURRENT_DOKART_ID)
Add_ManualIndexe()
Catch ex As System.Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error in Load Manual Indices:")
End Try
@@ -177,7 +178,13 @@ Public Class SQLConfigAutoIndex
e.Handled = True
End If
End Sub
Sub Add_ManualIndexe()
Try
Catch ex As Exception
MsgBox("Error in Add Manual Indices: " & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Private Sub btnaddManualIdx_Click(sender As Object, e As EventArgs) Handles btnaddManualIdx.Click
If cmbManualIDX.SelectedIndex <> -1 Then
If Not cmbManualIDX.Text = String.Empty Then