MS
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user