fix email indexing form title, icon order in ribbon, and missing objecttypes and indicies
This commit is contained in:
@@ -91,6 +91,11 @@ Public Class frmAdministration
|
||||
If SourceObjectTypes Is Nothing Then
|
||||
SourceObjectTypes = WINDREAM.ObjectTypes
|
||||
End If
|
||||
|
||||
For Each oObjecttype As String In SourceObjectTypes
|
||||
' und in die Combobox eintragen
|
||||
Me.OBJEKTTYPComboBox.Items.Add(oObjecttype)
|
||||
Next
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehlernachricht:" & vbNewLine & ex.Message, MsgBoxStyle.Critical, "Unexpected error inm Eintragen der Objekttypen")
|
||||
End Try
|
||||
@@ -240,11 +245,16 @@ Public Class frmAdministration
|
||||
CURRENT_DOKART_ID = DOKART_GUIDTextBox.Text
|
||||
Load_TabData()
|
||||
|
||||
|
||||
gridAssignedGroups.DataSource = ClassDatatables.GetAssignedGroups(CURRENT_DOKART_ID)
|
||||
gridAvailableGroups.DataSource = ClassDatatables.GetAvailableGroups(CURRENT_DOKART_ID)
|
||||
gridAssignedUsers.DataSource = ClassDatatables.GetAssignedUsers(CURRENT_DOKART_ID)
|
||||
gridAvailableUsers.DataSource = ClassDatatables.GetAvailableUsers(CURRENT_DOKART_ID)
|
||||
|
||||
If WINDREAM_DIRECTCheckBox.Checked = True Then
|
||||
load_WDIndices()
|
||||
End If
|
||||
|
||||
If TextBox3.Text = String.Empty Then
|
||||
TextBox5.Enabled = False
|
||||
TextBox1.Enabled = False
|
||||
|
||||
Reference in New Issue
Block a user