This commit is contained in:
SchreiberM
2016-09-22 14:58:28 +02:00
parent 8a7c16d022
commit d8817e84a8
6 changed files with 513 additions and 635 deletions

View File

@@ -20,7 +20,6 @@
Catch ex As Exception
End Try
Dim DTNODES As DataTable = DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATION
Dim TREEVIEW_IMAGELIST As ImageList
@@ -305,6 +304,7 @@
If DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATION.GetChanges Is Nothing = False Then
Me.CHANGED_WHOTextBox.Text = Environment.UserName
TBPMO_STRUCTURE_NODES_CONFIGURATIONTableAdapter.Update(DD_DMSDataSet.TBPMO_STRUCTURE_NODES_CONFIGURATION)
lblSave.Text = "Successfully saved - " & Now
lblSave.Visible = True
Else
lblSave.Visible = False
@@ -409,6 +409,7 @@
TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.Filter = "GUID = " & ID
End If
End If
Me.lblSave.Visible = False
Catch ex As Exception
MsgBox("Error in TreeView.AfterSelect:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try