AppStd/FileFlow
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Version 2.0.0.5

Browse Source
This commit is contained in:
Jonathan Jenne
2020-03-12 15:03:39 +01:00
parent 071f11bf58
commit 1e945e4463
10 changed files with 3110 additions and 1166 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
Global_Indexer/frmAdministration.vb
View File

@@ -50,10 +50,24 @@ Public Class frmAdministration
RibbonPageCategoryUserGroups.Visible = False
RibbonPageCategoryMisc.Visible = False
Dim oDatatable As New DataTable()
oDatatable.Columns.Add("VALUE_TEXT")
oDatatable.Columns.Add("DISPLAY_TEXT")
oDatatable.Rows.Add("Default", "Datei Überschreiben")
oDatatable.Rows.Add("New version", "Neue Version erstellen")
oDatatable.Rows.Add("Question", "Nachfragen")
ComboBox3.DataSource = oDatatable
Try
Me.TBDD_DOKUMENTARTTableAdapter.Fill(Me.MyDataset.TBDD_DOKUMENTART)
Me.TBDD_EINGANGSARTENTableAdapter.Fill(Me.MyDataset.TBDD_EINGANGSARTEN)
Me.TBDD_MODULESTableAdapter.Fill(Me.MyDataset.TBDD_MODULES)
' Initialize Profile-GridControl before its tab is loaded
' prevents jumping of selected profile when selected tab is changed
GridControl3.ForceInitialize()
Catch ex As Exception
MsgBox("Error in frmAdministration_Load: " & vbNewLine & ex.Message, MsgBoxStyle.Exclamation)
End Try
@@ -248,6 +262,7 @@ Public Class frmAdministration
MyDataset.TBDD_DOKUMENTART.ERSTELLTWERColumn.DefaultValue = Environment.UserName
MyDataset.TBDD_DOKUMENTART.OBJEKTTYPColumn.DefaultValue = ""
MyDataset.TBDD_DOKUMENTART.NAMENKONVENTIONColumn.DefaultValue = "[%vOFilename]-[%vYY_MM_DD]-[%Version]"
MyDataset.TBDD_DOKUMENTART.DUPLICATE_HANDLINGColumn.DefaultValue = "New version"
IsInsert = True
End Sub