MS FolderImport
This commit is contained in:
parent
284b5a6363
commit
9241752a89
644
ZooFlow/Modules/frmFolderImport.Designer.vb
generated
Normal file
644
ZooFlow/Modules/frmFolderImport.Designer.vb
generated
Normal file
@ -0,0 +1,644 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class frmFolderImport
|
||||
Inherits DevExpress.XtraBars.Ribbon.RibbonForm
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Wird vom Windows Form-Designer benötigt.
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
|
||||
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
|
||||
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFolderImport))
|
||||
Me.RibbonControl1 = New DevExpress.XtraBars.Ribbon.RibbonControl()
|
||||
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarEditItem1 = New DevExpress.XtraBars.BarEditItem()
|
||||
Me.RepositoryItemProgressBar1 = New DevExpress.XtraEditors.Repository.RepositoryItemProgressBar()
|
||||
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
|
||||
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.txtFolderbrowser = New System.Windows.Forms.TextBox()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.FolderBrowserDialog1 = New System.Windows.Forms.FolderBrowserDialog()
|
||||
Me.cmbDoctype = New System.Windows.Forms.ComboBox()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.txtRegex = New System.Windows.Forms.TextBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.btnMoveTo = New System.Windows.Forms.Button()
|
||||
Me.Label4 = New System.Windows.Forms.Label()
|
||||
Me.txtMoveTo = New System.Windows.Forms.TextBox()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.NumSplitIndex = New System.Windows.Forms.NumericUpDown()
|
||||
Me.txtSplitCharacter = New System.Windows.Forms.TextBox()
|
||||
Me.LabelControl1 = New DevExpress.XtraEditors.LabelControl()
|
||||
Me.cmbAttribute = New System.Windows.Forms.ComboBox()
|
||||
Me.LabelControl2 = New DevExpress.XtraEditors.LabelControl()
|
||||
Me.NumericUpDownLimit = New System.Windows.Forms.NumericUpDown()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.txtTitle = New System.Windows.Forms.TextBox()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.cmbProfile = New System.Windows.Forms.ComboBox()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Label10 = New System.Windows.Forms.Label()
|
||||
Me.Label11 = New System.Windows.Forms.Label()
|
||||
Me.Label12 = New System.Windows.Forms.Label()
|
||||
Me.txtAddedWho = New System.Windows.Forms.TextBox()
|
||||
Me.txtAddedWhen = New System.Windows.Forms.TextBox()
|
||||
Me.txtChangedWho = New System.Windows.Forms.TextBox()
|
||||
Me.txtChangedWhen = New System.Windows.Forms.TextBox()
|
||||
Me.Label13 = New System.Windows.Forms.Label()
|
||||
Me.txtProfilID = New System.Windows.Forms.TextBox()
|
||||
Me.GridControlSplit = New DevExpress.XtraGrid.GridControl()
|
||||
Me.GridViewSplit = New DevExpress.XtraGrid.Views.Grid.GridView()
|
||||
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
|
||||
Me.XtraTabPageSplit = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.XtraTabPage2 = New DevExpress.XtraTab.XtraTabPage()
|
||||
Me.RibbonPageGroup4 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.BarButtonItem5 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem6 = New DevExpress.XtraBars.BarButtonItem()
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.RepositoryItemProgressBar1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
CType(Me.NumSplitIndex, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.NumericUpDownLimit, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridControlSplit, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.GridViewSplit, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.XtraTabControl1.SuspendLayout()
|
||||
Me.XtraTabPageSplit.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'RibbonControl1
|
||||
'
|
||||
Me.RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Green
|
||||
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.BarButtonItem1, Me.BarButtonItem2, Me.BarEditItem1, Me.BarButtonItem3, Me.BarButtonItem4, Me.BarButtonItem5, Me.BarButtonItem6})
|
||||
Me.RibbonControl1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.RibbonControl1.MaxItemId = 8
|
||||
Me.RibbonControl1.Name = "RibbonControl1"
|
||||
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
|
||||
Me.RibbonControl1.RepositoryItems.AddRange(New DevExpress.XtraEditors.Repository.RepositoryItem() {Me.RepositoryItemProgressBar1})
|
||||
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.RibbonControl1.Size = New System.Drawing.Size(894, 158)
|
||||
Me.RibbonControl1.StatusBar = Me.RibbonStatusBar1
|
||||
'
|
||||
'BarButtonItem1
|
||||
'
|
||||
Me.BarButtonItem1.Caption = "Importiere Dateien"
|
||||
Me.BarButtonItem1.Id = 1
|
||||
Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem1.Name = "BarButtonItem1"
|
||||
'
|
||||
'BarButtonItem2
|
||||
'
|
||||
Me.BarButtonItem2.Caption = "Verarbeitung"
|
||||
Me.BarButtonItem2.Id = 2
|
||||
Me.BarButtonItem2.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem2.Name = "BarButtonItem2"
|
||||
'
|
||||
'BarEditItem1
|
||||
'
|
||||
Me.BarEditItem1.Caption = "Fortschritt Import"
|
||||
Me.BarEditItem1.Edit = Me.RepositoryItemProgressBar1
|
||||
Me.BarEditItem1.EditWidth = 130
|
||||
Me.BarEditItem1.Id = 3
|
||||
Me.BarEditItem1.Name = "BarEditItem1"
|
||||
Me.BarEditItem1.Visibility = DevExpress.XtraBars.BarItemVisibility.OnlyInCustomizing
|
||||
'
|
||||
'RepositoryItemProgressBar1
|
||||
'
|
||||
Me.RepositoryItemProgressBar1.Name = "RepositoryItemProgressBar1"
|
||||
Me.RepositoryItemProgressBar1.Step = 1
|
||||
'
|
||||
'BarButtonItem3
|
||||
'
|
||||
Me.BarButtonItem3.Caption = "Speichern"
|
||||
Me.BarButtonItem3.Id = 4
|
||||
Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem3.Name = "BarButtonItem3"
|
||||
'
|
||||
'BarButtonItem4
|
||||
'
|
||||
Me.BarButtonItem4.Caption = "Hinzufügen"
|
||||
Me.BarButtonItem4.Id = 5
|
||||
Me.BarButtonItem4.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem4.Name = "BarButtonItem4"
|
||||
'
|
||||
'RibbonPage1
|
||||
'
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2, Me.RibbonPageGroup3, Me.RibbonPageGroup4})
|
||||
Me.RibbonPage1.Name = "RibbonPage1"
|
||||
Me.RibbonPage1.Text = "Start"
|
||||
'
|
||||
'RibbonPageGroup1
|
||||
'
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem1)
|
||||
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
|
||||
Me.RibbonPageGroup1.Text = "Verarbeiten"
|
||||
'
|
||||
'RibbonPageGroup2
|
||||
'
|
||||
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem2)
|
||||
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
|
||||
Me.RibbonPageGroup2.Text = "Prüfen..."
|
||||
'
|
||||
'RibbonPageGroup3
|
||||
'
|
||||
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem3)
|
||||
Me.RibbonPageGroup3.ItemLinks.Add(Me.BarButtonItem4)
|
||||
Me.RibbonPageGroup3.Name = "RibbonPageGroup3"
|
||||
Me.RibbonPageGroup3.Text = "Aktionen"
|
||||
'
|
||||
'RibbonStatusBar1
|
||||
'
|
||||
Me.RibbonStatusBar1.ItemLinks.Add(Me.BarEditItem1)
|
||||
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 660)
|
||||
Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
|
||||
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
|
||||
Me.RibbonStatusBar1.Size = New System.Drawing.Size(894, 24)
|
||||
'
|
||||
'RibbonPage2
|
||||
'
|
||||
Me.RibbonPage2.Name = "RibbonPage2"
|
||||
Me.RibbonPage2.Text = "RibbonPage2"
|
||||
'
|
||||
'txtFolderbrowser
|
||||
'
|
||||
Me.txtFolderbrowser.Location = New System.Drawing.Point(15, 285)
|
||||
Me.txtFolderbrowser.Name = "txtFolderbrowser"
|
||||
Me.txtFolderbrowser.Size = New System.Drawing.Size(729, 22)
|
||||
Me.txtFolderbrowser.TabIndex = 2
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(12, 269)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(95, 13)
|
||||
Me.Label1.TabIndex = 3
|
||||
Me.Label1.Text = "Pfad mit Dateien:"
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.Location = New System.Drawing.Point(750, 284)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(38, 23)
|
||||
Me.Button1.TabIndex = 4
|
||||
Me.Button1.Text = "..."
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'cmbDoctype
|
||||
'
|
||||
Me.cmbDoctype.FormattingEnabled = True
|
||||
Me.cmbDoctype.Location = New System.Drawing.Point(382, 244)
|
||||
Me.cmbDoctype.Name = "cmbDoctype"
|
||||
Me.cmbDoctype.Size = New System.Drawing.Size(278, 21)
|
||||
Me.cmbDoctype.TabIndex = 7
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Location = New System.Drawing.Point(379, 228)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(75, 13)
|
||||
Me.Label2.TabIndex = 8
|
||||
Me.Label2.Text = "Dokumentart"
|
||||
'
|
||||
'txtRegex
|
||||
'
|
||||
Me.txtRegex.Location = New System.Drawing.Point(15, 367)
|
||||
Me.txtRegex.Name = "txtRegex"
|
||||
Me.txtRegex.Size = New System.Drawing.Size(281, 22)
|
||||
Me.txtRegex.TabIndex = 9
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.Location = New System.Drawing.Point(12, 351)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(106, 13)
|
||||
Me.Label3.TabIndex = 10
|
||||
Me.Label3.Text = "Regex Dateinamen:"
|
||||
'
|
||||
'btnMoveTo
|
||||
'
|
||||
Me.btnMoveTo.Location = New System.Drawing.Point(750, 324)
|
||||
Me.btnMoveTo.Name = "btnMoveTo"
|
||||
Me.btnMoveTo.Size = New System.Drawing.Size(38, 23)
|
||||
Me.btnMoveTo.TabIndex = 15
|
||||
Me.btnMoveTo.Text = "..."
|
||||
Me.btnMoveTo.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label4
|
||||
'
|
||||
Me.Label4.AutoSize = True
|
||||
Me.Label4.Location = New System.Drawing.Point(12, 310)
|
||||
Me.Label4.Name = "Label4"
|
||||
Me.Label4.Size = New System.Drawing.Size(144, 13)
|
||||
Me.Label4.TabIndex = 14
|
||||
Me.Label4.Text = "Sicherungsort nach Erfolg:"
|
||||
'
|
||||
'txtMoveTo
|
||||
'
|
||||
Me.txtMoveTo.Location = New System.Drawing.Point(15, 326)
|
||||
Me.txtMoveTo.Name = "txtMoveTo"
|
||||
Me.txtMoveTo.Size = New System.Drawing.Size(729, 22)
|
||||
Me.txtMoveTo.TabIndex = 13
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Location = New System.Drawing.Point(6, 18)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(83, 13)
|
||||
Me.Label5.TabIndex = 16
|
||||
Me.Label5.Text = "Split-Character"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.Location = New System.Drawing.Point(95, 18)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(49, 13)
|
||||
Me.Label6.TabIndex = 17
|
||||
Me.Label6.Text = "Position"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.NumSplitIndex)
|
||||
Me.GroupBox1.Controls.Add(Me.txtSplitCharacter)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.Label6)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(509, 445)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(163, 66)
|
||||
Me.GroupBox1.TabIndex = 19
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "Splitdefinition"
|
||||
'
|
||||
'NumSplitIndex
|
||||
'
|
||||
Me.NumSplitIndex.Location = New System.Drawing.Point(98, 35)
|
||||
Me.NumSplitIndex.Maximum = New Decimal(New Integer() {10, 0, 0, 0})
|
||||
Me.NumSplitIndex.Name = "NumSplitIndex"
|
||||
Me.NumSplitIndex.Size = New System.Drawing.Size(46, 22)
|
||||
Me.NumSplitIndex.TabIndex = 18
|
||||
'
|
||||
'txtSplitCharacter
|
||||
'
|
||||
Me.txtSplitCharacter.Location = New System.Drawing.Point(9, 34)
|
||||
Me.txtSplitCharacter.Name = "txtSplitCharacter"
|
||||
Me.txtSplitCharacter.Size = New System.Drawing.Size(27, 22)
|
||||
Me.txtSplitCharacter.TabIndex = 17
|
||||
Me.txtSplitCharacter.Text = "-"
|
||||
'
|
||||
'LabelControl1
|
||||
'
|
||||
Me.LabelControl1.Location = New System.Drawing.Point(661, 428)
|
||||
Me.LabelControl1.Name = "LabelControl1"
|
||||
Me.LabelControl1.Size = New System.Drawing.Size(105, 13)
|
||||
Me.LabelControl1.TabIndex = 20
|
||||
Me.LabelControl1.Text = "Deskriptives Attribut"
|
||||
'
|
||||
'cmbAttribute
|
||||
'
|
||||
Me.cmbAttribute.FormattingEnabled = True
|
||||
Me.cmbAttribute.Location = New System.Drawing.Point(661, 445)
|
||||
Me.cmbAttribute.Name = "cmbAttribute"
|
||||
Me.cmbAttribute.Size = New System.Drawing.Size(233, 21)
|
||||
Me.cmbAttribute.TabIndex = 21
|
||||
'
|
||||
'LabelControl2
|
||||
'
|
||||
Me.LabelControl2.Location = New System.Drawing.Point(299, 351)
|
||||
Me.LabelControl2.Name = "LabelControl2"
|
||||
Me.LabelControl2.Size = New System.Drawing.Size(77, 13)
|
||||
Me.LabelControl2.TabIndex = 22
|
||||
Me.LabelControl2.Text = "Limit FileCount"
|
||||
'
|
||||
'NumericUpDownLimit
|
||||
'
|
||||
Me.NumericUpDownLimit.Location = New System.Drawing.Point(299, 367)
|
||||
Me.NumericUpDownLimit.Name = "NumericUpDownLimit"
|
||||
Me.NumericUpDownLimit.Size = New System.Drawing.Size(74, 22)
|
||||
Me.NumericUpDownLimit.TabIndex = 23
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Location = New System.Drawing.Point(12, 228)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(29, 13)
|
||||
Me.Label7.TabIndex = 26
|
||||
Me.Label7.Text = "Titel"
|
||||
'
|
||||
'txtTitle
|
||||
'
|
||||
Me.txtTitle.Location = New System.Drawing.Point(15, 244)
|
||||
Me.txtTitle.Name = "txtTitle"
|
||||
Me.txtTitle.Size = New System.Drawing.Size(361, 22)
|
||||
Me.txtTitle.TabIndex = 27
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label8.Location = New System.Drawing.Point(12, 161)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(131, 17)
|
||||
Me.Label8.TabIndex = 28
|
||||
Me.Label8.Text = "Ausgewähltes Profil"
|
||||
'
|
||||
'cmbProfile
|
||||
'
|
||||
Me.cmbProfile.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.cmbProfile.FormattingEnabled = True
|
||||
Me.cmbProfile.Location = New System.Drawing.Point(15, 181)
|
||||
Me.cmbProfile.Name = "cmbProfile"
|
||||
Me.cmbProfile.Size = New System.Drawing.Size(361, 25)
|
||||
Me.cmbProfile.TabIndex = 29
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Location = New System.Drawing.Point(12, 392)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(64, 13)
|
||||
Me.Label9.TabIndex = 30
|
||||
Me.Label9.Text = "Erstellt wer"
|
||||
'
|
||||
'Label10
|
||||
'
|
||||
Me.Label10.AutoSize = True
|
||||
Me.Label10.Location = New System.Drawing.Point(162, 392)
|
||||
Me.Label10.Name = "Label10"
|
||||
Me.Label10.Size = New System.Drawing.Size(74, 13)
|
||||
Me.Label10.TabIndex = 31
|
||||
Me.Label10.Text = "Erstellt wann"
|
||||
'
|
||||
'Label11
|
||||
'
|
||||
Me.Label11.AutoSize = True
|
||||
Me.Label11.Location = New System.Drawing.Point(330, 392)
|
||||
Me.Label11.Name = "Label11"
|
||||
Me.Label11.Size = New System.Drawing.Size(77, 13)
|
||||
Me.Label11.TabIndex = 32
|
||||
Me.Label11.Text = "Geändert wer"
|
||||
'
|
||||
'Label12
|
||||
'
|
||||
Me.Label12.AutoSize = True
|
||||
Me.Label12.Location = New System.Drawing.Point(477, 392)
|
||||
Me.Label12.Name = "Label12"
|
||||
Me.Label12.Size = New System.Drawing.Size(87, 13)
|
||||
Me.Label12.TabIndex = 33
|
||||
Me.Label12.Text = "Geändert wann"
|
||||
'
|
||||
'txtAddedWho
|
||||
'
|
||||
Me.txtAddedWho.Enabled = False
|
||||
Me.txtAddedWho.Location = New System.Drawing.Point(15, 408)
|
||||
Me.txtAddedWho.Name = "txtAddedWho"
|
||||
Me.txtAddedWho.Size = New System.Drawing.Size(144, 22)
|
||||
Me.txtAddedWho.TabIndex = 34
|
||||
'
|
||||
'txtAddedWhen
|
||||
'
|
||||
Me.txtAddedWhen.Enabled = False
|
||||
Me.txtAddedWhen.Location = New System.Drawing.Point(165, 408)
|
||||
Me.txtAddedWhen.Name = "txtAddedWhen"
|
||||
Me.txtAddedWhen.Size = New System.Drawing.Size(144, 22)
|
||||
Me.txtAddedWhen.TabIndex = 35
|
||||
'
|
||||
'txtChangedWho
|
||||
'
|
||||
Me.txtChangedWho.Enabled = False
|
||||
Me.txtChangedWho.Location = New System.Drawing.Point(330, 408)
|
||||
Me.txtChangedWho.Name = "txtChangedWho"
|
||||
Me.txtChangedWho.Size = New System.Drawing.Size(144, 22)
|
||||
Me.txtChangedWho.TabIndex = 36
|
||||
'
|
||||
'txtChangedWhen
|
||||
'
|
||||
Me.txtChangedWhen.Enabled = False
|
||||
Me.txtChangedWhen.Location = New System.Drawing.Point(480, 408)
|
||||
Me.txtChangedWhen.Name = "txtChangedWhen"
|
||||
Me.txtChangedWhen.Size = New System.Drawing.Size(144, 22)
|
||||
Me.txtChangedWhen.TabIndex = 37
|
||||
'
|
||||
'Label13
|
||||
'
|
||||
Me.Label13.AutoSize = True
|
||||
Me.Label13.Location = New System.Drawing.Point(666, 228)
|
||||
Me.Label13.Name = "Label13"
|
||||
Me.Label13.Size = New System.Drawing.Size(45, 13)
|
||||
Me.Label13.TabIndex = 40
|
||||
Me.Label13.Text = "ProfilID"
|
||||
'
|
||||
'txtProfilID
|
||||
'
|
||||
Me.txtProfilID.Enabled = False
|
||||
Me.txtProfilID.Location = New System.Drawing.Point(669, 244)
|
||||
Me.txtProfilID.Name = "txtProfilID"
|
||||
Me.txtProfilID.Size = New System.Drawing.Size(55, 22)
|
||||
Me.txtProfilID.TabIndex = 41
|
||||
'
|
||||
'GridControlSplit
|
||||
'
|
||||
Me.GridControlSplit.Dock = System.Windows.Forms.DockStyle.Fill
|
||||
Me.GridControlSplit.Location = New System.Drawing.Point(0, 0)
|
||||
Me.GridControlSplit.MainView = Me.GridViewSplit
|
||||
Me.GridControlSplit.MenuManager = Me.RibbonControl1
|
||||
Me.GridControlSplit.Name = "GridControlSplit"
|
||||
Me.GridControlSplit.Size = New System.Drawing.Size(487, 179)
|
||||
Me.GridControlSplit.TabIndex = 42
|
||||
Me.GridControlSplit.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewSplit})
|
||||
'
|
||||
'GridViewSplit
|
||||
'
|
||||
Me.GridViewSplit.GridControl = Me.GridControlSplit
|
||||
Me.GridViewSplit.Name = "GridViewSplit"
|
||||
Me.GridViewSplit.OptionsBehavior.AllowAddRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridViewSplit.OptionsBehavior.AllowDeleteRows = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridViewSplit.OptionsBehavior.AllowFixedGroups = DevExpress.Utils.DefaultBoolean.[False]
|
||||
Me.GridViewSplit.OptionsBehavior.Editable = False
|
||||
Me.GridViewSplit.OptionsView.ShowGroupPanel = False
|
||||
'
|
||||
'XtraTabControl1
|
||||
'
|
||||
Me.XtraTabControl1.Location = New System.Drawing.Point(15, 436)
|
||||
Me.XtraTabControl1.Name = "XtraTabControl1"
|
||||
Me.XtraTabControl1.SelectedTabPage = Me.XtraTabPageSplit
|
||||
Me.XtraTabControl1.Size = New System.Drawing.Size(489, 204)
|
||||
Me.XtraTabControl1.TabIndex = 43
|
||||
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.XtraTabPageSplit, Me.XtraTabPage2})
|
||||
'
|
||||
'XtraTabPageSplit
|
||||
'
|
||||
Me.XtraTabPageSplit.Controls.Add(Me.GridControlSplit)
|
||||
Me.XtraTabPageSplit.Name = "XtraTabPageSplit"
|
||||
Me.XtraTabPageSplit.Size = New System.Drawing.Size(487, 179)
|
||||
Me.XtraTabPageSplit.Text = "Trennen nach Satzzeichen"
|
||||
'
|
||||
'XtraTabPage2
|
||||
'
|
||||
Me.XtraTabPage2.Name = "XtraTabPage2"
|
||||
Me.XtraTabPage2.Size = New System.Drawing.Size(487, 179)
|
||||
Me.XtraTabPage2.Text = "Weiteres"
|
||||
'
|
||||
'RibbonPageGroup4
|
||||
'
|
||||
Me.RibbonPageGroup4.ItemLinks.Add(Me.BarButtonItem6)
|
||||
Me.RibbonPageGroup4.ItemLinks.Add(Me.BarButtonItem5)
|
||||
Me.RibbonPageGroup4.Name = "RibbonPageGroup4"
|
||||
Me.RibbonPageGroup4.Text = "Split-Funktionen"
|
||||
'
|
||||
'BarButtonItem5
|
||||
'
|
||||
Me.BarButtonItem5.Caption = "Löschen"
|
||||
Me.BarButtonItem5.Id = 6
|
||||
Me.BarButtonItem5.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem5.Name = "BarButtonItem5"
|
||||
'
|
||||
'BarButtonItem6
|
||||
'
|
||||
Me.BarButtonItem6.Caption = "Hinzufügen"
|
||||
Me.BarButtonItem6.Id = 7
|
||||
Me.BarButtonItem6.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem6.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
|
||||
Me.BarButtonItem6.Name = "BarButtonItem6"
|
||||
'
|
||||
'frmFolderImport
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(894, 684)
|
||||
Me.Controls.Add(Me.XtraTabControl1)
|
||||
Me.Controls.Add(Me.txtProfilID)
|
||||
Me.Controls.Add(Me.Label13)
|
||||
Me.Controls.Add(Me.txtChangedWhen)
|
||||
Me.Controls.Add(Me.txtChangedWho)
|
||||
Me.Controls.Add(Me.txtAddedWhen)
|
||||
Me.Controls.Add(Me.txtAddedWho)
|
||||
Me.Controls.Add(Me.Label12)
|
||||
Me.Controls.Add(Me.Label11)
|
||||
Me.Controls.Add(Me.Label10)
|
||||
Me.Controls.Add(Me.Label9)
|
||||
Me.Controls.Add(Me.cmbProfile)
|
||||
Me.Controls.Add(Me.Label8)
|
||||
Me.Controls.Add(Me.txtTitle)
|
||||
Me.Controls.Add(Me.Label7)
|
||||
Me.Controls.Add(Me.NumericUpDownLimit)
|
||||
Me.Controls.Add(Me.LabelControl2)
|
||||
Me.Controls.Add(Me.cmbAttribute)
|
||||
Me.Controls.Add(Me.LabelControl1)
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.btnMoveTo)
|
||||
Me.Controls.Add(Me.Label4)
|
||||
Me.Controls.Add(Me.txtMoveTo)
|
||||
Me.Controls.Add(Me.Label3)
|
||||
Me.Controls.Add(Me.txtRegex)
|
||||
Me.Controls.Add(Me.Label2)
|
||||
Me.Controls.Add(Me.cmbDoctype)
|
||||
Me.Controls.Add(Me.Button1)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.txtFolderbrowser)
|
||||
Me.Controls.Add(Me.RibbonStatusBar1)
|
||||
Me.Controls.Add(Me.RibbonControl1)
|
||||
Me.Name = "frmFolderImport"
|
||||
Me.Ribbon = Me.RibbonControl1
|
||||
Me.StatusBar = Me.RibbonStatusBar1
|
||||
Me.Text = "frmFolderImport"
|
||||
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.RepositoryItemProgressBar1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
CType(Me.NumSplitIndex, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.NumericUpDownLimit, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridControlSplit, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.GridViewSplit, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.XtraTabControl1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.XtraTabControl1.ResumeLayout(False)
|
||||
Me.XtraTabPageSplit.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
|
||||
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
|
||||
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
|
||||
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents txtFolderbrowser As TextBox
|
||||
Friend WithEvents Label1 As Label
|
||||
Friend WithEvents Button1 As Button
|
||||
Friend WithEvents FolderBrowserDialog1 As FolderBrowserDialog
|
||||
Friend WithEvents cmbDoctype As ComboBox
|
||||
Friend WithEvents Label2 As Label
|
||||
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents txtRegex As TextBox
|
||||
Friend WithEvents Label3 As Label
|
||||
Friend WithEvents btnMoveTo As Button
|
||||
Friend WithEvents Label4 As Label
|
||||
Friend WithEvents txtMoveTo As TextBox
|
||||
Friend WithEvents Label5 As Label
|
||||
Friend WithEvents Label6 As Label
|
||||
Friend WithEvents GroupBox1 As GroupBox
|
||||
Friend WithEvents NumSplitIndex As NumericUpDown
|
||||
Friend WithEvents txtSplitCharacter As TextBox
|
||||
Friend WithEvents LabelControl1 As DevExpress.XtraEditors.LabelControl
|
||||
Friend WithEvents cmbAttribute As ComboBox
|
||||
Friend WithEvents LabelControl2 As DevExpress.XtraEditors.LabelControl
|
||||
Friend WithEvents NumericUpDownLimit As NumericUpDown
|
||||
Friend WithEvents BarEditItem1 As DevExpress.XtraBars.BarEditItem
|
||||
Friend WithEvents RepositoryItemProgressBar1 As DevExpress.XtraEditors.Repository.RepositoryItemProgressBar
|
||||
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents Label7 As Label
|
||||
Friend WithEvents txtTitle As TextBox
|
||||
Friend WithEvents Label8 As Label
|
||||
Friend WithEvents cmbProfile As ComboBox
|
||||
Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents Label9 As Label
|
||||
Friend WithEvents Label10 As Label
|
||||
Friend WithEvents Label11 As Label
|
||||
Friend WithEvents Label12 As Label
|
||||
Friend WithEvents txtAddedWho As TextBox
|
||||
Friend WithEvents txtAddedWhen As TextBox
|
||||
Friend WithEvents txtChangedWho As TextBox
|
||||
Friend WithEvents txtChangedWhen As TextBox
|
||||
Friend WithEvents Label13 As Label
|
||||
Friend WithEvents txtProfilID As TextBox
|
||||
Friend WithEvents GridControlSplit As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents GridViewSplit As DevExpress.XtraGrid.Views.Grid.GridView
|
||||
Friend WithEvents XtraTabControl1 As DevExpress.XtraTab.XtraTabControl
|
||||
Friend WithEvents XtraTabPageSplit As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents XtraTabPage2 As DevExpress.XtraTab.XtraTabPage
|
||||
Friend WithEvents BarButtonItem5 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem6 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents RibbonPageGroup4 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
End Class
|
||||
249
ZooFlow/Modules/frmFolderImport.resx
Normal file
249
ZooFlow/Modules/frmFolderImport.resx
Normal file
@ -0,0 +1,249 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
|
||||
<data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPgBAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iUmVhcHBseSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
|
||||
LkdyZWVue2ZpbGw6IzAzOUMyMzt9Cjwvc3R5bGU+DQogIDxwb2x5Z29uIHBvaW50cz0iNCwyIDI4LDIg
|
||||
MjgsNiAxOCwxNiAxOCwyNiAxNCwzMCAxNCwxNiA0LDYgIiBjbGFzcz0iWWVsbG93IiAvPg0KICA8cG9s
|
||||
eWdvbiBwb2ludHM9IjI2LDI2IDI2LDE0IDI0LDE0IDI0LDI2IDIwLDI2IDI1LDMxIDMwLDI2ICIgY2xh
|
||||
c3M9IkdyZWVuIiAvPg0KPC9zdmc+Cw==
|
||||
</value>
|
||||
</data>
|
||||
<data name="BarButtonItem2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAPcFAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkdyZWVue2ZpbGw6IzAzOUMyMzt9Cgku
|
||||
QmxhY2t7ZmlsbDojNzI3MjcyO30KCS5SZWR7ZmlsbDojRDExQzFDO30KCS5ZZWxsb3d7ZmlsbDojRkZC
|
||||
MTE1O30KCS5CbHVle2ZpbGw6IzExNzdENzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
|
||||
Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQo8L3N0eWxlPg0KICA8ZyBpZD0iSXRlbVR5cGVD
|
||||
aGVja2VkIj4NCiAgICA8Zz4NCiAgICAgIDxnPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0iOCIgd2lk
|
||||
dGg9IjEwIiBoZWlnaHQ9IjQiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkJsYWNrIiAvPg0KICAgICAgICA8
|
||||
cmVjdCB4PSIyMCIgeT0iMjIiIHdpZHRoPSIxMCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNz
|
||||
PSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0iTTE1LDE4SDNjLTAuNSwwLTEsMC41LTEsMXYxMmMw
|
||||
LDAuNSwwLjUsMSwxLDFoMTJjMC41LDAsMS0wLjUsMS0xVjE5QzE2LDE4LjUsMTUuNSwxOCwxNSwxOHog
|
||||
TTE0LDMwSDRWMjAgICAgIGgxMFYzMHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0i
|
||||
TTE0LDEwLjhWMTRINFY0aDguMmwyLTJIM0MyLjUsMiwyLDIuNSwyLDN2MTJjMCwwLjUsMC41LDEsMSwx
|
||||
aDEyYzAuNSwwLDEtMC41LDEtMVY4LjhMMTQsMTAuOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgIDwv
|
||||
Zz4NCiAgICAgIDxnPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0iOCIgd2lkdGg9IjEwIiBoZWlnaHQ9
|
||||
IjQiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkJsYWNrIiAvPg0KICAgICAgICA8cmVjdCB4PSIyMCIgeT0i
|
||||
MjIiIHdpZHRoPSIxMCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJCbGFjayIgLz4NCiAg
|
||||
ICAgICAgPHBhdGggZD0iTTE1LDE4SDNjLTAuNSwwLTEsMC41LTEsMXYxMmMwLDAuNSwwLjUsMSwxLDFo
|
||||
MTJjMC41LDAsMS0wLjUsMS0xVjE5QzE2LDE4LjUsMTUuNSwxOCwxNSwxOHogTTE0LDMwSDRWMjAgICAg
|
||||
IGgxMFYzMHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgICAgPHBhdGggZD0iTTE0LDEwLjhWMTRINFY0
|
||||
aDguMmwyLTJIM0MyLjUsMiwyLDIuNSwyLDN2MTJjMCwwLjUsMC41LDEsMSwxaDEyYzAuNSwwLDEtMC41
|
||||
LDEtMVY4LjhMMTQsMTAuOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgICAgIDwvZz4NCiAgICA8L2c+DQog
|
||||
ICAgPHBvbHlnb24gcG9pbnRzPSI2LDUgNiw4IDEwLDEyIDE4LDQgMTgsMSAxMCw5ICAiIGNsYXNzPSJH
|
||||
cmVlbiIgLz4NCiAgPC9nPg0KPC9zdmc+Cw==
|
||||
</value>
|
||||
</data>
|
||||
<data name="BarButtonItem3.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAMICAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzczNzM3NDt9Cgku
|
||||
WWVsbG93e2ZpbGw6I0ZDQjAxQjt9CgkuR3JlZW57ZmlsbDojMTI5QzQ5O30KCS5CbHVle2ZpbGw6IzM4
|
||||
N0NCNzt9CgkuUmVke2ZpbGw6I0QwMjEyNzt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
|
||||
Y2l0eTowLjU7fQoJLnN0MXtvcGFjaXR5OjAuNzU7fQoJLnN0MntvcGFjaXR5OjAuMjU7fQoJLnN0M3tk
|
||||
aXNwbGF5Om5vbmU7ZmlsbDojNzM3Mzc0O30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTI3LDRoLTN2MTBI
|
||||
OFY0SDVDNC40LDQsNCw0LjQsNCw1djIyYzAsMC42LDAuNCwxLDEsMWgyMmMwLjYsMCwxLTAuNCwxLTFW
|
||||
NUMyOCw0LjQsMjcuNiw0LDI3LDR6IE0yNCwyNEg4di02ICBoMTZWMjR6IE0xMCw0djhoMTBWNEgxMHog
|
||||
TTE0LDEwaC0yVjZoMlYxMHoiIGNsYXNzPSJCbGFjayIgLz4NCjwvc3ZnPgs=
|
||||
</value>
|
||||
</data>
|
||||
<data name="BarButtonItem4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKcCAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
|
||||
ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
|
||||
OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
|
||||
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZCI+DQogICAgPHBhdGggZD0iTTI3LDE0aC05VjVj
|
||||
MC0wLjUtMC41LTEtMS0xaC0yYy0wLjUsMC0xLDAuNS0xLDF2OUg1Yy0wLjUsMC0xLDAuNS0xLDF2MmMw
|
||||
LDAuNSwwLjUsMSwxLDFoOXY5ICAgYzAsMC41LDAuNSwxLDEsMWgyYzAuNSwwLDEtMC41LDEtMXYtOWg5
|
||||
YzAuNSwwLDEtMC41LDEtMXYtMkMyOCwxNC41LDI3LjUsMTQsMjcsMTR6IiBjbGFzcz0iR3JlZW4iIC8+
|
||||
DQogIDwvZz4NCjwvc3ZnPgs=
|
||||
</value>
|
||||
</data>
|
||||
<data name="BarButtonItem5.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALMCAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
|
||||
ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
|
||||
OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
|
||||
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkRlbGV0ZUNpcmNsZWQiPg0KICAgIDxwYXRoIGQ9Ik0x
|
||||
Niw0QzkuNCw0LDQsOS40LDQsMTZzNS40LDEyLDEyLDEyczEyLTUuNCwxMi0xMlMyMi42LDQsMTYsNHog
|
||||
TTIzLjEsMjAuMmwtMi44LDIuOEwxNiwxOC44bC00LjIsNC4yICAgbC0yLjgtMi44bDQuMi00LjJsLTQu
|
||||
Mi00LjJsMi44LTIuOGw0LjIsNC4ybDQuMi00LjJsMi44LDIuOEwxOC44LDE2TDIzLjEsMjAuMnoiIGNs
|
||||
YXNzPSJSZWQiIC8+DQogIDwvZz4NCjwvc3ZnPgs=
|
||||
</value>
|
||||
</data>
|
||||
<data name="BarButtonItem6.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
|
||||
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
|
||||
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKcCAAAC77u/
|
||||
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
|
||||
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
|
||||
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
|
||||
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
|
||||
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
|
||||
ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
|
||||
OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
|
||||
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IkFkZCI+DQogICAgPHBhdGggZD0iTTI3LDE0aC05VjVj
|
||||
MC0wLjUtMC41LTEtMS0xaC0yYy0wLjUsMC0xLDAuNS0xLDF2OUg1Yy0wLjUsMC0xLDAuNS0xLDF2MmMw
|
||||
LDAuNSwwLjUsMSwxLDFoOXY5ICAgYzAsMC41LDAuNSwxLDEsMWgyYzAuNSwwLDEtMC41LDEtMXYtOWg5
|
||||
YzAuNSwwLDEtMC41LDEtMXYtMkMyOCwxNC41LDI3LjUsMTQsMjcsMTR6IiBjbGFzcz0iR3JlZW4iIC8+
|
||||
DQogIDwvZz4NCjwvc3ZnPgs=
|
||||
</value>
|
||||
</data>
|
||||
<metadata name="FolderBrowserDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 17</value>
|
||||
</metadata>
|
||||
</root>
|
||||
284
ZooFlow/Modules/frmFolderImport.vb
Normal file
284
ZooFlow/Modules/frmFolderImport.vb
Normal file
@ -0,0 +1,284 @@
|
||||
Imports System.IO
|
||||
Imports System.Text.RegularExpressions
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.ZooFlow
|
||||
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
|
||||
Public Class frmFolderImport
|
||||
Private Logger As Logger
|
||||
Private Property Environment As Environment
|
||||
Private oFileList As List(Of String)
|
||||
Private oDoctype_DT As DataTable
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
If FolderBrowserDialog1.ShowDialog = DialogResult.OK Then
|
||||
txtFolderbrowser.Text = FolderBrowserDialog1.SelectedPath
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub frmFolderImport_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
Logger = My.LogConfig.GetLogger()
|
||||
Environment = My.Application.GetEnvironment()
|
||||
Try
|
||||
Dim oSQL = "SELECT DISTINCT [DOCTYPE_ID] ,[Doctype] FROM [IDB].[dbo].[VWIDB_DOCTYPE_BUSINESS_ENTITY] where LANG_CODE = 'de-DE'"
|
||||
oDoctype_DT = My.DatabaseIDB.GetDatatable(oSQL)
|
||||
If Not IsNothing(oDoctype_DT) Then
|
||||
cmbDoctype.DataSource = oDoctype_DT
|
||||
cmbDoctype.ValueMember = oDoctype_DT.Columns(0).ColumnName
|
||||
cmbDoctype.DisplayMember = oDoctype_DT.Columns(1).ColumnName
|
||||
End If
|
||||
oSQL = "select AttributeID,Attribute From VWIDB_ATTRIBUTE_LANG where LANG_CODE = 'de-DE'"
|
||||
Dim oAttribute_DT As DataTable = My.DatabaseIDB.GetDatatable(oSQL)
|
||||
If Not IsNothing(oAttribute_DT) Then
|
||||
cmbAttribute.DataSource = oAttribute_DT
|
||||
cmbAttribute.ValueMember = oAttribute_DT.Columns(0).ColumnName
|
||||
cmbAttribute.DisplayMember = oAttribute_DT.Columns(1).ColumnName
|
||||
End If
|
||||
Refresh_Profiles()
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
Sub Refresh_Profiles()
|
||||
Dim oSQL = "select GUID,TITLE From TBFOLDERIMPORT_PROFILE"
|
||||
Dim oDTProfiles As DataTable = My.DatabaseECM.GetDatatable(oSQL)
|
||||
If Not IsNothing(oDTProfiles) Then
|
||||
cmbProfile.DataSource = oDTProfiles
|
||||
cmbProfile.ValueMember = oDTProfiles.Columns(0).ColumnName
|
||||
cmbProfile.DisplayMember = oDTProfiles.Columns(1).ColumnName
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
|
||||
|
||||
Dim oTempFileList As List(Of String) = FnGetFileList(txtFolderbrowser.Text, txtRegex.Text)
|
||||
|
||||
Try
|
||||
Dim oMsg = $"Es sollen [{oTempFileList.Count}] Dateien verarbeitet werden!"
|
||||
MsgBox(oMsg, MsgBoxStyle.Information)
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function FnGetFileList(pFolder As String, pRegex As String) As List(Of String)
|
||||
Try
|
||||
Dim oTempFileList As New List(Of String)
|
||||
Dim di As New DirectoryInfo(pFolder)
|
||||
' Get a reference to each file in that directory.
|
||||
Dim fiArr As FileInfo() = di.GetFiles()
|
||||
' Display the names of the files.
|
||||
Dim fri As FileInfo
|
||||
Dim oMatchCount As Integer = 0
|
||||
Dim oMatch As Boolean = False
|
||||
For Each fri In fiArr
|
||||
oMatch = True
|
||||
If txtRegex.Text <> String.Empty Then
|
||||
Dim regex As Regex = New Regex(pRegex)
|
||||
' Step 2: call Match on Regex.
|
||||
Dim match As Match = regex.Match(fri.Name)
|
||||
' Step 3: test the Success bool.
|
||||
' ... If we have Success, write the Value.
|
||||
If match.Success Then
|
||||
|
||||
Else
|
||||
oMatch = False
|
||||
End If
|
||||
End If
|
||||
If oMatch = True Then
|
||||
oMatchCount += 1
|
||||
oTempFileList.Add(fri.FullName)
|
||||
If NumericUpDownLimit.Value <> 0 Then
|
||||
If NumericUpDownLimit.Value = oMatchCount Then
|
||||
Logger.Info($"There is a limit for working files [{NumericUpDownLimit.Value}]! Exiting...")
|
||||
Exit For
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Next fri
|
||||
Return oTempFileList
|
||||
Catch ex As Exception
|
||||
MsgBox(ex.Message, MsgBoxStyle.Critical)
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Private Sub btnMoveTo_Click(sender As Object, e As EventArgs) Handles btnMoveTo.Click
|
||||
If FolderBrowserDialog1.ShowDialog = DialogResult.OK Then
|
||||
txtMoveTo.Text = FolderBrowserDialog1.SelectedPath
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Async Sub BarButtonItem1_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
|
||||
|
||||
Dim oTempFileList As List(Of String) = FnGetFileList(txtFolderbrowser.Text, txtRegex.Text)
|
||||
If oTempFileList.Count > 0 Then
|
||||
RepositoryItemProgressBar1.Maximum = oTempFileList.Count
|
||||
Cursor = Cursors.WaitCursor
|
||||
If cmbDoctype.SelectedIndex <> -1 And cmbAttribute.SelectedIndex <> -1 Then
|
||||
BarEditItem1.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
Dim oCount As Integer = 0
|
||||
Logger.Info($"WORK_TEMPFILELIST()...[{oTempFileList.Count}] files shall be worked!")
|
||||
Dim oCountResult As Integer = 0
|
||||
For Each oFile As String In oTempFileList
|
||||
Dim oResult As Boolean = False
|
||||
Try
|
||||
Logger.Debug($"=== ForEachFile {oCount} =======================================")
|
||||
Logger.Debug($"...Working on file [{oFile}]")
|
||||
Dim oFilenameOnly = Path.GetFileName(oFile)
|
||||
|
||||
Dim oSplit() As String = oFilenameOnly.Split(txtSplitCharacter.Text)
|
||||
Dim oSplitString As String = oSplit(NumSplitIndex.Value)
|
||||
Logger.Debug($"...oSplitString [{oSplitString}]")
|
||||
If Await StreamFile(oFile, cmbDoctype.SelectedValue, cmbAttribute.Text, oSplitString) = True Then
|
||||
Logger.Info($"...File successfully worked!")
|
||||
If txtMoveTo.Text <> String.Empty Then
|
||||
Try
|
||||
oResult = MoveFile(oFile, txtMoveTo.Text)
|
||||
|
||||
Catch ex As Exception
|
||||
|
||||
End Try
|
||||
Else
|
||||
oResult = False
|
||||
End If
|
||||
Else
|
||||
oResult = False
|
||||
End If
|
||||
|
||||
If oResult = True Then
|
||||
oCountResult += 1
|
||||
End If
|
||||
|
||||
Catch ex As Exception
|
||||
Logger.Warn($"Error working on fileimport for file [{oFile}]")
|
||||
Logger.Warn($"Error: [{ex.Message}]")
|
||||
Logger.Error(ex)
|
||||
End Try
|
||||
oCount += 1
|
||||
BarEditItem1.EditValue = oCount
|
||||
Next
|
||||
Dim oMSG = $"FileImport finished for [{oCountResult}] of [{oTempFileList.Count }] files!"
|
||||
Logger.Info(oMSG)
|
||||
Cursor = Cursors.Default
|
||||
MsgBox(oMSG, MsgBoxStyle.Information)
|
||||
BarEditItem1.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Async Function StreamFile(oFilename As String, pDoctypeID As Integer, pDescriptiveAttribute As String, pDescrValue As String) As Threading.Tasks.Task(Of Boolean)
|
||||
Try
|
||||
Dim oResponse As ImportFileResponse = Await My.Application.Service.Client.ImportFileAsync(
|
||||
oFilename,
|
||||
New List(Of UserAttributeValue) From {
|
||||
New UserAttributeValue With {
|
||||
.Name = pDescriptiveAttribute,
|
||||
.Values = New List(Of String) From {pDescrValue}.ToArray
|
||||
}
|
||||
},
|
||||
"WORK",
|
||||
"DOC",
|
||||
pDoctypeID
|
||||
)
|
||||
If oResponse.OK Then
|
||||
Logger.Info($"File [{oFilename}] successfully imported!")
|
||||
Return True
|
||||
Else
|
||||
Logger.Warn($"## ATTENTION: File [{oFilename}] was not imported! ##")
|
||||
Return False
|
||||
End If
|
||||
Catch ex As Exception
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
Private Function MoveFile(pFile As String, pPathMove2 As String) As Boolean
|
||||
Try
|
||||
Dim oFilename = Path.GetFileName(pFile)
|
||||
Dim oCombined = String.Concat(pPathMove2, "\", oFilename)
|
||||
File.Move(pFile, oCombined)
|
||||
Logger.Info($"...and moved to [{oCombined}]")
|
||||
Return True
|
||||
Catch ex As Exception
|
||||
Logger.Error(ex)
|
||||
Return False
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
|
||||
Dim oSaveUpdate = $"EXEC PRIDBFOLDERIMPORT_PROFILE '{txtTitle.Text}','{txtFolderbrowser.Text}','{txtRegex.Text}',{NumericUpDownLimit.Value}, {cmbDoctype.SelectedValue},'{txtMoveTo.Text}','', '{My.Application.User.UserName}','{txtProfilID.Text}'"
|
||||
Dim oProfile = txtTitle.Text
|
||||
Dim oDT As DataTable
|
||||
oDT = My.DatabaseECM.GetDatatable(oSaveUpdate)
|
||||
|
||||
If Not IsNothing(oDT) Then
|
||||
Refresh_Profiles()
|
||||
cmbDoctype.SelectedIndex = cmbProfile.FindStringExact(oProfile)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem4_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem4.ItemClick
|
||||
|
||||
txtFolderbrowser.Text = ""
|
||||
txtTitle.Text = ""
|
||||
txtRegex.Text = ""
|
||||
NumericUpDownLimit.Value = 0
|
||||
txtMoveTo.Text = ""
|
||||
cmbDoctype.SelectedIndex = -1
|
||||
End Sub
|
||||
|
||||
Private Sub cmbProfile_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbProfile.SelectedIndexChanged
|
||||
If cmbProfile.SelectedIndex <> -1 Then
|
||||
If IsNumeric(cmbProfile.SelectedValue) Then
|
||||
Dim oSQL = $"SELECT * FROM TBFOLDERIMPORT_PROFILE WHERE GUID = {cmbProfile.SelectedValue}"
|
||||
Dim oDT As DataTable
|
||||
oDT = My.DatabaseECM.GetDatatable(oSQL)
|
||||
|
||||
If Not IsNothing(oDT) Then
|
||||
txtProfilID.Text = oDT.Rows(0).Item("GUID")
|
||||
txtFolderbrowser.Text = oDT.Rows(0).Item("IMPORT_PATH")
|
||||
txtTitle.Text = oDT.Rows(0).Item("TITLE")
|
||||
txtRegex.Text = oDT.Rows(0).Item("REGEX_FILENAME")
|
||||
NumericUpDownLimit.Value = oDT.Rows(0).Item("LIMIT_FILECOUNT")
|
||||
txtMoveTo.Text = oDT.Rows(0).Item("ARCHIVE_PATH")
|
||||
Dim oDoctype As String
|
||||
For Each oRow As DataRow In oDoctype_DT.Rows
|
||||
If oRow.Item(0) = oDT.Rows(0).Item("DOCTYPE_ID") Then
|
||||
oDoctype = oRow.Item(1)
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
|
||||
Dim o1 = cmbDoctype.FindStringExact(oDoctype)
|
||||
|
||||
cmbDoctype.SelectedIndex = o1
|
||||
txtAddedWho.Text = oDT.Rows(0).Item("ADDED_WHO")
|
||||
txtAddedWhen.Text = oDT.Rows(0).Item("ADDED_WHEN")
|
||||
txtChangedWho.Text = IIf(IsDBNull(oDT.Rows(0).Item("CHANGED_WHO")), "", oDT.Rows(0).Item("CHANGED_WHO"))
|
||||
txtChangedWhen.Text = IIf(IsDBNull(oDT.Rows(0).Item("CHANGED_WHEN")), "", oDT.Rows(0).Item("CHANGED_WHEN"))
|
||||
Dim oSQLSplit = $"SELECT GUID as ID,PRAEFIX as Praefix,SPLIT_CHARACTER Character, SPLIT_POS as SplitPos,SUFFIX as Suffix FROM TBFOLDERIMPORT_STEP_ATTRIBUTE_SPLIT WHERE PROFILE_ID = {oDT.Rows(0).Item("GUID")}"
|
||||
Dim oDT_Split As DataTable
|
||||
oDT_Split = My.DatabaseECM.GetDatatable(oSQL)
|
||||
GridControlSplit.DataSource = oDT_Split
|
||||
Else
|
||||
txtProfilID.Text = ""
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub GridControlSplit_MouseClick(sender As Object, e As MouseEventArgs) Handles GridControlSplit.MouseClick
|
||||
RibbonPageGroup4.Visible = True
|
||||
RibbonPageGroup3.Enabled = False
|
||||
End Sub
|
||||
|
||||
Private Sub GridControlSplit_Leave(sender As Object, e As EventArgs) Handles GridControlSplit.Leave
|
||||
RibbonPageGroup4.Visible = False
|
||||
RibbonPageGroup3.Enabled = True
|
||||
End Sub
|
||||
End Class
|
||||
@ -1,12 +1,13 @@
|
||||
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraTreeList.TreeList, DevExpress.XtraTreeList.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.Repository.RepositoryItemProgressBar, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Docking.DockManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.ComboBoxEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.Ribbon.RibbonControl, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraBars.BarManager, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraLayout.LayoutControl, DevExpress.XtraLayout.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraTreeList.TreeList, DevExpress.XtraTreeList.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.ProgressBarControl, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.CheckEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.TextEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.DateEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
DevExpress.XtraEditors.PictureEdit, DevExpress.XtraEditors.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a
|
||||
|
||||
@ -369,6 +369,12 @@
|
||||
<Compile Include="frmTest.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Modules\frmFolderImport.Designer.vb">
|
||||
<DependentUpon>frmFolderImport.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="Modules\frmFolderImport.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Modules\Globix\ClassExclusions.vb" />
|
||||
<Compile Include="Modules\Globix\ClassValidator.vb" />
|
||||
<Compile Include="Modules\Globix\frmGlobixNameconvention.Designer.vb">
|
||||
@ -607,6 +613,9 @@
|
||||
<EmbeddedResource Include="frmTest.resx">
|
||||
<DependentUpon>frmTest.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Modules\frmFolderImport.resx">
|
||||
<DependentUpon>frmFolderImport.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Modules\Globix\frmGlobixBasicConfig.resx">
|
||||
<DependentUpon>frmGlobixBasicConfig.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
||||
@ -62,8 +62,8 @@ Public Class frmConfigBasic
|
||||
|
||||
Private Sub SaveCatalogSetting(pKey As Integer, pValue As String)
|
||||
Try
|
||||
Dim oUpd = $"UPDATE TBIDB_CATALOG_USER SET CHANGED_WHO = '{My.Application.User.UserName}', CAT_STRING = '{pValue}'
|
||||
WHERE GUID = {pKey}"
|
||||
Dim oUpd = $"UPDATE TBIDB_CATALOG_USER SET CHANGED_WHO = '{My.Application.User.UserName}', CAT_STRING = '{pValue}'
|
||||
WHERE GUID = {pKey}"
|
||||
|
||||
If My.DatabaseIDB.ExecuteNonQuery(oUpd) = True Then
|
||||
bsiInfo.Caption = "Position Quicksearch1 saved!"
|
||||
|
||||
32
ZooFlow/frmFlowForm.Designer.vb
generated
32
ZooFlow/frmFlowForm.Designer.vb
generated
@ -34,7 +34,7 @@ Partial Class frmFlowForm
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.VerwaltungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.SucheEntwurfToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.mnitmFolderImport = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.TestToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.ZooFlowBeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
|
||||
@ -106,62 +106,62 @@ Partial Class frmFlowForm
|
||||
'
|
||||
'ContextMenuSystray
|
||||
'
|
||||
Me.ContextMenuSystray.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EinblendenToolStripMenuItem, Me.ToolStripSeparator1, Me.VerwaltungToolStripMenuItem, Me.ToolStripSeparator3, Me.SucheEntwurfToolStripMenuItem, Me.TestToolStripMenuItem, Me.ToolStripSeparator2, Me.ZooFlowBeendenToolStripMenuItem, Me.TreeViewToolStripMenuItem})
|
||||
Me.ContextMenuSystray.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EinblendenToolStripMenuItem, Me.ToolStripSeparator1, Me.VerwaltungToolStripMenuItem, Me.ToolStripSeparator3, Me.mnitmFolderImport, Me.TestToolStripMenuItem, Me.ToolStripSeparator2, Me.ZooFlowBeendenToolStripMenuItem, Me.TreeViewToolStripMenuItem})
|
||||
Me.ContextMenuSystray.Name = "ContextMenuSystray"
|
||||
Me.ContextMenuSystray.Size = New System.Drawing.Size(170, 154)
|
||||
Me.ContextMenuSystray.Size = New System.Drawing.Size(181, 176)
|
||||
'
|
||||
'EinblendenToolStripMenuItem
|
||||
'
|
||||
Me.EinblendenToolStripMenuItem.Image = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.action_add_16xMD
|
||||
Me.EinblendenToolStripMenuItem.Name = "EinblendenToolStripMenuItem"
|
||||
Me.EinblendenToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.EinblendenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.EinblendenToolStripMenuItem.Text = "Einblenden"
|
||||
Me.EinblendenToolStripMenuItem.Visible = False
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(166, 6)
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(177, 6)
|
||||
'
|
||||
'VerwaltungToolStripMenuItem
|
||||
'
|
||||
Me.VerwaltungToolStripMenuItem.Image = Global.DigitalData.GUIs.ZooFlow.My.Resources.Resources.gear_32xLG
|
||||
Me.VerwaltungToolStripMenuItem.Name = "VerwaltungToolStripMenuItem"
|
||||
Me.VerwaltungToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.VerwaltungToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.VerwaltungToolStripMenuItem.Text = "Verwaltung"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(166, 6)
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(177, 6)
|
||||
'
|
||||
'SucheEntwurfToolStripMenuItem
|
||||
'mnitmFolderImport
|
||||
'
|
||||
Me.SucheEntwurfToolStripMenuItem.Name = "SucheEntwurfToolStripMenuItem"
|
||||
Me.SucheEntwurfToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.SucheEntwurfToolStripMenuItem.Text = "Suche Entwurf"
|
||||
Me.mnitmFolderImport.Name = "mnitmFolderImport"
|
||||
Me.mnitmFolderImport.Size = New System.Drawing.Size(180, 22)
|
||||
Me.mnitmFolderImport.Text = "Ordnerimport"
|
||||
'
|
||||
'TestToolStripMenuItem
|
||||
'
|
||||
Me.TestToolStripMenuItem.Name = "TestToolStripMenuItem"
|
||||
Me.TestToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.TestToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.TestToolStripMenuItem.Text = "Test"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(166, 6)
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(177, 6)
|
||||
'
|
||||
'ZooFlowBeendenToolStripMenuItem
|
||||
'
|
||||
Me.ZooFlowBeendenToolStripMenuItem.Name = "ZooFlowBeendenToolStripMenuItem"
|
||||
Me.ZooFlowBeendenToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.ZooFlowBeendenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.ZooFlowBeendenToolStripMenuItem.Text = "ZooFlow beenden"
|
||||
'
|
||||
'TreeViewToolStripMenuItem
|
||||
'
|
||||
Me.TreeViewToolStripMenuItem.Name = "TreeViewToolStripMenuItem"
|
||||
Me.TreeViewToolStripMenuItem.Size = New System.Drawing.Size(169, 22)
|
||||
Me.TreeViewToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
|
||||
Me.TreeViewToolStripMenuItem.Text = "treeView"
|
||||
'
|
||||
'PictureBoxSearch
|
||||
@ -613,7 +613,7 @@ Partial Class frmFlowForm
|
||||
Friend WithEvents Panel3 As Panel
|
||||
Friend WithEvents bbtnitmAusblenden As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents EinblendenToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents SucheEntwurfToolStripMenuItem As ToolStripMenuItem
|
||||
Friend WithEvents mnitmFolderImport As ToolStripMenuItem
|
||||
Friend WithEvents GridControlRecentFiles As DevExpress.XtraGrid.GridControl
|
||||
Friend WithEvents RecentFilesView As DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView
|
||||
Friend WithEvents colSecondary As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
|
||||
|
||||
@ -1232,9 +1232,8 @@ Public Class frmFlowForm
|
||||
Me.Visible = True
|
||||
End Sub
|
||||
|
||||
Private Sub SucheEntwurfToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SucheEntwurfToolStripMenuItem.Click
|
||||
Dim oForm = New frmSearchFlow()
|
||||
oForm.Show()
|
||||
Private Sub SucheEntwurfToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles mnitmFolderImport.Click
|
||||
frmFolderImport.ShowDialog()
|
||||
End Sub
|
||||
|
||||
Private Sub AdvBandedGridView1_DoubleClick(sender As Object, e As EventArgs) Handles RecentFilesView.DoubleClick
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user