MS diverses

This commit is contained in:
SchreiberM 2022-05-17 08:14:06 +02:00
parent 8f1ab41d64
commit c329f42cdd
23 changed files with 1467 additions and 148 deletions

View File

@ -139,6 +139,18 @@
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="DocumentResultList\Cache.vb" /> <Compile Include="DocumentResultList\Cache.vb" />
<Compile Include="frmFileFlow_Duplicate.Designer.vb">
<DependentUpon>frmFileFlow_Duplicate.vb</DependentUpon>
</Compile>
<Compile Include="frmFileFlow_Duplicate.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmFileFlow_Success.Designer.vb">
<DependentUpon>frmFileFlow_Success.vb</DependentUpon>
</Compile>
<Compile Include="frmFileFlow_Success.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmSQLEditor.Designer.vb"> <Compile Include="frmSQLEditor.Designer.vb">
<DependentUpon>frmSQLEditor.vb</DependentUpon> <DependentUpon>frmSQLEditor.vb</DependentUpon>
</Compile> </Compile>
@ -208,6 +220,9 @@
<DependentUpon>frmDocumentResultList.vb</DependentUpon> <DependentUpon>frmDocumentResultList.vb</DependentUpon>
<SubType>Designer</SubType> <SubType>Designer</SubType>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmFileFlow_Duplicate.resx">
<DependentUpon>frmFileFlow_Duplicate.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmSQLEditor.resx"> <EmbeddedResource Include="frmSQLEditor.resx">
<DependentUpon>frmSQLEditor.vb</DependentUpon> <DependentUpon>frmSQLEditor.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>

View File

@ -0,0 +1,208 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmFileFlow_Duplicate
Inherits System.Windows.Forms.Form
'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(frmFileFlow_Duplicate))
Me.PanelControl1 = New DevExpress.XtraEditors.PanelControl()
Me.SimpleButton2 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
Me.LabelControlMessage = New DevExpress.XtraEditors.LabelControl()
Me.PanelControl2 = New DevExpress.XtraEditors.PanelControl()
Me.SimpleButton5 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton4 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton3 = New DevExpress.XtraEditors.SimpleButton()
Me.PictureEdit1 = New DevExpress.XtraEditors.PictureEdit()
CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.PanelControl1.SuspendLayout()
CType(Me.PanelControl2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.PanelControl2.SuspendLayout()
CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'PanelControl1
'
Me.PanelControl1.Appearance.BackColor = System.Drawing.Color.DarkRed
Me.PanelControl1.Appearance.Options.UseBackColor = True
Me.PanelControl1.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
Me.PanelControl1.Controls.Add(Me.SimpleButton2)
Me.PanelControl1.Controls.Add(Me.SimpleButton1)
Me.PanelControl1.Controls.Add(Me.LabelControlMessage)
Me.PanelControl1.Controls.Add(Me.PictureEdit1)
Me.PanelControl1.Dock = System.Windows.Forms.DockStyle.Top
Me.PanelControl1.Location = New System.Drawing.Point(0, 0)
Me.PanelControl1.Name = "PanelControl1"
Me.PanelControl1.Size = New System.Drawing.Size(718, 133)
Me.PanelControl1.TabIndex = 0
'
'SimpleButton2
'
Me.SimpleButton2.Appearance.BackColor = DevExpress.LookAndFeel.DXSkinColors.FillColors.Warning
Me.SimpleButton2.Appearance.BorderColor = System.Drawing.Color.Black
Me.SimpleButton2.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton2.Appearance.Options.UseBackColor = True
Me.SimpleButton2.Appearance.Options.UseBorderColor = True
Me.SimpleButton2.Appearance.Options.UseFont = True
Me.SimpleButton2.DialogResult = System.Windows.Forms.DialogResult.No
Me.SimpleButton2.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton2.Location = New System.Drawing.Point(563, 78)
Me.SimpleButton2.Name = "SimpleButton2"
Me.SimpleButton2.Size = New System.Drawing.Size(143, 40)
Me.SimpleButton2.TabIndex = 3
Me.SimpleButton2.Text = "Nein"
'
'SimpleButton1
'
Me.SimpleButton1.Appearance.BackColor = DevExpress.LookAndFeel.DXSkinColors.FillColors.Success
Me.SimpleButton1.Appearance.BorderColor = System.Drawing.Color.Black
Me.SimpleButton1.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton1.Appearance.Options.UseBackColor = True
Me.SimpleButton1.Appearance.Options.UseBorderColor = True
Me.SimpleButton1.Appearance.Options.UseFont = True
Me.SimpleButton1.DialogResult = System.Windows.Forms.DialogResult.Yes
Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton1.Location = New System.Drawing.Point(127, 78)
Me.SimpleButton1.Name = "SimpleButton1"
Me.SimpleButton1.Size = New System.Drawing.Size(101, 40)
Me.SimpleButton1.TabIndex = 2
Me.SimpleButton1.Text = "Ja"
'
'LabelControlMessage
'
Me.LabelControlMessage.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LabelControlMessage.Appearance.ForeColor = System.Drawing.Color.White
Me.LabelControlMessage.Appearance.Options.UseFont = True
Me.LabelControlMessage.Appearance.Options.UseForeColor = True
Me.LabelControlMessage.Location = New System.Drawing.Point(127, 22)
Me.LabelControlMessage.Name = "LabelControlMessage"
Me.LabelControlMessage.Size = New System.Drawing.Size(291, 21)
Me.LabelControlMessage.TabIndex = 1
Me.LabelControlMessage.Text = "Diese Datei ist doppelt....Text aus New"
'
'PanelControl2
'
Me.PanelControl2.Appearance.BackColor = System.Drawing.SystemColors.Info
Me.PanelControl2.Appearance.Options.UseBackColor = True
Me.PanelControl2.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
Me.PanelControl2.Controls.Add(Me.SimpleButton5)
Me.PanelControl2.Controls.Add(Me.SimpleButton4)
Me.PanelControl2.Controls.Add(Me.SimpleButton3)
Me.PanelControl2.Dock = System.Windows.Forms.DockStyle.Fill
Me.PanelControl2.Location = New System.Drawing.Point(0, 133)
Me.PanelControl2.Name = "PanelControl2"
Me.PanelControl2.Size = New System.Drawing.Size(718, 154)
Me.PanelControl2.TabIndex = 1
'
'SimpleButton5
'
Me.SimpleButton5.Appearance.BackColor = System.Drawing.Color.WhiteSmoke
Me.SimpleButton5.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton5.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton5.Appearance.Options.UseBackColor = True
Me.SimpleButton5.Appearance.Options.UseFont = True
Me.SimpleButton5.Appearance.Options.UseForeColor = True
Me.SimpleButton5.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton5.Location = New System.Drawing.Point(424, 42)
Me.SimpleButton5.Name = "SimpleButton5"
Me.SimpleButton5.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton5.Size = New System.Drawing.Size(143, 60)
Me.SimpleButton5.TabIndex = 3
Me.SimpleButton5.Text = "... und mir"
'
'SimpleButton4
'
Me.SimpleButton4.Appearance.BackColor = System.Drawing.Color.Wheat
Me.SimpleButton4.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton4.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton4.Appearance.Options.UseBackColor = True
Me.SimpleButton4.Appearance.Options.UseFont = True
Me.SimpleButton4.Appearance.Options.UseForeColor = True
Me.SimpleButton4.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton4.Location = New System.Drawing.Point(195, 42)
Me.SimpleButton4.Name = "SimpleButton4"
Me.SimpleButton4.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton4.Size = New System.Drawing.Size(223, 60)
Me.SimpleButton4.TabIndex = 2
Me.SimpleButton4.Text = "Alle Dateien von heute"
'
'SimpleButton3
'
Me.SimpleButton3.Appearance.BackColor = System.Drawing.Color.WhiteSmoke
Me.SimpleButton3.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton3.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton3.Appearance.Options.UseBackColor = True
Me.SimpleButton3.Appearance.Options.UseFont = True
Me.SimpleButton3.Appearance.Options.UseForeColor = True
Me.SimpleButton3.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton3.Location = New System.Drawing.Point(12, 47)
Me.SimpleButton3.Name = "SimpleButton3"
Me.SimpleButton3.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton3.Size = New System.Drawing.Size(154, 49)
Me.SimpleButton3.TabIndex = 1
Me.SimpleButton3.Text = "Datei anzeigen"
'
'PictureEdit1
'
Me.PictureEdit1.EditValue = CType(resources.GetObject("PictureEdit1.EditValue"), Object)
Me.PictureEdit1.Location = New System.Drawing.Point(12, 22)
Me.PictureEdit1.Name = "PictureEdit1"
Me.PictureEdit1.Properties.Appearance.BackColor = System.Drawing.Color.DarkRed
Me.PictureEdit1.Properties.Appearance.Options.UseBackColor = True
Me.PictureEdit1.Properties.ShowCameraMenuItem = DevExpress.XtraEditors.Controls.CameraMenuItemVisibility.[Auto]
Me.PictureEdit1.Properties.SizeMode = DevExpress.XtraEditors.Controls.PictureSizeMode.Zoom
Me.PictureEdit1.Size = New System.Drawing.Size(100, 96)
Me.PictureEdit1.TabIndex = 0
'
'frmFileFlow_Duplicate
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 17.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(718, 287)
Me.Controls.Add(Me.PanelControl2)
Me.Controls.Add(Me.PanelControl1)
Me.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Margin = New System.Windows.Forms.Padding(3, 4, 3, 4)
Me.Name = "frmFileFlow_Duplicate"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Hinweis"
Me.TopMost = True
CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.PanelControl1.ResumeLayout(False)
Me.PanelControl1.PerformLayout()
CType(Me.PanelControl2, System.ComponentModel.ISupportInitialize).EndInit()
Me.PanelControl2.ResumeLayout(False)
CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents PanelControl1 As DevExpress.XtraEditors.PanelControl
Friend WithEvents SimpleButton2 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents LabelControlMessage As DevExpress.XtraEditors.LabelControl
Friend WithEvents PictureEdit1 As DevExpress.XtraEditors.PictureEdit
Friend WithEvents PanelControl2 As DevExpress.XtraEditors.PanelControl
Friend WithEvents SimpleButton5 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton4 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton3 As DevExpress.XtraEditors.SimpleButton
End Class

View File

@ -0,0 +1,258 @@
<?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="SimpleButton2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANcBAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlJlZHtmaWxsOiNEMTFDMUM7fQo8L3N0
eWxlPg0KICA8cGF0aCBkPSJNMTYsMkM4LjMsMiwyLDguMywyLDE2czYuMywxNCwxNCwxNHMxNC02LjMs
MTQtMTRTMjMuNywyLDE2LDJ6IE0yMywyMGwtMywzbC00LTRsLTQsNGwtMy0zbDQtNGwtNC00bDMtM2w0
LDQgIGw0LTRsMywzbC00LDRMMjMsMjB6IiBjbGFzcz0iUmVkIiAvPg0KPC9zdmc+Cw==
</value>
</data>
<data name="SimpleButton1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALYDAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
R3JlZW57ZmlsbDojMDM5QzIzO30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTgsMTZWNkg1QzQuNCw2LDQs
Ni40LDQsN3YyMmMwLDAuNiwwLjQsMSwxLDFoMjJjMC42LDAsMS0wLjQsMS0xVjE2SDh6IE04LDI2di02
aDE2djZIOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgPHBhdGggZD0iTTE4LDZoLTh2OGg4VjZ6IE0xNCwx
MmgtMlY4aDJWMTJ6IiBjbGFzcz0iQmxhY2siIC8+DQogIDxwYXRoIGQ9Ik0yNiwyYy0zLjMsMC02LDIu
Ny02LDZzMi43LDYsNiw2czYtMi43LDYtNlMyOS4zLDIsMjYsMnogTTI2LDExLjhjLTAuNCwwLTAuNy0w
LjMtMC43LTAuNyAgYzAtMC40LDAuMy0wLjcsMC43LTAuN3MwLjcsMC4zLDAuNywwLjdDMjYuNywxMS41
LDI2LjQsMTEuOCwyNiwxMS44eiBNMjYuNyw5LjR2MC4zaC0xLjRWOS41YzAtMC4zLDAuMS0xLjEsMC42
LTEuNSAgYzAuMi0wLjIsMS40LTAuNiwxLjYtMS43YzAtMC4zLTAuMS0wLjUtMC4zLTAuN3MtMC41LTAu
My0wLjktMC4zYy0wLjksMC0xLjQsMS0xLjQsMS40aC0xLjRjMC0wLjgsMC4zLTEuNCwwLjgtMS45czEu
Mi0wLjcsMi0wLjcgIHMxLjUsMC4yLDEuOSwwLjZjMC41LDAuNCwwLjcsMC45LDAuNywxLjZDMjguNiw4
LjIsMjYuNyw4LjUsMjYuNyw5LjR6IiBjbGFzcz0iR3JlZW4iIC8+DQo8L3N2Zz4L
</value>
</data>
<data name="SimpleButton5.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAL8FAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iTWVldGluZyI+DQogICAgPHJlY3Qg
eD0iMTAiIHk9IjE0IiB3aWR0aD0iNCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJSZWQi
IC8+DQogICAgPGcgY2xhc3M9InN0MCI+DQogICAgICA8cGF0aCBkPSJNMTQsMjRoLTR2LTRoNFYyNHog
TTIwLDIwaC00djRoNFYyMHogTTI2LDhoLTR2NGg0Vjh6IE0yMCwxNGgtNHY0aDRWMTR6IE0yMCw4aC00
djRoNFY4eiBNMTQsOGgtNHY0aDRWOHogICAgIE04LDhINHY0aDRWOHogTTgsMTRINHY0aDRWMTR6IE04
LDIwSDR2NGg0VjIweiIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDwvZz4NCiAgICA8cGF0aCBkPSJNMTgu
NiwyNkgyVjZoMjZ2Ni40YzAuOSwwLjMsMS41LDAuOCwyLDEuM1YzYzAtMC42LTAuNC0xLTEtMUgxQzAu
NCwyLDAsMi40LDAsM3YyNGMwLDAuNiwwLjQsMSwxLDFoMTcuMSAgIEMxOC4xLDI3LjIsMTguMywyNi41
LDE4LjYsMjZ6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHBhdGggZD0iTTMyLDI5LjFWMzBIMjB2LTAu
OWMwLTQsMi4zLTMuMywzLjYtNC42YzAuNSwwLjgsMS4zLDEuNSwyLjQsMS41YzEuMSwwLDEuOS0wLjYs
Mi41LTEuNCAgIEMyOS44LDI1LjgsMzIsMjUuMSwzMiwyOS4xeiBNMjIuOSwyMC44djAuMWMwLjQsMS41
LDEuMywzLjEsMy4xLDMuMXMyLjgtMS42LDMuMi0zLjF2LTAuMWMwLjcsMCwwLjQtMC43LDAuNi0xczAu
My0wLjUsMC4yLTAuOSAgIGMtMC4xLTAuMy0wLjMtMC4yLTAuNC0wLjJjMS4yLTMuMS0wLjctMi45LTAu
Ny0yLjlTMjguNywxNCwyNS4yLDE0Yy0zLjIsMC0zLjYsMi41LTIuOSw0LjdjMCwwLjEtMC4yLDAuMS0w
LjMsMC4yICAgYy0wLjEsMC40LDAuMSwwLjYsMC4zLDAuOVMyMi4yLDIwLjgsMjIuOSwyMC44eiIgY2xh
c3M9IkJsdWUiIC8+DQogIDwvZz4NCjwvc3ZnPgs=
</value>
</data>
<data name="SimpleButton4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAP4DAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iVG9kYXkiPg0KICAgIDxwYXRoIGQ9
Ik0yOSwwSDFDMC41LDAsMCwwLjUsMCwxdjMwYzAsMC41LDAuNSwxLDEsMWgyOGMwLjUsMCwxLTAuNSwx
LTFWMUMzMCwwLjUsMjkuNSwwLDI5LDB6IE0yOCwzMEgyVjRoMjZWMzB6IiBjbGFzcz0iQmxhY2siIC8+
DQogICAgPGcgY2xhc3M9InN0MCI+DQogICAgICA8cGF0aCBkPSJNMTAsMTJINFY2aDZWMTJ6IE0xOCw2
aC02djZoNlY2eiBNMjYsNmgtNnY2aDZWNnogTTI2LDE0aC02djZoNlYxNHogTTEwLDIySDR2Nmg2VjIy
eiBNMTgsMjJoLTZ2Nmg2VjIyeiAgICAgTTI2LDIyaC02djZoNlYyMnogTTEwLDE0SDR2Nmg2VjE0eiIg
Y2xhc3M9IkJsYWNrIiAvPg0KICAgIDwvZz4NCiAgICA8cmVjdCB4PSIxMiIgeT0iMTQiIHdpZHRoPSI2
IiBoZWlnaHQ9IjYiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkdyZWVuIiAvPg0KICA8L2c+DQo8L3N2Zz4L
</value>
</data>
<data name="SimpleButton3.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOMCAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjc1O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlNpbmdsZVBhZ2VWaWV3Ij4NCiAgICA8cGF0aCBk
PSJNMjcsMEgzQzIuNCwwLDIsMC40LDIsMXYyOGMwLDAuNiwwLjQsMSwxLDFoMjRjMC42LDAsMS0wLjQs
MS0xVjFDMjgsMC40LDI3LjYsMCwyNywweiBNMjYsMjhINFYyaDIyVjI4eiIgY2xhc3M9IkJsYWNrIiAv
Pg0KICAgIDxwYXRoIGQ9Ik0yMiw4SDhWNmgxNFY4eiBNMjIsMTBIOHYyaDE0VjEweiBNMjIsMTRIOHYy
aDE0VjE0eiBNMjIsMThIOHYyaDE0VjE4eiBNMjIsMjJIOHYyaDE0VjIyeiIgY2xhc3M9IkJsdWUiIC8+
DQogIDwvZz4NCjwvc3ZnPgs=
</value>
</data>
<data name="PictureEdit1.EditValue" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKEDAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlVzZXIiPg0KICAgIDxwYXRoIGQ9Ik0xMCw5LjljLTAu
MSwwLjUsMC4yLDAuOSwwLjQsMS40YzAuMiwwLjUtMC4xLDEuNywwLjksMS42YzAsMCwwLDAuMSwwLDAu
MmMwLjYsMi4zLDIsNC45LDQuNyw0LjkgICBjMi43LDAsNC4yLTIuNiw0LjctNC45YzAsMCwwLTAuMSww
LTAuMWMxLDAuMSwwLjYtMS4xLDAuOS0xLjZjMC4yLTAuNSwwLjQtMC45LDAuMy0xLjRjLTAuMS0wLjQt
MC40LTAuNC0wLjUtMC4zICAgYzEuOC00LjktMS4xLTQuNy0xLjEtNC43UzIwLDIsMTQuOCwyQzEwLDIs
OS40LDYsMTAuNSw5LjZDMTAuNCw5LjYsMTAuMSw5LjcsMTAsOS45eiIgY2xhc3M9IkJsYWNrIiAvPg0K
ICAgIDxwYXRoIGQ9Ik0yMCwxOGMtMC44LDEuNS0yLjEsNC00LDRjLTEuOSwwLTMuMi0yLjUtNC00Yy0y
LjMsMy41LTgsMS04LDguNVYzMGgyNHYtMy41QzI4LDE5LjEsMjIuMywyMS40LDIwLDE4eiIgY2xhc3M9
IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L
</value>
</data>
</root>

View File

@ -0,0 +1,22 @@
Public Class frmFileFlow_Duplicate
Dim omessagetext As String
Public Sub New(pLanguage As String, pFilename As String, pDate As String, pDocumentID As Long)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
If pLanguage = "de-DE" Then
omessagetext = $"Die Datei [{pFilename}] wurde bereits am [{pDate}] verarbeitet. Wollen Sie die gleiche Datei noch einmal verarbeiten?"
Else
omessagetext = $"The file [{pFilename}] has already been processed at [{pDate}]. Do you want to process the same file again?"
End If
End Sub
Private Sub frmFileFlow_Duplicate_Load(sender As Object, e As EventArgs) Handles Me.Load
LabelControlMessage.Text = omessagetext
End Sub
End Class

View File

@ -0,0 +1,30 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmFileFlow_Success
Inherits System.Windows.Forms.Form
'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()
components = New System.ComponentModel.Container
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(800, 450)
Me.Text = "frmFileFlow_Success"
End Sub
End Class

View File

@ -0,0 +1,3 @@
Public Class frmFileFlow_Success
End Class

View File

@ -46,10 +46,8 @@ Partial Class frmAdmin_Globix
Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl() Me.XtraTabControl1 = New DevExpress.XtraTab.XtraTabControl()
Me.XtraTabPageProfile = New DevExpress.XtraTab.XtraTabPage() Me.XtraTabPageProfile = New DevExpress.XtraTab.XtraTabPage()
Me.LayoutControlProfile = New DevExpress.XtraLayout.LayoutControl() Me.LayoutControlProfile = New DevExpress.XtraLayout.LayoutControl()
Me.GridLookUpEdit1 = New DevExpress.XtraEditors.GridLookUpEdit()
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.GridLookUpEdit1View = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.IDB_DOCTYPE_IDComboBox = New System.Windows.Forms.ComboBox() Me.IDB_DOCTYPE_IDComboBox = New System.Windows.Forms.ComboBox()
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit() Me.TextEdit1 = New DevExpress.XtraEditors.TextEdit()
Me.IDB_OBJECT_STORE_IDComboBox = New System.Windows.Forms.ComboBox() Me.IDB_OBJECT_STORE_IDComboBox = New System.Windows.Forms.ComboBox()
Me.VWIDB_OBJECT_STOREBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.VWIDB_OBJECT_STOREBindingSource = New System.Windows.Forms.BindingSource(Me.components)
@ -80,7 +78,6 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem28 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem28 = New DevExpress.XtraLayout.LayoutControlItem()
Me.EmptySpaceItem12 = New DevExpress.XtraLayout.EmptySpaceItem() Me.EmptySpaceItem12 = New DevExpress.XtraLayout.EmptySpaceItem()
Me.LayoutControlItem61 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem61 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem12 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem7 = New DevExpress.XtraLayout.LayoutControlItem()
Me.LayoutControlItem22 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem22 = New DevExpress.XtraLayout.LayoutControlItem()
Me.XtraTabControl2 = New DevExpress.XtraTab.XtraTabControl() Me.XtraTabControl2 = New DevExpress.XtraTab.XtraTabControl()
@ -247,6 +244,7 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem38 = New DevExpress.XtraLayout.LayoutControlItem() Me.LayoutControlItem38 = New DevExpress.XtraLayout.LayoutControlItem()
Me.TBGI_REGEX_DOCTYPETableAdapter = New DigitalData.GUIs.ZooFlow.GlobixDatasetTableAdapters.TBGI_REGEX_DOCTYPETableAdapter() Me.TBGI_REGEX_DOCTYPETableAdapter = New DigitalData.GUIs.ZooFlow.GlobixDatasetTableAdapters.TBGI_REGEX_DOCTYPETableAdapter()
Me.VWIDB_DOCTYPE_LANGUAGETableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.VWIDB_DOCTYPE_LANGUAGETableAdapter() Me.VWIDB_DOCTYPE_LANGUAGETableAdapter = New DigitalData.GUIs.ZooFlow.DSIDB_StammdatenTableAdapters.VWIDB_DOCTYPE_LANGUAGETableAdapter()
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
SEQUENCELabel = New System.Windows.Forms.Label() SEQUENCELabel = New System.Windows.Forms.Label()
CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RibbonControl1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_DOKUMENTARTBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_DOKUMENTARTBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@ -257,9 +255,7 @@ Partial Class frmAdmin_Globix
Me.XtraTabPageProfile.SuspendLayout() Me.XtraTabPageProfile.SuspendLayout()
CType(Me.LayoutControlProfile, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlProfile, System.ComponentModel.ISupportInitialize).BeginInit()
Me.LayoutControlProfile.SuspendLayout() Me.LayoutControlProfile.SuspendLayout()
CType(Me.GridLookUpEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWIDB_DOCTYPE_LANGUAGEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.VWIDB_DOCTYPE_LANGUAGEBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GridLookUpEdit1View, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.VWIDB_OBJECT_STOREBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.VWIDB_OBJECT_STOREBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SEQUENCENumericUpDown, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SEQUENCENumericUpDown, System.ComponentModel.ISupportInitialize).BeginInit()
@ -288,7 +284,6 @@ Partial Class frmAdmin_Globix
CType(Me.LayoutControlItem28, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem28, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.EmptySpaceItem12, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.EmptySpaceItem12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem61, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem61, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).BeginInit()
@ -498,7 +493,6 @@ Partial Class frmAdmin_Globix
' '
'RibbonStatusBar1 'RibbonStatusBar1
' '
Me.RibbonStatusBar1.ItemLinks.Add(Me.labelStatus)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 752) Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 752)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1 Me.RibbonStatusBar1.Ribbon = Me.RibbonControl1
@ -577,7 +571,6 @@ Partial Class frmAdmin_Globix
' '
'LayoutControlProfile 'LayoutControlProfile
' '
Me.LayoutControlProfile.Controls.Add(Me.GridLookUpEdit1)
Me.LayoutControlProfile.Controls.Add(Me.IDB_DOCTYPE_IDComboBox) Me.LayoutControlProfile.Controls.Add(Me.IDB_DOCTYPE_IDComboBox)
Me.LayoutControlProfile.Controls.Add(Me.TextEdit1) Me.LayoutControlProfile.Controls.Add(Me.TextEdit1)
Me.LayoutControlProfile.Controls.Add(Me.IDB_OBJECT_STORE_IDComboBox) Me.LayoutControlProfile.Controls.Add(Me.IDB_OBJECT_STORE_IDComboBox)
@ -600,33 +593,6 @@ Partial Class frmAdmin_Globix
Me.LayoutControlProfile.TabIndex = 0 Me.LayoutControlProfile.TabIndex = 0
Me.LayoutControlProfile.Text = "LayoutControl1" Me.LayoutControlProfile.Text = "LayoutControl1"
' '
'GridLookUpEdit1
'
Me.GridLookUpEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "IDB_DOCTYPE_ID", True))
Me.GridLookUpEdit1.Location = New System.Drawing.Point(166, 76)
Me.GridLookUpEdit1.MenuManager = Me.RibbonControl1
Me.GridLookUpEdit1.Name = "GridLookUpEdit1"
Me.GridLookUpEdit1.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
Me.GridLookUpEdit1.Properties.DataSource = Me.VWIDB_DOCTYPE_LANGUAGEBindingSource
Me.GridLookUpEdit1.Properties.DisplayMember = "Doctype"
Me.GridLookUpEdit1.Properties.PopupView = Me.GridLookUpEdit1View
Me.GridLookUpEdit1.Properties.ValueMember = "Doctype_ID"
Me.GridLookUpEdit1.Size = New System.Drawing.Size(921, 20)
Me.GridLookUpEdit1.StyleController = Me.LayoutControlProfile
Me.GridLookUpEdit1.TabIndex = 61
'
'VWIDB_DOCTYPE_LANGUAGEBindingSource
'
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource.DataMember = "VWIDB_DOCTYPE_LANGUAGE"
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource.DataSource = Me.DSIDB_Stammdaten
'
'GridLookUpEdit1View
'
Me.GridLookUpEdit1View.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.RowFocus
Me.GridLookUpEdit1View.Name = "GridLookUpEdit1View"
Me.GridLookUpEdit1View.OptionsSelection.EnableAppearanceFocusedCell = False
Me.GridLookUpEdit1View.OptionsView.ShowGroupPanel = False
'
'IDB_DOCTYPE_IDComboBox 'IDB_DOCTYPE_IDComboBox
' '
Me.IDB_DOCTYPE_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBDD_DOKUMENTARTBindingSource, "IDB_DOCTYPE_ID", True)) Me.IDB_DOCTYPE_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBDD_DOKUMENTARTBindingSource, "IDB_DOCTYPE_ID", True))
@ -635,17 +601,22 @@ Partial Class frmAdmin_Globix
Me.IDB_DOCTYPE_IDComboBox.FormattingEnabled = True Me.IDB_DOCTYPE_IDComboBox.FormattingEnabled = True
Me.IDB_DOCTYPE_IDComboBox.Location = New System.Drawing.Point(166, 45) Me.IDB_DOCTYPE_IDComboBox.Location = New System.Drawing.Point(166, 45)
Me.IDB_DOCTYPE_IDComboBox.Name = "IDB_DOCTYPE_IDComboBox" Me.IDB_DOCTYPE_IDComboBox.Name = "IDB_DOCTYPE_IDComboBox"
Me.IDB_DOCTYPE_IDComboBox.Size = New System.Drawing.Size(380, 21) Me.IDB_DOCTYPE_IDComboBox.Size = New System.Drawing.Size(388, 21)
Me.IDB_DOCTYPE_IDComboBox.TabIndex = 60 Me.IDB_DOCTYPE_IDComboBox.TabIndex = 60
Me.IDB_DOCTYPE_IDComboBox.ValueMember = "Doctype_ID" Me.IDB_DOCTYPE_IDComboBox.ValueMember = "Doctype_ID"
' '
'VWIDB_DOCTYPE_LANGUAGEBindingSource
'
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource.DataMember = "VWIDB_DOCTYPE_LANGUAGE"
Me.VWIDB_DOCTYPE_LANGUAGEBindingSource.DataSource = Me.DSIDB_Stammdaten
'
'TextEdit1 'TextEdit1
' '
Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWANN", True)) Me.TextEdit1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWANN", True))
Me.TextEdit1.Location = New System.Drawing.Point(166, 257) Me.TextEdit1.Location = New System.Drawing.Point(166, 227)
Me.TextEdit1.MenuManager = Me.RibbonControl1 Me.TextEdit1.MenuManager = Me.RibbonControl1
Me.TextEdit1.Name = "TextEdit1" Me.TextEdit1.Name = "TextEdit1"
Me.TextEdit1.Size = New System.Drawing.Size(380, 20) Me.TextEdit1.Size = New System.Drawing.Size(388, 20)
Me.TextEdit1.StyleController = Me.LayoutControlProfile Me.TextEdit1.StyleController = Me.LayoutControlProfile
Me.TextEdit1.TabIndex = 59 Me.TextEdit1.TabIndex = 59
' '
@ -656,9 +627,9 @@ Partial Class frmAdmin_Globix
Me.IDB_OBJECT_STORE_IDComboBox.DataSource = Me.VWIDB_OBJECT_STOREBindingSource Me.IDB_OBJECT_STORE_IDComboBox.DataSource = Me.VWIDB_OBJECT_STOREBindingSource
Me.IDB_OBJECT_STORE_IDComboBox.DisplayMember = "Objectstore" Me.IDB_OBJECT_STORE_IDComboBox.DisplayMember = "Objectstore"
Me.IDB_OBJECT_STORE_IDComboBox.FormattingEnabled = True Me.IDB_OBJECT_STORE_IDComboBox.FormattingEnabled = True
Me.IDB_OBJECT_STORE_IDComboBox.Location = New System.Drawing.Point(166, 166) Me.IDB_OBJECT_STORE_IDComboBox.Location = New System.Drawing.Point(166, 136)
Me.IDB_OBJECT_STORE_IDComboBox.Name = "IDB_OBJECT_STORE_IDComboBox" Me.IDB_OBJECT_STORE_IDComboBox.Name = "IDB_OBJECT_STORE_IDComboBox"
Me.IDB_OBJECT_STORE_IDComboBox.Size = New System.Drawing.Size(380, 21) Me.IDB_OBJECT_STORE_IDComboBox.Size = New System.Drawing.Size(388, 21)
Me.IDB_OBJECT_STORE_IDComboBox.TabIndex = 57 Me.IDB_OBJECT_STORE_IDComboBox.TabIndex = 57
Me.IDB_OBJECT_STORE_IDComboBox.ValueMember = "GUID" Me.IDB_OBJECT_STORE_IDComboBox.ValueMember = "GUID"
' '
@ -670,10 +641,10 @@ Partial Class frmAdmin_Globix
'SEQUENCENumericUpDown 'SEQUENCENumericUpDown
' '
Me.SEQUENCENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBDD_INDEX_MANBindingSource, "SEQUENCE", True)) Me.SEQUENCENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBDD_INDEX_MANBindingSource, "SEQUENCE", True))
Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(395, 15) Me.SEQUENCENumericUpDown.Location = New System.Drawing.Point(399, 15)
Me.SEQUENCENumericUpDown.Minimum = New Decimal(New Integer() {1, 0, 0, 0}) Me.SEQUENCENumericUpDown.Minimum = New Decimal(New Integer() {1, 0, 0, 0})
Me.SEQUENCENumericUpDown.Name = "SEQUENCENumericUpDown" Me.SEQUENCENumericUpDown.Name = "SEQUENCENumericUpDown"
Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(34, 22) Me.SEQUENCENumericUpDown.Size = New System.Drawing.Size(37, 22)
Me.SEQUENCENumericUpDown.TabIndex = 56 Me.SEQUENCENumericUpDown.TabIndex = 56
Me.SEQUENCENumericUpDown.Value = New Decimal(New Integer() {1, 0, 0, 0}) Me.SEQUENCENumericUpDown.Value = New Decimal(New Integer() {1, 0, 0, 0})
' '
@ -685,50 +656,50 @@ Partial Class frmAdmin_Globix
'TextEditErstelltWer 'TextEditErstelltWer
' '
Me.TextEditErstelltWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWER", True)) Me.TextEditErstelltWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "ERSTELLTWER", True))
Me.TextEditErstelltWer.Location = New System.Drawing.Point(166, 227) Me.TextEditErstelltWer.Location = New System.Drawing.Point(166, 197)
Me.TextEditErstelltWer.MenuManager = Me.RibbonControl1 Me.TextEditErstelltWer.MenuManager = Me.RibbonControl1
Me.TextEditErstelltWer.Name = "TextEditErstelltWer" Me.TextEditErstelltWer.Name = "TextEditErstelltWer"
Me.TextEditErstelltWer.Size = New System.Drawing.Size(380, 20) Me.TextEditErstelltWer.Size = New System.Drawing.Size(388, 20)
Me.TextEditErstelltWer.StyleController = Me.LayoutControlProfile Me.TextEditErstelltWer.StyleController = Me.LayoutControlProfile
Me.TextEditErstelltWer.TabIndex = 44 Me.TextEditErstelltWer.TabIndex = 44
' '
'TextEditGeandertWer 'TextEditGeandertWer
' '
Me.TextEditGeandertWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "GEANDERTWER", True)) Me.TextEditGeandertWer.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "GEANDERTWER", True))
Me.TextEditGeandertWer.Location = New System.Drawing.Point(707, 227) Me.TextEditGeandertWer.Location = New System.Drawing.Point(715, 197)
Me.TextEditGeandertWer.MenuManager = Me.RibbonControl1 Me.TextEditGeandertWer.MenuManager = Me.RibbonControl1
Me.TextEditGeandertWer.Name = "TextEditGeandertWer" Me.TextEditGeandertWer.Name = "TextEditGeandertWer"
Me.TextEditGeandertWer.Size = New System.Drawing.Size(380, 20) Me.TextEditGeandertWer.Size = New System.Drawing.Size(389, 20)
Me.TextEditGeandertWer.StyleController = Me.LayoutControlProfile Me.TextEditGeandertWer.StyleController = Me.LayoutControlProfile
Me.TextEditGeandertWer.TabIndex = 45 Me.TextEditGeandertWer.TabIndex = 45
' '
'TextEditNamenkonvention 'TextEditNamenkonvention
' '
Me.TextEditNamenkonvention.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "NAMENKONVENTION", True)) Me.TextEditNamenkonvention.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "NAMENKONVENTION", True))
Me.TextEditNamenkonvention.Location = New System.Drawing.Point(166, 136) Me.TextEditNamenkonvention.Location = New System.Drawing.Point(166, 106)
Me.TextEditNamenkonvention.MenuManager = Me.RibbonControl1 Me.TextEditNamenkonvention.MenuManager = Me.RibbonControl1
Me.TextEditNamenkonvention.Name = "TextEditNamenkonvention" Me.TextEditNamenkonvention.Name = "TextEditNamenkonvention"
Me.TextEditNamenkonvention.Size = New System.Drawing.Size(662, 20) Me.TextEditNamenkonvention.Size = New System.Drawing.Size(675, 20)
Me.TextEditNamenkonvention.StyleController = Me.LayoutControlProfile Me.TextEditNamenkonvention.StyleController = Me.LayoutControlProfile
Me.TextEditNamenkonvention.TabIndex = 46 Me.TextEditNamenkonvention.TabIndex = 46
' '
'TextEditBeschreibung 'TextEditBeschreibung
' '
Me.TextEditBeschreibung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BESCHREIBUNG", True)) Me.TextEditBeschreibung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BESCHREIBUNG", True))
Me.TextEditBeschreibung.Location = New System.Drawing.Point(166, 197) Me.TextEditBeschreibung.Location = New System.Drawing.Point(166, 167)
Me.TextEditBeschreibung.MenuManager = Me.RibbonControl1 Me.TextEditBeschreibung.MenuManager = Me.RibbonControl1
Me.TextEditBeschreibung.Name = "TextEditBeschreibung" Me.TextEditBeschreibung.Name = "TextEditBeschreibung"
Me.TextEditBeschreibung.Size = New System.Drawing.Size(921, 20) Me.TextEditBeschreibung.Size = New System.Drawing.Size(938, 20)
Me.TextEditBeschreibung.StyleController = Me.LayoutControlProfile Me.TextEditBeschreibung.StyleController = Me.LayoutControlProfile
Me.TextEditBeschreibung.TabIndex = 48 Me.TextEditBeschreibung.TabIndex = 48
' '
'TextEditBezeichnung 'TextEditBezeichnung
' '
Me.TextEditBezeichnung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BEZEICHNUNG", True)) Me.TextEditBezeichnung.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_DOKUMENTARTBindingSource, "BEZEICHNUNG", True))
Me.TextEditBezeichnung.Location = New System.Drawing.Point(707, 45) Me.TextEditBezeichnung.Location = New System.Drawing.Point(715, 45)
Me.TextEditBezeichnung.MenuManager = Me.RibbonControl1 Me.TextEditBezeichnung.MenuManager = Me.RibbonControl1
Me.TextEditBezeichnung.Name = "TextEditBezeichnung" Me.TextEditBezeichnung.Name = "TextEditBezeichnung"
Me.TextEditBezeichnung.Size = New System.Drawing.Size(380, 20) Me.TextEditBezeichnung.Size = New System.Drawing.Size(389, 20)
Me.TextEditBezeichnung.StyleController = Me.LayoutControlProfile Me.TextEditBezeichnung.StyleController = Me.LayoutControlProfile
Me.TextEditBezeichnung.TabIndex = 51 Me.TextEditBezeichnung.TabIndex = 51
' '
@ -738,19 +709,19 @@ Partial Class frmAdmin_Globix
Me.TextEditDoctypeID.Location = New System.Drawing.Point(166, 15) Me.TextEditDoctypeID.Location = New System.Drawing.Point(166, 15)
Me.TextEditDoctypeID.MenuManager = Me.RibbonControl1 Me.TextEditDoctypeID.MenuManager = Me.RibbonControl1
Me.TextEditDoctypeID.Name = "TextEditDoctypeID" Me.TextEditDoctypeID.Name = "TextEditDoctypeID"
Me.TextEditDoctypeID.Size = New System.Drawing.Size(68, 20) Me.TextEditDoctypeID.Size = New System.Drawing.Size(72, 20)
Me.TextEditDoctypeID.StyleController = Me.LayoutControlProfile Me.TextEditDoctypeID.StyleController = Me.LayoutControlProfile
Me.TextEditDoctypeID.TabIndex = 52 Me.TextEditDoctypeID.TabIndex = 52
' '
'ComboBoxEditDupl_handling 'ComboBoxEditDupl_handling
' '
Me.ComboBoxEditDupl_handling.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "DUPLICATE_HANDLING", True)) Me.ComboBoxEditDupl_handling.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "DUPLICATE_HANDLING", True))
Me.ComboBoxEditDupl_handling.Location = New System.Drawing.Point(166, 106) Me.ComboBoxEditDupl_handling.Location = New System.Drawing.Point(166, 76)
Me.ComboBoxEditDupl_handling.MenuManager = Me.RibbonControl1 Me.ComboBoxEditDupl_handling.MenuManager = Me.RibbonControl1
Me.ComboBoxEditDupl_handling.Name = "ComboBoxEditDupl_handling" Me.ComboBoxEditDupl_handling.Name = "ComboBoxEditDupl_handling"
Me.ComboBoxEditDupl_handling.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)}) Me.ComboBoxEditDupl_handling.Properties.Buttons.AddRange(New DevExpress.XtraEditors.Controls.EditorButton() {New DevExpress.XtraEditors.Controls.EditorButton(DevExpress.XtraEditors.Controls.ButtonPredefines.Combo)})
Me.ComboBoxEditDupl_handling.Properties.Items.AddRange(New Object() {"New version", "Default", "Question"}) Me.ComboBoxEditDupl_handling.Properties.Items.AddRange(New Object() {"New version", "Default", "Question"})
Me.ComboBoxEditDupl_handling.Size = New System.Drawing.Size(921, 20) Me.ComboBoxEditDupl_handling.Size = New System.Drawing.Size(938, 20)
Me.ComboBoxEditDupl_handling.StyleController = Me.LayoutControlProfile Me.ComboBoxEditDupl_handling.StyleController = Me.LayoutControlProfile
Me.ComboBoxEditDupl_handling.TabIndex = 54 Me.ComboBoxEditDupl_handling.TabIndex = 54
' '
@ -758,9 +729,9 @@ Partial Class frmAdmin_Globix
' '
Me.SimpleButtonNameconvention.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButtonNameconvention.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage) Me.SimpleButtonNameconvention.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButtonNameconvention.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButtonNameconvention.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16) Me.SimpleButtonNameconvention.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
Me.SimpleButtonNameconvention.Location = New System.Drawing.Point(835, 133) Me.SimpleButtonNameconvention.Location = New System.Drawing.Point(848, 103)
Me.SimpleButtonNameconvention.Name = "SimpleButtonNameconvention" Me.SimpleButtonNameconvention.Name = "SimpleButtonNameconvention"
Me.SimpleButtonNameconvention.Size = New System.Drawing.Size(255, 22) Me.SimpleButtonNameconvention.Size = New System.Drawing.Size(259, 22)
Me.SimpleButtonNameconvention.StyleController = Me.LayoutControlProfile Me.SimpleButtonNameconvention.StyleController = Me.LayoutControlProfile
Me.SimpleButtonNameconvention.TabIndex = 58 Me.SimpleButtonNameconvention.TabIndex = 58
Me.SimpleButtonNameconvention.Text = "Editor" Me.SimpleButtonNameconvention.Text = "Editor"
@ -768,21 +739,21 @@ Partial Class frmAdmin_Globix
'CheckEdit1 'CheckEdit1
' '
Me.CheckEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "AKTIV", True)) Me.CheckEdit1.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "AKTIV", True))
Me.CheckEdit1.Location = New System.Drawing.Point(439, 15) Me.CheckEdit1.Location = New System.Drawing.Point(446, 15)
Me.CheckEdit1.MenuManager = Me.RibbonControl1 Me.CheckEdit1.MenuManager = Me.RibbonControl1
Me.CheckEdit1.Name = "CheckEdit1" Me.CheckEdit1.Name = "CheckEdit1"
Me.CheckEdit1.Properties.Caption = "Aktiv" Me.CheckEdit1.Properties.Caption = "Aktiv"
Me.CheckEdit1.Size = New System.Drawing.Size(648, 20) Me.CheckEdit1.Size = New System.Drawing.Size(658, 20)
Me.CheckEdit1.StyleController = Me.LayoutControlProfile Me.CheckEdit1.StyleController = Me.LayoutControlProfile
Me.CheckEdit1.TabIndex = 62 Me.CheckEdit1.TabIndex = 62
' '
'TextEditGeaendertWann 'TextEditGeaendertWann
' '
Me.TextEditGeaendertWann.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "GEAENDERTWANN", True)) Me.TextEditGeaendertWann.DataBindings.Add(New System.Windows.Forms.Binding("EditValue", Me.TBDD_DOKUMENTARTBindingSource, "GEAENDERTWANN", True))
Me.TextEditGeaendertWann.Location = New System.Drawing.Point(707, 257) Me.TextEditGeaendertWann.Location = New System.Drawing.Point(715, 227)
Me.TextEditGeaendertWann.MenuManager = Me.RibbonControl1 Me.TextEditGeaendertWann.MenuManager = Me.RibbonControl1
Me.TextEditGeaendertWann.Name = "TextEditGeaendertWann" Me.TextEditGeaendertWann.Name = "TextEditGeaendertWann"
Me.TextEditGeaendertWann.Size = New System.Drawing.Size(380, 20) Me.TextEditGeaendertWann.Size = New System.Drawing.Size(389, 20)
Me.TextEditGeaendertWann.StyleController = Me.LayoutControlProfile Me.TextEditGeaendertWann.StyleController = Me.LayoutControlProfile
Me.TextEditGeaendertWann.TabIndex = 63 Me.TextEditGeaendertWann.TabIndex = 63
' '
@ -790,18 +761,18 @@ Partial Class frmAdmin_Globix
' '
Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True] Me.Root.EnableIndentsWithoutBorders = DevExpress.Utils.DefaultBoolean.[True]
Me.Root.GroupBordersVisible = False Me.Root.GroupBordersVisible = False
Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem10, Me.LayoutControlItem3, Me.LayoutControlItem30, Me.LayoutControlItem20, Me.LayoutControlItem4, Me.LayoutControlItem25, Me.EmptySpaceItem3, Me.LayoutControlItem26, Me.LayoutControlItem1, Me.LayoutControlItem32, Me.LayoutControlItem5, Me.LayoutControlItem28, Me.EmptySpaceItem12, Me.LayoutControlItem61, Me.LayoutControlItem12, Me.LayoutControlItem7, Me.LayoutControlItem22}) Me.Root.Items.AddRange(New DevExpress.XtraLayout.BaseLayoutItem() {Me.LayoutControlItem10, Me.LayoutControlItem3, Me.LayoutControlItem30, Me.LayoutControlItem20, Me.LayoutControlItem4, Me.LayoutControlItem25, Me.EmptySpaceItem3, Me.LayoutControlItem26, Me.LayoutControlItem1, Me.LayoutControlItem32, Me.LayoutControlItem5, Me.LayoutControlItem28, Me.EmptySpaceItem12, Me.LayoutControlItem61, Me.LayoutControlItem7, Me.LayoutControlItem22})
Me.Root.Name = "Root" Me.Root.Name = "Root"
Me.Root.Size = New System.Drawing.Size(1102, 302) Me.Root.Size = New System.Drawing.Size(1119, 280)
Me.Root.TextVisible = False Me.Root.TextVisible = False
' '
'LayoutControlItem10 'LayoutControlItem10
' '
Me.LayoutControlItem10.Control = Me.TextEditBezeichnung Me.LayoutControlItem10.Control = Me.TextEditBezeichnung
Me.LayoutControlItem10.Location = New System.Drawing.Point(541, 30) Me.LayoutControlItem10.Location = New System.Drawing.Point(549, 30)
Me.LayoutControlItem10.Name = "LayoutControlItem10" Me.LayoutControlItem10.Name = "LayoutControlItem10"
Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem10.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem10.Size = New System.Drawing.Size(541, 31) Me.LayoutControlItem10.Size = New System.Drawing.Size(550, 31)
Me.LayoutControlItem10.Text = "Bezeichnung" Me.LayoutControlItem10.Text = "Bezeichnung"
Me.LayoutControlItem10.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem10.TextSize = New System.Drawing.Size(139, 13)
' '
@ -811,20 +782,20 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem3.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem3.AppearanceItemCaption.Options.UseFont = True
Me.LayoutControlItem3.Control = Me.TextEditErstelltWer Me.LayoutControlItem3.Control = Me.TextEditErstelltWer
Me.LayoutControlItem3.Enabled = False Me.LayoutControlItem3.Enabled = False
Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 212) Me.LayoutControlItem3.Location = New System.Drawing.Point(0, 182)
Me.LayoutControlItem3.Name = "LayoutControlItem3" Me.LayoutControlItem3.Name = "LayoutControlItem3"
Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem3.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem3.Size = New System.Drawing.Size(541, 30) Me.LayoutControlItem3.Size = New System.Drawing.Size(549, 30)
Me.LayoutControlItem3.Text = "Erstellt wer" Me.LayoutControlItem3.Text = "Erstellt wer"
Me.LayoutControlItem3.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem3.TextSize = New System.Drawing.Size(139, 13)
' '
'LayoutControlItem30 'LayoutControlItem30
' '
Me.LayoutControlItem30.Control = Me.TextEditNamenkonvention Me.LayoutControlItem30.Control = Me.TextEditNamenkonvention
Me.LayoutControlItem30.Location = New System.Drawing.Point(0, 121) Me.LayoutControlItem30.Location = New System.Drawing.Point(0, 91)
Me.LayoutControlItem30.Name = "LayoutControlItem30" Me.LayoutControlItem30.Name = "LayoutControlItem30"
Me.LayoutControlItem30.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem30.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem30.Size = New System.Drawing.Size(823, 30) Me.LayoutControlItem30.Size = New System.Drawing.Size(836, 30)
Me.LayoutControlItem30.Text = "Namenkonvention" Me.LayoutControlItem30.Text = "Namenkonvention"
Me.LayoutControlItem30.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem30.TextSize = New System.Drawing.Size(139, 13)
' '
@ -832,10 +803,10 @@ Partial Class frmAdmin_Globix
' '
Me.LayoutControlItem20.Control = Me.SEQUENCENumericUpDown Me.LayoutControlItem20.Control = Me.SEQUENCENumericUpDown
Me.LayoutControlItem20.CustomizationFormText = "SEQUENCE" Me.LayoutControlItem20.CustomizationFormText = "SEQUENCE"
Me.LayoutControlItem20.Location = New System.Drawing.Point(229, 0) Me.LayoutControlItem20.Location = New System.Drawing.Point(233, 0)
Me.LayoutControlItem20.Name = "LayoutControlItem20" Me.LayoutControlItem20.Name = "LayoutControlItem20"
Me.LayoutControlItem20.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem20.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem20.Size = New System.Drawing.Size(195, 30) Me.LayoutControlItem20.Size = New System.Drawing.Size(198, 30)
Me.LayoutControlItem20.Text = "Reihenfolge" Me.LayoutControlItem20.Text = "Reihenfolge"
Me.LayoutControlItem20.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem20.TextSize = New System.Drawing.Size(139, 13)
' '
@ -847,7 +818,7 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 0) Me.LayoutControlItem4.Location = New System.Drawing.Point(0, 0)
Me.LayoutControlItem4.Name = "LayoutControlItem4" Me.LayoutControlItem4.Name = "LayoutControlItem4"
Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem4.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem4.Size = New System.Drawing.Size(229, 30) Me.LayoutControlItem4.Size = New System.Drawing.Size(233, 30)
Me.LayoutControlItem4.Text = "ID" Me.LayoutControlItem4.Text = "ID"
Me.LayoutControlItem4.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem4.TextSize = New System.Drawing.Size(139, 13)
' '
@ -856,37 +827,37 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem25.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.LayoutControlItem25.AppearanceItemCaption.Font = New System.Drawing.Font("Segoe UI", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Italic), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LayoutControlItem25.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem25.AppearanceItemCaption.Options.UseFont = True
Me.LayoutControlItem25.Control = Me.IDB_OBJECT_STORE_IDComboBox Me.LayoutControlItem25.Control = Me.IDB_OBJECT_STORE_IDComboBox
Me.LayoutControlItem25.Location = New System.Drawing.Point(0, 151) Me.LayoutControlItem25.Location = New System.Drawing.Point(0, 121)
Me.LayoutControlItem25.Name = "LayoutControlItem25" Me.LayoutControlItem25.Name = "LayoutControlItem25"
Me.LayoutControlItem25.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem25.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem25.Size = New System.Drawing.Size(541, 31) Me.LayoutControlItem25.Size = New System.Drawing.Size(549, 31)
Me.LayoutControlItem25.Text = "File-Store:" Me.LayoutControlItem25.Text = "File-Store:"
Me.LayoutControlItem25.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem25.TextSize = New System.Drawing.Size(139, 13)
' '
'EmptySpaceItem3 'EmptySpaceItem3
' '
Me.EmptySpaceItem3.AllowHotTrack = False Me.EmptySpaceItem3.AllowHotTrack = False
Me.EmptySpaceItem3.Location = New System.Drawing.Point(0, 272) Me.EmptySpaceItem3.Location = New System.Drawing.Point(0, 242)
Me.EmptySpaceItem3.Name = "EmptySpaceItem3" Me.EmptySpaceItem3.Name = "EmptySpaceItem3"
Me.EmptySpaceItem3.Size = New System.Drawing.Size(1082, 10) Me.EmptySpaceItem3.Size = New System.Drawing.Size(1099, 18)
Me.EmptySpaceItem3.TextSize = New System.Drawing.Size(0, 0) Me.EmptySpaceItem3.TextSize = New System.Drawing.Size(0, 0)
' '
'LayoutControlItem26 'LayoutControlItem26
' '
Me.LayoutControlItem26.Control = Me.ComboBoxEditDupl_handling Me.LayoutControlItem26.Control = Me.ComboBoxEditDupl_handling
Me.LayoutControlItem26.Location = New System.Drawing.Point(0, 91) Me.LayoutControlItem26.Location = New System.Drawing.Point(0, 61)
Me.LayoutControlItem26.Name = "LayoutControlItem26" Me.LayoutControlItem26.Name = "LayoutControlItem26"
Me.LayoutControlItem26.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem26.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem26.Size = New System.Drawing.Size(1082, 30) Me.LayoutControlItem26.Size = New System.Drawing.Size(1099, 30)
Me.LayoutControlItem26.Text = "Verhalten Datei vorhanden" Me.LayoutControlItem26.Text = "Verhalten Datei vorhanden"
Me.LayoutControlItem26.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem26.TextSize = New System.Drawing.Size(139, 13)
' '
'LayoutControlItem1 'LayoutControlItem1
' '
Me.LayoutControlItem1.Control = Me.SimpleButtonNameconvention Me.LayoutControlItem1.Control = Me.SimpleButtonNameconvention
Me.LayoutControlItem1.Location = New System.Drawing.Point(823, 121) Me.LayoutControlItem1.Location = New System.Drawing.Point(836, 91)
Me.LayoutControlItem1.Name = "LayoutControlItem1" Me.LayoutControlItem1.Name = "LayoutControlItem1"
Me.LayoutControlItem1.Size = New System.Drawing.Size(259, 30) Me.LayoutControlItem1.Size = New System.Drawing.Size(263, 30)
Me.LayoutControlItem1.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem1.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem1.TextVisible = False Me.LayoutControlItem1.TextVisible = False
' '
@ -896,10 +867,10 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem32.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem32.AppearanceItemCaption.Options.UseFont = True
Me.LayoutControlItem32.Control = Me.TextEdit1 Me.LayoutControlItem32.Control = Me.TextEdit1
Me.LayoutControlItem32.Enabled = False Me.LayoutControlItem32.Enabled = False
Me.LayoutControlItem32.Location = New System.Drawing.Point(0, 242) Me.LayoutControlItem32.Location = New System.Drawing.Point(0, 212)
Me.LayoutControlItem32.Name = "LayoutControlItem32" Me.LayoutControlItem32.Name = "LayoutControlItem32"
Me.LayoutControlItem32.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem32.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem32.Size = New System.Drawing.Size(541, 30) Me.LayoutControlItem32.Size = New System.Drawing.Size(549, 30)
Me.LayoutControlItem32.Text = "Erstellt wann" Me.LayoutControlItem32.Text = "Erstellt wann"
Me.LayoutControlItem32.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem32.TextSize = New System.Drawing.Size(139, 13)
' '
@ -909,29 +880,29 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem5.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem5.AppearanceItemCaption.Options.UseFont = True
Me.LayoutControlItem5.Control = Me.TextEditGeandertWer Me.LayoutControlItem5.Control = Me.TextEditGeandertWer
Me.LayoutControlItem5.Enabled = False Me.LayoutControlItem5.Enabled = False
Me.LayoutControlItem5.Location = New System.Drawing.Point(541, 212) Me.LayoutControlItem5.Location = New System.Drawing.Point(549, 182)
Me.LayoutControlItem5.Name = "LayoutControlItem5" Me.LayoutControlItem5.Name = "LayoutControlItem5"
Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem5.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem5.Size = New System.Drawing.Size(541, 30) Me.LayoutControlItem5.Size = New System.Drawing.Size(550, 30)
Me.LayoutControlItem5.Text = "Geändert wer" Me.LayoutControlItem5.Text = "Geändert wer"
Me.LayoutControlItem5.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem5.TextSize = New System.Drawing.Size(139, 13)
' '
'LayoutControlItem28 'LayoutControlItem28
' '
Me.LayoutControlItem28.Control = Me.TextEditBeschreibung Me.LayoutControlItem28.Control = Me.TextEditBeschreibung
Me.LayoutControlItem28.Location = New System.Drawing.Point(0, 182) Me.LayoutControlItem28.Location = New System.Drawing.Point(0, 152)
Me.LayoutControlItem28.Name = "LayoutControlItem28" Me.LayoutControlItem28.Name = "LayoutControlItem28"
Me.LayoutControlItem28.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem28.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem28.Size = New System.Drawing.Size(1082, 30) Me.LayoutControlItem28.Size = New System.Drawing.Size(1099, 30)
Me.LayoutControlItem28.Text = "Beschreibung" Me.LayoutControlItem28.Text = "Beschreibung"
Me.LayoutControlItem28.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem28.TextSize = New System.Drawing.Size(139, 13)
' '
'EmptySpaceItem12 'EmptySpaceItem12
' '
Me.EmptySpaceItem12.AllowHotTrack = False Me.EmptySpaceItem12.AllowHotTrack = False
Me.EmptySpaceItem12.Location = New System.Drawing.Point(541, 151) Me.EmptySpaceItem12.Location = New System.Drawing.Point(549, 121)
Me.EmptySpaceItem12.Name = "EmptySpaceItem12" Me.EmptySpaceItem12.Name = "EmptySpaceItem12"
Me.EmptySpaceItem12.Size = New System.Drawing.Size(541, 31) Me.EmptySpaceItem12.Size = New System.Drawing.Size(550, 31)
Me.EmptySpaceItem12.TextSize = New System.Drawing.Size(0, 0) Me.EmptySpaceItem12.TextSize = New System.Drawing.Size(0, 0)
' '
'LayoutControlItem61 'LayoutControlItem61
@ -940,26 +911,17 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem61.Location = New System.Drawing.Point(0, 30) Me.LayoutControlItem61.Location = New System.Drawing.Point(0, 30)
Me.LayoutControlItem61.Name = "LayoutControlItem61" Me.LayoutControlItem61.Name = "LayoutControlItem61"
Me.LayoutControlItem61.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem61.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem61.Size = New System.Drawing.Size(541, 31) Me.LayoutControlItem61.Size = New System.Drawing.Size(549, 31)
Me.LayoutControlItem61.Text = "Dokumentart" Me.LayoutControlItem61.Text = "Dokumentart"
Me.LayoutControlItem61.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem61.TextSize = New System.Drawing.Size(139, 13)
' '
'LayoutControlItem12
'
Me.LayoutControlItem12.Control = Me.GridLookUpEdit1
Me.LayoutControlItem12.Location = New System.Drawing.Point(0, 61)
Me.LayoutControlItem12.Name = "LayoutControlItem12"
Me.LayoutControlItem12.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem12.Size = New System.Drawing.Size(1082, 30)
Me.LayoutControlItem12.TextSize = New System.Drawing.Size(139, 13)
'
'LayoutControlItem7 'LayoutControlItem7
' '
Me.LayoutControlItem7.Control = Me.CheckEdit1 Me.LayoutControlItem7.Control = Me.CheckEdit1
Me.LayoutControlItem7.Location = New System.Drawing.Point(424, 0) Me.LayoutControlItem7.Location = New System.Drawing.Point(431, 0)
Me.LayoutControlItem7.Name = "LayoutControlItem7" Me.LayoutControlItem7.Name = "LayoutControlItem7"
Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem7.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem7.Size = New System.Drawing.Size(658, 30) Me.LayoutControlItem7.Size = New System.Drawing.Size(668, 30)
Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0) Me.LayoutControlItem7.TextSize = New System.Drawing.Size(0, 0)
Me.LayoutControlItem7.TextVisible = False Me.LayoutControlItem7.TextVisible = False
' '
@ -969,10 +931,10 @@ Partial Class frmAdmin_Globix
Me.LayoutControlItem22.AppearanceItemCaption.Options.UseFont = True Me.LayoutControlItem22.AppearanceItemCaption.Options.UseFont = True
Me.LayoutControlItem22.Control = Me.TextEditGeaendertWann Me.LayoutControlItem22.Control = Me.TextEditGeaendertWann
Me.LayoutControlItem22.Enabled = False Me.LayoutControlItem22.Enabled = False
Me.LayoutControlItem22.Location = New System.Drawing.Point(541, 242) Me.LayoutControlItem22.Location = New System.Drawing.Point(549, 212)
Me.LayoutControlItem22.Name = "LayoutControlItem22" Me.LayoutControlItem22.Name = "LayoutControlItem22"
Me.LayoutControlItem22.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5) Me.LayoutControlItem22.Padding = New DevExpress.XtraLayout.Utils.Padding(5, 5, 5, 5)
Me.LayoutControlItem22.Size = New System.Drawing.Size(541, 30) Me.LayoutControlItem22.Size = New System.Drawing.Size(550, 30)
Me.LayoutControlItem22.Text = "Geändert Wann" Me.LayoutControlItem22.Text = "Geändert Wann"
Me.LayoutControlItem22.TextSize = New System.Drawing.Size(139, 13) Me.LayoutControlItem22.TextSize = New System.Drawing.Size(139, 13)
' '
@ -2703,6 +2665,11 @@ Partial Class frmAdmin_Globix
' '
Me.VWIDB_DOCTYPE_LANGUAGETableAdapter.ClearBeforeFill = True Me.VWIDB_DOCTYPE_LANGUAGETableAdapter.ClearBeforeFill = True
' '
'NotifyIcon1
'
Me.NotifyIcon1.Text = "NotifyIcon1"
Me.NotifyIcon1.Visible = True
'
'frmAdmin_Globix 'frmAdmin_Globix
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@ -2725,9 +2692,7 @@ Partial Class frmAdmin_Globix
Me.XtraTabPageProfile.ResumeLayout(False) Me.XtraTabPageProfile.ResumeLayout(False)
CType(Me.LayoutControlProfile, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlProfile, System.ComponentModel.ISupportInitialize).EndInit()
Me.LayoutControlProfile.ResumeLayout(False) Me.LayoutControlProfile.ResumeLayout(False)
CType(Me.GridLookUpEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.VWIDB_DOCTYPE_LANGUAGEBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.VWIDB_DOCTYPE_LANGUAGEBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GridLookUpEdit1View, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.VWIDB_OBJECT_STOREBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.VWIDB_OBJECT_STOREBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.SEQUENCENumericUpDown, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SEQUENCENumericUpDown, System.ComponentModel.ISupportInitialize).EndInit()
@ -2756,7 +2721,6 @@ Partial Class frmAdmin_Globix
CType(Me.LayoutControlItem28, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem28, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.EmptySpaceItem12, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.EmptySpaceItem12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem61, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem61, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.LayoutControlItem22, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.XtraTabControl2, System.ComponentModel.ISupportInitialize).EndInit()
@ -3103,9 +3067,6 @@ Partial Class frmAdmin_Globix
Friend WithEvents LayoutControlItem61 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem61 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents VWIDB_DOCTYPE_LANGUAGEBindingSource As BindingSource Friend WithEvents VWIDB_DOCTYPE_LANGUAGEBindingSource As BindingSource
Friend WithEvents VWIDB_DOCTYPE_LANGUAGETableAdapter As DSIDB_StammdatenTableAdapters.VWIDB_DOCTYPE_LANGUAGETableAdapter Friend WithEvents VWIDB_DOCTYPE_LANGUAGETableAdapter As DSIDB_StammdatenTableAdapters.VWIDB_DOCTYPE_LANGUAGETableAdapter
Friend WithEvents GridLookUpEdit1 As DevExpress.XtraEditors.GridLookUpEdit
Friend WithEvents GridLookUpEdit1View As DevExpress.XtraGrid.Views.Grid.GridView
Friend WithEvents LayoutControlItem12 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents ACTIVECheckBox2 As DevExpress.XtraEditors.CheckEdit Friend WithEvents ACTIVECheckBox2 As DevExpress.XtraEditors.CheckEdit
Friend WithEvents OPTIONALCheckBox2 As DevExpress.XtraEditors.CheckEdit Friend WithEvents OPTIONALCheckBox2 As DevExpress.XtraEditors.CheckEdit
Friend WithEvents LayoutControlItem63 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem63 As DevExpress.XtraLayout.LayoutControlItem
@ -3116,4 +3077,5 @@ Partial Class frmAdmin_Globix
Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem7 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents TextEditGeaendertWann As DevExpress.XtraEditors.TextEdit Friend WithEvents TextEditGeaendertWann As DevExpress.XtraEditors.TextEdit
Friend WithEvents LayoutControlItem22 As DevExpress.XtraLayout.LayoutControlItem Friend WithEvents LayoutControlItem22 As DevExpress.XtraLayout.LayoutControlItem
Friend WithEvents NotifyIcon1 As NotifyIcon
End Class End Class

View File

@ -519,6 +519,9 @@
<metadata name="VWIDB_DOCTYPE_LANGUAGETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="VWIDB_DOCTYPE_LANGUAGETableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>311, 134</value> <value>311, 134</value>
</metadata> </metadata>
<metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>599, 134</value>
</metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>118</value> <value>118</value>
</metadata> </metadata>

View File

@ -96,8 +96,10 @@ Public Class frmAdmin_Globix
AddHandler Pages.CurrentPage_Changed, AddressOf CurrentPage_Changed AddHandler Pages.CurrentPage_Changed, AddressOf CurrentPage_Changed
If IsInsert Then If IsInsert Then
TextEditErstelltWer.EditValue = My.Application.User.UserName TextEditErstelltWer.EditValue = My.Application.User.UserName
BarButtonNew.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
Else Else
TextEditChangedWho_ManIndex.EditValue = My.Application.User.UserName TextEditChangedWho_ManIndex.EditValue = My.Application.User.UserName
BarButtonNew.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
End If End If
Dim oDragDropManager As New ClassDragDrop(My.LogConfig) Dim oDragDropManager As New ClassDragDrop(My.LogConfig)
oDragDropManager.AddGridView(viewAssignedGroups) oDragDropManager.AddGridView(viewAssignedGroups)
@ -227,6 +229,7 @@ Public Class frmAdmin_Globix
End If End If
Return True Return True
Catch ex As Exception Catch ex As Exception
ShowBalloonTip(15000, "Error saving ManIndex", ex.Message, ToolTipIcon.Warning)
Return False Return False
End Try End Try
End Function End Function
@ -245,8 +248,12 @@ Public Class frmAdmin_Globix
Return True Return True
Catch ex As Exception Catch ex As Exception
Return False Return False
ShowBalloonTip(15000, "Error saving AutoIndex", ex.Message, ToolTipIcon.Warning)
End Try End Try
End Function End Function
Sub ShowBalloonTip(pTime As Integer, tipTitle As String, tipText As String, tipIcon As ToolTipIcon)
NotifyIcon1.ShowBalloonTip(pTime, tipTitle, tipText, tipIcon)
End Sub
Private Function Save_AutoSelect(oPage As ClassDetailPageManager.DetailPage) As Boolean Private Function Save_AutoSelect(oPage As ClassDetailPageManager.DetailPage) As Boolean
Try Try
TBGI_REGEX_DOCTYPEBindingSource.EndEdit() TBGI_REGEX_DOCTYPEBindingSource.EndEdit()
@ -268,10 +275,10 @@ Public Class frmAdmin_Globix
Try Try
Dim oIns = $"INSERT INTO [TBDD_DOKUMENTART] ([BEZEICHNUNG] ,[OBJEKTTYP] ,[EINGANGSART_ID] ,[IDB_DOCTYPE_ID] ,[ZIEL_PFAD] ,[BESCHREIBUNG] Dim oIns = $"INSERT INTO [TBDD_DOKUMENTART] ([BEZEICHNUNG] ,[OBJEKTTYP] ,[EINGANGSART_ID] ,[IDB_DOCTYPE_ID] ,[ZIEL_PFAD] ,[BESCHREIBUNG]
,[WINDREAM_DIRECT] ,[FOLDER_FOR_INDEX] ,[DUPLICATE_HANDLING],[AKTIV],[LANGUAGE], ,[WINDREAM_DIRECT] ,[FOLDER_FOR_INDEX] ,[DUPLICATE_HANDLING],[AKTIV],[LANGUAGE],
[SEQUENCE],[NAMENKONVENTION],[ERSTELLTWER],IDB_OBJECT_STORE_ID) VALUES [SEQUENCE],[NAMENKONVENTION],[ERSTELLTWER],IDB_OBJECT_STORE_ID,KURZNAME) VALUES
('{TextEditBezeichnung.Text}','IDB_DRIVEN',1,{IDB_DOCTYPE_IDComboBox.SelectedValue},'IDB_STORE','{TextEditBeschreibung.Text}' ('{TextEditBezeichnung.Text}','IDB_DRIVEN',1,{IDB_DOCTYPE_IDComboBox.SelectedValue},'IDB_STORE','{TextEditBeschreibung.Text}'
,'False','{FOLDER_FOR_INDEXTextEdit.Text}','{ComboBoxEditDupl_handling.EditValue}' ,'{CheckEdit1.Checked}','{My.Application.User.Language}' ,'False','{FOLDER_FOR_INDEXTextEdit.Text}','{ComboBoxEditDupl_handling.EditValue}' ,'{CheckEdit1.Checked}','{My.Application.User.Language}'
, {SEQUENCENumericUpDown.Value},'{TextEditNamenkonvention.Text}','{My.Application.User.UserName}',{IDB_OBJECT_STORE_IDComboBox.SelectedValue})" , {SEQUENCENumericUpDown.Value},'{TextEditNamenkonvention.Text}','{My.Application.User.UserName}',{IDB_OBJECT_STORE_IDComboBox.SelectedValue},'')"
If My.DatabaseECM.ExecuteNonQuery(oIns) = True Then If My.DatabaseECM.ExecuteNonQuery(oIns) = True Then
Dim oSQL = $"SELECT GUID FROM TBDD_DOKUMENTART WHERE BEZEICHNUNG = '{TextEditBezeichnung.Text}'" Dim oSQL = $"SELECT GUID FROM TBDD_DOKUMENTART WHERE BEZEICHNUNG = '{TextEditBezeichnung.Text}'"
PrimaryKey = My.DatabaseECM.GetScalarValue(oSQL) PrimaryKey = My.DatabaseECM.GetScalarValue(oSQL)
@ -291,9 +298,12 @@ Public Class frmAdmin_Globix
End Function End Function
Private Function Update_Doctype() As Boolean Private Function Update_Doctype() As Boolean
Try Try
Dim oUpd = $"UPDATE TBDD_DOKUMENTART SET [BEZEICHNUNG] = '{TextEditBezeichnung.Text}' ,[IDB_DOCTYPE_ID] = {IDB_DOCTYPE_IDComboBox.SelectedValue} ,[BESCHREIBUNG] = '{TextEditBeschreibung.Text}' Dim oUpd = $"UPDATE TBDD_DOKUMENTART SET [BEZEICHNUNG] = '{TextEditBezeichnung.Text}' ,[IDB_DOCTYPE_ID] = {IDB_DOCTYPE_IDComboBox.SelectedValue}
,[DUPLICATE_HANDLING] = '{ComboBoxEditDupl_handling.EditValue}',[AKTIV] = '{CheckEdit1.Checked}',[SEQUENCE] = {SEQUENCENumericUpDown.Value} ,[BESCHREIBUNG] = '{TextEditBeschreibung.Text}',[DUPLICATE_HANDLING] = '{ComboBoxEditDupl_handling.EditValue}'
,[NAMENKONVENTION] = '{TextEditNamenkonvention.Text}', [FOLDER_FOR_INDEX] = '{FOLDER_FOR_INDEXTextEdit.Text}',[GEANDERTWER] = '{My.Application.User.UserName}',IDB_OBJECT_STORE_ID = {IDB_OBJECT_STORE_IDComboBox.SelectedValue} WHERE GUID = {TextEditDoctypeID.Text}" ,[AKTIV] = '{CheckEdit1.Checked}',[SEQUENCE] = {SEQUENCENumericUpDown.Value}
,[NAMENKONVENTION] = '{TextEditNamenkonvention.Text}', [FOLDER_FOR_INDEX] = '{FOLDER_FOR_INDEXTextEdit.Text}'
,[GEANDERTWER] = '{My.Application.User.UserName}',IDB_OBJECT_STORE_ID = {IDB_OBJECT_STORE_IDComboBox.SelectedValue}
WHERE GUID = {TextEditDoctypeID.Text}"
Return My.DatabaseECM.ExecuteNonQuery(oUpd) Return My.DatabaseECM.ExecuteNonQuery(oUpd)
@ -442,6 +452,7 @@ Public Class frmAdmin_Globix
'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@CONNECTION_ID").Value = oForm.ConnectionID 'TBDD_INDEX_MANTableAdapter.Adapter.UpdateCommand.Parameters("@CONNECTION_ID").Value = oForm.ConnectionID
CHANGED_WHOTextEditAutoAttribut.Text = My.Application.User.UserName CHANGED_WHOTextEditAutoAttribut.Text = My.Application.User.UserName
End If End If
Else
End If End If
End Sub End Sub

104
GUIs.ZooFlow/Dialog1.Designer.vb generated Normal file
View File

@ -0,0 +1,104 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Dialog1
Inherits DevExpress.XtraEditors.XtraForm
'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()
Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
Me.OK_Button = New System.Windows.Forms.Button()
Me.Cancel_Button = New System.Windows.Forms.Button()
Me.lblMeldung = New DevExpress.XtraEditors.LabelControl()
Me.TableLayoutPanel1.SuspendLayout()
Me.SuspendLayout()
'
'TableLayoutPanel1
'
Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.TableLayoutPanel1.ColumnCount = 2
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(207, 81)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Size = New System.Drawing.Size(216, 41)
Me.TableLayoutPanel1.TabIndex = 0
'
'OK_Button
'
Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.OK_Button.DialogResult = System.Windows.Forms.DialogResult.Yes
Me.OK_Button.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.OK_Button.Location = New System.Drawing.Point(10, 4)
Me.OK_Button.Name = "OK_Button"
Me.OK_Button.Size = New System.Drawing.Size(87, 32)
Me.OK_Button.TabIndex = 0
Me.OK_Button.Text = "OK"
'
'Cancel_Button
'
Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.No
Me.Cancel_Button.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Cancel_Button.Location = New System.Drawing.Point(114, 4)
Me.Cancel_Button.Name = "Cancel_Button"
Me.Cancel_Button.Size = New System.Drawing.Size(95, 32)
Me.Cancel_Button.TabIndex = 1
Me.Cancel_Button.Text = "Abbrechen"
'
'lblMeldung
'
Me.lblMeldung.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblMeldung.Appearance.Options.UseFont = True
Me.lblMeldung.Location = New System.Drawing.Point(12, 1)
Me.lblMeldung.Name = "lblMeldung"
Me.lblMeldung.Size = New System.Drawing.Size(98, 21)
Me.lblMeldung.TabIndex = 1
Me.lblMeldung.Text = "LabelControl1"
'
'Dialog1
'
Me.AcceptButton = Me.OK_Button
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.CancelButton = Me.Cancel_Button
Me.ClientSize = New System.Drawing.Size(435, 134)
Me.Controls.Add(Me.lblMeldung)
Me.Controls.Add(Me.TableLayoutPanel1)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "Dialog1"
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "Dialog1"
Me.TableLayoutPanel1.ResumeLayout(False)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
Friend WithEvents OK_Button As System.Windows.Forms.Button
Friend WithEvents Cancel_Button As System.Windows.Forms.Button
Friend WithEvents lblMeldung As DevExpress.XtraEditors.LabelControl
End Class

120
GUIs.ZooFlow/Dialog1.resx Normal file
View File

@ -0,0 +1,120 @@
<?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>
</root>

24
GUIs.ZooFlow/Dialog1.vb Normal file
View File

@ -0,0 +1,24 @@
Imports System.Windows.Forms
Public Class Dialog1
Public Sub New(messagetext As String, otitle As String)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Me.lblMeldung.Text = messagetext
Me.Text = otitle
End Sub
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.OK
Me.Close()
End Sub
Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
Me.Close()
End Sub
End Class

View File

@ -46,18 +46,21 @@ Public Class ClassFilehandle
If oFileExists.Equals(Date.MinValue) Then If oFileExists.Equals(Date.MinValue) Then
Return True Return True
Else Else
Dim oResult As DialogResult 'Dim oResult As DialogResult
Dim oDate As String = oFileExists.ToString("d") Dim oDate As String = oFileExists.ToString("d")
Dim oBoxTitle = $"GLOBIX - {ModuleTitle}" ' Dim oBoxTitle = $"GLOBIX - {ModuleTitle}"
Dim oBoxOptions = MsgBoxStyle.Question Or MsgBoxStyle.YesNo
If My.Application.User.Language = "de-DE" Then Dim ofrmDuplicate As New frmFileflow_Duplicate(oFilename, oDate)
oResult = MsgBox($"Die Datei [{oFilename}] wurde bereits am [{oDate}] verarbeitet. Wollen Sie die gleiche Datei noch einmal verarbeiten?", oBoxOptions, oBoxTitle)
Else
oResult = MsgBox($"The file [{oFilename}] has already been processed at [{oDate}]. Do you want to process the same file again?", oBoxOptions, oBoxTitle)
End If
If oResult = DialogResult.Yes Then 'Dim oBoxOptions = MsgBoxStyle.Question Or MsgBoxStyle.YesNo
ofrmDuplicate.ShowDialog()
'If My.Application.User.Language = "de-DE" Then
' oResult = MsgBox($"Die Datei [{oFilename}] wurde bereits am [{oDate}] verarbeitet. Wollen Sie die gleiche Datei noch einmal verarbeiten?", oBoxOptions, oBoxTitle)
'Else
' oResult = MsgBox($"The file [{oFilename}] has already been processed at [{oDate}]. Do you want to process the same file again?", oBoxOptions, oBoxTitle)
'End If
If ofrmDuplicate.DialogResult = DialogResult.Yes Then
Return True Return True
End If End If
End If End If

View File

@ -41,6 +41,7 @@ Public Class ClassUserFiles
Dim oFilesystem As New DigitalData.Modules.Filesystem.File(My.LogConfig) Dim oFilesystem As New DigitalData.Modules.Filesystem.File(My.LogConfig)
Try Try
My.Application.Globix.DOCUMENT_ID = 0
If Filename.Contains("'") Then If Filename.Contains("'") Then
Filename = Filename.Replace("'", "''") Filename = Filename.Replace("'", "''")
End If End If
@ -70,10 +71,12 @@ Public Class ClassUserFiles
Return Nothing Return Nothing
Else Else
Dim oFirstRow As DataRow = oResult.Rows.Item(0) Dim oFirstRow As DataRow = oResult.Rows.Item(0)
My.Application.Globix.DOCUMENT_ID = oFirstRow.Item("IDB_OBJ_ID")
Return oFirstRow.Item("ADDED_WHEN") Return oFirstRow.Item("ADDED_WHEN")
End If End If
Else Else
Dim oFirstRow As DataRow = oResult.Rows.Item(0) Dim oFirstRow As DataRow = oResult.Rows.Item(0)
My.Application.Globix.DOCUMENT_ID = oFirstRow.Item("DocID")
Return oFirstRow.Item("ADDED_WHEN") Return oFirstRow.Item("ADDED_WHEN")
End If End If
Catch ex As Exception Catch ex As Exception

View File

@ -19,6 +19,7 @@ Namespace Globix
Public Property Folderwatchstarted As Boolean = False Public Property Folderwatchstarted As Boolean = False
Public Property ScanFolderwatchstarted As Boolean = False Public Property ScanFolderwatchstarted As Boolean = False
Public Property DTEXCLUDE_FILES As DataTable Public Property DTEXCLUDE_FILES As DataTable
Public Property DOCUMENT_ID As Long
End Class End Class
End Namespace End Namespace

View File

@ -0,0 +1,187 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmFileflow_Duplicate
Inherits System.Windows.Forms.Form
'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(frmFileflow_Duplicate))
Me.SimpleButton2 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
Me.LabelControlMessage = New DevExpress.XtraEditors.LabelControl()
Me.PictureEdit1 = New DevExpress.XtraEditors.PictureEdit()
Me.SimpleButton5 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton4 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton3 = New DevExpress.XtraEditors.SimpleButton()
Me.GroupControl1 = New DevExpress.XtraEditors.GroupControl()
CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.GroupControl1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupControl1.SuspendLayout()
Me.SuspendLayout()
'
'SimpleButton2
'
Me.SimpleButton2.Appearance.BackColor = System.Drawing.SystemColors.Control
Me.SimpleButton2.Appearance.BorderColor = System.Drawing.Color.Black
Me.SimpleButton2.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton2.Appearance.Options.UseBackColor = True
Me.SimpleButton2.Appearance.Options.UseBorderColor = True
Me.SimpleButton2.Appearance.Options.UseFont = True
Me.SimpleButton2.DialogResult = System.Windows.Forms.DialogResult.No
Me.SimpleButton2.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton2.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton2.Location = New System.Drawing.Point(228, 87)
Me.SimpleButton2.Name = "SimpleButton2"
Me.SimpleButton2.Size = New System.Drawing.Size(143, 40)
Me.SimpleButton2.TabIndex = 3
Me.SimpleButton2.Text = "Nein"
'
'SimpleButton1
'
Me.SimpleButton1.Appearance.BackColor = System.Drawing.SystemColors.Control
Me.SimpleButton1.Appearance.BorderColor = System.Drawing.Color.Black
Me.SimpleButton1.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton1.Appearance.Options.UseBackColor = True
Me.SimpleButton1.Appearance.Options.UseBorderColor = True
Me.SimpleButton1.Appearance.Options.UseFont = True
Me.SimpleButton1.DialogResult = System.Windows.Forms.DialogResult.Yes
Me.SimpleButton1.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton1.Location = New System.Drawing.Point(118, 87)
Me.SimpleButton1.Name = "SimpleButton1"
Me.SimpleButton1.Size = New System.Drawing.Size(101, 40)
Me.SimpleButton1.TabIndex = 2
Me.SimpleButton1.Text = "Ja"
'
'LabelControlMessage
'
Me.LabelControlMessage.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LabelControlMessage.Appearance.ForeColor = System.Drawing.Color.Firebrick
Me.LabelControlMessage.Appearance.Options.UseFont = True
Me.LabelControlMessage.Appearance.Options.UseForeColor = True
Me.LabelControlMessage.LineVisible = True
Me.LabelControlMessage.Location = New System.Drawing.Point(118, 31)
Me.LabelControlMessage.Name = "LabelControlMessage"
Me.LabelControlMessage.Size = New System.Drawing.Size(152, 21)
Me.LabelControlMessage.TabIndex = 1
Me.LabelControlMessage.Text = "msgfrom_LoadForm"
'
'PictureEdit1
'
Me.PictureEdit1.EditValue = CType(resources.GetObject("PictureEdit1.EditValue"), Object)
Me.PictureEdit1.Location = New System.Drawing.Point(12, 31)
Me.PictureEdit1.Name = "PictureEdit1"
Me.PictureEdit1.Properties.Appearance.BackColor = System.Drawing.Color.Transparent
Me.PictureEdit1.Properties.Appearance.Options.UseBackColor = True
Me.PictureEdit1.Properties.ShowCameraMenuItem = DevExpress.XtraEditors.Controls.CameraMenuItemVisibility.[Auto]
Me.PictureEdit1.Properties.SizeMode = DevExpress.XtraEditors.Controls.PictureSizeMode.Zoom
Me.PictureEdit1.Size = New System.Drawing.Size(100, 96)
Me.PictureEdit1.TabIndex = 0
'
'SimpleButton5
'
Me.SimpleButton5.Appearance.BackColor = System.Drawing.Color.WhiteSmoke
Me.SimpleButton5.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton5.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton5.Appearance.Options.UseBackColor = True
Me.SimpleButton5.Appearance.Options.UseFont = True
Me.SimpleButton5.Appearance.Options.UseForeColor = True
Me.SimpleButton5.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton5.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton5.Location = New System.Drawing.Point(249, 85)
Me.SimpleButton5.Name = "SimpleButton5"
Me.SimpleButton5.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton5.Size = New System.Drawing.Size(143, 42)
Me.SimpleButton5.TabIndex = 6
Me.SimpleButton5.Text = "... nur von mir"
'
'SimpleButton4
'
Me.SimpleButton4.Appearance.BackColor = System.Drawing.Color.Wheat
Me.SimpleButton4.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton4.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton4.Appearance.Options.UseBackColor = True
Me.SimpleButton4.Appearance.Options.UseFont = True
Me.SimpleButton4.Appearance.Options.UseForeColor = True
Me.SimpleButton4.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton4.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton4.Location = New System.Drawing.Point(20, 85)
Me.SimpleButton4.Name = "SimpleButton4"
Me.SimpleButton4.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton4.Size = New System.Drawing.Size(223, 42)
Me.SimpleButton4.TabIndex = 5
Me.SimpleButton4.Text = "Alle Dateien von heute"
'
'SimpleButton3
'
Me.SimpleButton3.Appearance.BackColor = System.Drawing.Color.WhiteSmoke
Me.SimpleButton3.Appearance.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.SimpleButton3.Appearance.ForeColor = System.Drawing.Color.Black
Me.SimpleButton3.Appearance.Options.UseBackColor = True
Me.SimpleButton3.Appearance.Options.UseFont = True
Me.SimpleButton3.Appearance.Options.UseForeColor = True
Me.SimpleButton3.ImageOptions.SvgImage = CType(resources.GetObject("SimpleButton3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.SimpleButton3.Location = New System.Drawing.Point(20, 37)
Me.SimpleButton3.Name = "SimpleButton3"
Me.SimpleButton3.PaintStyle = DevExpress.XtraEditors.Controls.PaintStyles.Light
Me.SimpleButton3.Size = New System.Drawing.Size(154, 42)
Me.SimpleButton3.TabIndex = 4
Me.SimpleButton3.Text = "Datei anzeigen"
'
'GroupControl1
'
Me.GroupControl1.Controls.Add(Me.SimpleButton3)
Me.GroupControl1.Controls.Add(Me.SimpleButton5)
Me.GroupControl1.Controls.Add(Me.SimpleButton4)
Me.GroupControl1.Location = New System.Drawing.Point(12, 151)
Me.GroupControl1.Name = "GroupControl1"
Me.GroupControl1.Size = New System.Drawing.Size(401, 141)
Me.GroupControl1.TabIndex = 7
Me.GroupControl1.Text = "Dateisuchen"
'
'frmFileflow_Duplicate
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 21.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.WhiteSmoke
Me.ClientSize = New System.Drawing.Size(686, 304)
Me.Controls.Add(Me.GroupControl1)
Me.Controls.Add(Me.SimpleButton2)
Me.Controls.Add(Me.PictureEdit1)
Me.Controls.Add(Me.LabelControlMessage)
Me.Controls.Add(Me.SimpleButton1)
Me.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.Name = "frmFileflow_Duplicate"
Me.Text = "frmGlobix_Duplicate"
Me.TopMost = True
CType(Me.PictureEdit1.Properties, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.GroupControl1, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupControl1.ResumeLayout(False)
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents SimpleButton2 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents LabelControlMessage As DevExpress.XtraEditors.LabelControl
Friend WithEvents PictureEdit1 As DevExpress.XtraEditors.PictureEdit
Friend WithEvents SimpleButton5 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton4 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton3 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents GroupControl1 As DevExpress.XtraEditors.GroupControl
End Class

View File

@ -0,0 +1,258 @@
<?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="SimpleButton2.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAANcBAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlJlZHtmaWxsOiNEMTFDMUM7fQo8L3N0
eWxlPg0KICA8cGF0aCBkPSJNMTYsMkM4LjMsMiwyLDguMywyLDE2czYuMywxNCwxNCwxNHMxNC02LjMs
MTQtMTRTMjMuNywyLDE2LDJ6IE0yMywyMGwtMywzbC00LTRsLTQsNGwtMy0zbDQtNGwtNC00bDMtM2w0
LDQgIGw0LTRsMywzbC00LDRMMjMsMjB6IiBjbGFzcz0iUmVkIiAvPg0KPC9zdmc+Cw==
</value>
</data>
<data name="SimpleButton1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAALYDAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9Cgku
R3JlZW57ZmlsbDojMDM5QzIzO30KPC9zdHlsZT4NCiAgPHBhdGggZD0iTTgsMTZWNkg1QzQuNCw2LDQs
Ni40LDQsN3YyMmMwLDAuNiwwLjQsMSwxLDFoMjJjMC42LDAsMS0wLjQsMS0xVjE2SDh6IE04LDI2di02
aDE2djZIOHoiIGNsYXNzPSJCbGFjayIgLz4NCiAgPHBhdGggZD0iTTE4LDZoLTh2OGg4VjZ6IE0xNCwx
MmgtMlY4aDJWMTJ6IiBjbGFzcz0iQmxhY2siIC8+DQogIDxwYXRoIGQ9Ik0yNiwyYy0zLjMsMC02LDIu
Ny02LDZzMi43LDYsNiw2czYtMi43LDYtNlMyOS4zLDIsMjYsMnogTTI2LDExLjhjLTAuNCwwLTAuNy0w
LjMtMC43LTAuNyAgYzAtMC40LDAuMy0wLjcsMC43LTAuN3MwLjcsMC4zLDAuNywwLjdDMjYuNywxMS41
LDI2LjQsMTEuOCwyNiwxMS44eiBNMjYuNyw5LjR2MC4zaC0xLjRWOS41YzAtMC4zLDAuMS0xLjEsMC42
LTEuNSAgYzAuMi0wLjIsMS40LTAuNiwxLjYtMS43YzAtMC4zLTAuMS0wLjUtMC4zLTAuN3MtMC41LTAu
My0wLjktMC4zYy0wLjksMC0xLjQsMS0xLjQsMS40aC0xLjRjMC0wLjgsMC4zLTEuNCwwLjgtMS45czEu
Mi0wLjcsMi0wLjcgIHMxLjUsMC4yLDEuOSwwLjZjMC41LDAuNCwwLjcsMC45LDAuNywxLjZDMjguNiw4
LjIsMjYuNyw4LjUsMjYuNyw5LjR6IiBjbGFzcz0iR3JlZW4iIC8+DQo8L3N2Zz4L
</value>
</data>
<data name="PictureEdit1.EditValue" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKEDAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5Z
ZWxsb3d7ZmlsbDojRkZCMTE1O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLkdyZWVue2ZpbGw6IzAz
OUMyMzt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNpdHk6MC43NTt9Cgkuc3Qxe29wYWNp
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlVzZXIiPg0KICAgIDxwYXRoIGQ9Ik0xMCw5LjljLTAu
MSwwLjUsMC4yLDAuOSwwLjQsMS40YzAuMiwwLjUtMC4xLDEuNywwLjksMS42YzAsMCwwLDAuMSwwLDAu
MmMwLjYsMi4zLDIsNC45LDQuNyw0LjkgICBjMi43LDAsNC4yLTIuNiw0LjctNC45YzAsMCwwLTAuMSww
LTAuMWMxLDAuMSwwLjYtMS4xLDAuOS0xLjZjMC4yLTAuNSwwLjQtMC45LDAuMy0xLjRjLTAuMS0wLjQt
MC40LTAuNC0wLjUtMC4zICAgYzEuOC00LjktMS4xLTQuNy0xLjEtNC43UzIwLDIsMTQuOCwyQzEwLDIs
OS40LDYsMTAuNSw5LjZDMTAuNCw5LjYsMTAuMSw5LjcsMTAsOS45eiIgY2xhc3M9IkJsYWNrIiAvPg0K
ICAgIDxwYXRoIGQ9Ik0yMCwxOGMtMC44LDEuNS0yLjEsNC00LDRjLTEuOSwwLTMuMi0yLjUtNC00Yy0y
LjMsMy41LTgsMS04LDguNVYzMGgyNHYtMy41QzI4LDE5LjEsMjIuMywyMS40LDIwLDE4eiIgY2xhc3M9
IkJsYWNrIiAvPg0KICA8L2c+DQo8L3N2Zz4L
</value>
</data>
<data name="SimpleButton5.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAL8FAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iTWVldGluZyI+DQogICAgPHJlY3Qg
eD0iMTAiIHk9IjE0IiB3aWR0aD0iNCIgaGVpZ2h0PSI0IiByeD0iMCIgcnk9IjAiIGNsYXNzPSJSZWQi
IC8+DQogICAgPGcgY2xhc3M9InN0MCI+DQogICAgICA8cGF0aCBkPSJNMTQsMjRoLTR2LTRoNFYyNHog
TTIwLDIwaC00djRoNFYyMHogTTI2LDhoLTR2NGg0Vjh6IE0yMCwxNGgtNHY0aDRWMTR6IE0yMCw4aC00
djRoNFY4eiBNMTQsOGgtNHY0aDRWOHogICAgIE04LDhINHY0aDRWOHogTTgsMTRINHY0aDRWMTR6IE04
LDIwSDR2NGg0VjIweiIgY2xhc3M9IkJsYWNrIiAvPg0KICAgIDwvZz4NCiAgICA8cGF0aCBkPSJNMTgu
NiwyNkgyVjZoMjZ2Ni40YzAuOSwwLjMsMS41LDAuOCwyLDEuM1YzYzAtMC42LTAuNC0xLTEtMUgxQzAu
NCwyLDAsMi40LDAsM3YyNGMwLDAuNiwwLjQsMSwxLDFoMTcuMSAgIEMxOC4xLDI3LjIsMTguMywyNi41
LDE4LjYsMjZ6IiBjbGFzcz0iQmxhY2siIC8+DQogICAgPHBhdGggZD0iTTMyLDI5LjFWMzBIMjB2LTAu
OWMwLTQsMi4zLTMuMywzLjYtNC42YzAuNSwwLjgsMS4zLDEuNSwyLjQsMS41YzEuMSwwLDEuOS0wLjYs
Mi41LTEuNCAgIEMyOS44LDI1LjgsMzIsMjUuMSwzMiwyOS4xeiBNMjIuOSwyMC44djAuMWMwLjQsMS41
LDEuMywzLjEsMy4xLDMuMXMyLjgtMS42LDMuMi0zLjF2LTAuMWMwLjcsMCwwLjQtMC43LDAuNi0xczAu
My0wLjUsMC4yLTAuOSAgIGMtMC4xLTAuMy0wLjMtMC4yLTAuNC0wLjJjMS4yLTMuMS0wLjctMi45LTAu
Ny0yLjlTMjguNywxNCwyNS4yLDE0Yy0zLjIsMC0zLjYsMi41LTIuOSw0LjdjMCwwLjEtMC4yLDAuMS0w
LjMsMC4yICAgYy0wLjEsMC40LDAuMSwwLjYsMC4zLDAuOVMyMi4yLDIwLjgsMjIuOSwyMC44eiIgY2xh
c3M9IkJsdWUiIC8+DQogIDwvZz4NCjwvc3ZnPgs=
</value>
</data>
<data name="SimpleButton4.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAP4DAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjU7fQoJLnN0MXtkaXNwbGF5Om5vbmU7fQoJLnN0MntkaXNwbGF5OmlubGluZTtmaWxsOiMw
MzlDMjM7fQoJLnN0M3tkaXNwbGF5OmlubGluZTtmaWxsOiNEMTFDMUM7fQoJLnN0NHtkaXNwbGF5Omlu
bGluZTtmaWxsOiM3MjcyNzI7fQo8L3N0eWxlPg0KICA8ZyBpZD0iVG9kYXkiPg0KICAgIDxwYXRoIGQ9
Ik0yOSwwSDFDMC41LDAsMCwwLjUsMCwxdjMwYzAsMC41LDAuNSwxLDEsMWgyOGMwLjUsMCwxLTAuNSwx
LTFWMUMzMCwwLjUsMjkuNSwwLDI5LDB6IE0yOCwzMEgyVjRoMjZWMzB6IiBjbGFzcz0iQmxhY2siIC8+
DQogICAgPGcgY2xhc3M9InN0MCI+DQogICAgICA8cGF0aCBkPSJNMTAsMTJINFY2aDZWMTJ6IE0xOCw2
aC02djZoNlY2eiBNMjYsNmgtNnY2aDZWNnogTTI2LDE0aC02djZoNlYxNHogTTEwLDIySDR2Nmg2VjIy
eiBNMTgsMjJoLTZ2Nmg2VjIyeiAgICAgTTI2LDIyaC02djZoNlYyMnogTTEwLDE0SDR2Nmg2VjE0eiIg
Y2xhc3M9IkJsYWNrIiAvPg0KICAgIDwvZz4NCiAgICA8cmVjdCB4PSIxMiIgeT0iMTQiIHdpZHRoPSI2
IiBoZWlnaHQ9IjYiIHJ4PSIwIiByeT0iMCIgY2xhc3M9IkdyZWVuIiAvPg0KICA8L2c+DQo8L3N2Zz4L
</value>
</data>
<data name="SimpleButton3.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOMCAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTGF5ZXJfMSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5ldyAwIDAg
MzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJ
LlJlZHtmaWxsOiNEMTFDMUM7fQoJLkJsdWV7ZmlsbDojMTE3N0Q3O30KCS5HcmVlbntmaWxsOiMwMzlD
MjM7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuV2hpdGV7ZmlsbDojRkZGRkZGO30KCS5zdDB7b3Bh
Y2l0eTowLjc1O30KPC9zdHlsZT4NCiAgPGcgaWQ9IlNpbmdsZVBhZ2VWaWV3Ij4NCiAgICA8cGF0aCBk
PSJNMjcsMEgzQzIuNCwwLDIsMC40LDIsMXYyOGMwLDAuNiwwLjQsMSwxLDFoMjRjMC42LDAsMS0wLjQs
MS0xVjFDMjgsMC40LDI3LjYsMCwyNywweiBNMjYsMjhINFYyaDIyVjI4eiIgY2xhc3M9IkJsYWNrIiAv
Pg0KICAgIDxwYXRoIGQ9Ik0yMiw4SDhWNmgxNFY4eiBNMjIsMTBIOHYyaDE0VjEweiBNMjIsMTRIOHYy
aDE0VjE0eiBNMjIsMThIOHYyaDE0VjE4eiBNMjIsMjJIOHYyaDE0VjIyeiIgY2xhc3M9IkJsdWUiIC8+
DQogIDwvZz4NCjwvc3ZnPgs=
</value>
</data>
</root>

View File

@ -0,0 +1,64 @@
Imports System.Threading.Tasks
Imports DigitalData.Modules.ZooFlow
Public Class frmFileflow_Duplicate
Dim omessagetext As String
Private Search As SearchRunner
Private Property Environment As Environment
Public Sub New(pFilename As String, pDate As String)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
If My.Application.User.Language = "de-DE" Then
omessagetext = $"Die Datei [{pFilename}] wurde bereits" & vbNewLine & "am [{pDate}] verarbeitet." & vbNewLine & "Wollen Sie die gleiche Datei noch einmal verarbeiten?"
Else
omessagetext = $"The file [{pFilename}] has already been processed at [{pDate}]. Do you want to process the same file again?"
End If
Environment = My.Application.GetEnvironment()
Search = New SearchRunner(My.LogConfig, Environment, "FlowSearch") With {
.BaseSearchSQL = DocResultBaseSearch
}
End Sub
Private Async Sub SimpleButton3_Click(sender As Object, e As EventArgs) Handles SimpleButton3.Click
Await GetResult("DOCID")
End Sub
Private Async Function GetResult(oVariant As String) As Task
Dim oSql As String
Try
If oVariant = "DOCID" Then
oSql = My.Queries.Common.DOCRESULT_DocID(My.Application.Globix.DOCUMENT_ID)
ElseIf oVariant = "TODAY" Then
oSql = My.Queries.Common.DOCRESULT_TODAY
ElseIf oVariant = "TODAY_ME" Then
oSql = My.Queries.Common.DOCRESULT_TODAY_ME
End If
If oSql IsNot Nothing Then
Dim oResultDT = Await My.Database.GetDatatableIDBAsync(oSql)
If Not IsNothing(oResultDT) Then
Search.Run(oResultDT, "FileFlow Duplicate File")
End If
End If
Catch ex As Exception
MsgBox("Unexpected error in getResult: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Function
Private Async Sub SimpleButton4_Click(sender As Object, e As EventArgs) Handles SimpleButton4.Click
Await GetResult("TODAY")
End Sub
Private Async Sub SimpleButton5_Click(sender As Object, e As EventArgs) Handles SimpleButton5.Click
Await GetResult("TODAY_ME")
End Sub
Private Sub frmFileflow_Duplicate_Load(sender As Object, e As EventArgs) Handles Me.Load
LabelControlMessage.Text = omessagetext
End Sub
End Class

View File

@ -41,6 +41,7 @@ Public Class frmGlobix_Index
Private Property Patterns2 As Patterns2 Private Property Patterns2 As Patterns2
Private Property OverlayHandle As IOverlaySplashScreenHandle Private Property OverlayHandle As IOverlaySplashScreenHandle
Public Property oSuccess As Boolean = False
'Public Class ControlMeta 'Public Class ControlMeta
' Public Property IndexName As String ' Public Property IndexName As String
@ -667,7 +668,7 @@ INNER JOIN IDB.dbo.VWIDB_DOCTYPE_LANGUAGE DL ON DT.IDB_DOCTYPE_ID = DL.Doctype_I
Dim containsfw_file As Boolean = False Dim containsfw_file As Boolean = False
Try Try
My.Application.Globix.ABORT_INDEXING = True My.Application.Globix.ABORT_INDEXING = True
Dim sql As String = $"SELECT * FROM TBGI_FILES_USER WHERE WORKED = 0 AND UPPER(USER@WORK) = UPPER('{My.Application.User.UserName}')" Dim sql As String = $"SELECT * FROM TBGI_FILES_USER WHERE WORKED = 0 AND USER@WORK = '{My.Application.User.UserName}'"
Dim DT As DataTable = My.Database.GetDatatableECM(sql) Dim DT As DataTable = My.Database.GetDatatableECM(sql)
Dim anz = DT.Rows.Count Dim anz = DT.Rows.Count
@ -687,7 +688,7 @@ INNER JOIN IDB.dbo.VWIDB_DOCTYPE_LANGUAGE DL ON DT.IDB_DOCTYPE_ID = DL.Doctype_I
End If End If
Next Next
'Zuerst die Daten des Ablaufs löschen 'Zuerst die Daten des Ablaufs löschen
If My.Database.ExecuteNonQueryECM($"DELETE FROM TBGI_FILES_USER WHERE UPPER(USER@WORK) = UPPER('{My.Application.User.UserName}')") = True Then If My.Database.ExecuteNonQueryECM($"DELETE FROM TBGI_FILES_USER WHERE USER@WORK = '{My.Application.User.UserName}'") = True Then
If containsfw_file = True Then If containsfw_file = True Then
If My.Application.User.Language = "de-DE" Then If My.Application.User.Language = "de-DE" Then
MsgBox("Der Indexierungsprozess beinhaltete (auch) Dateien per Folderwatch!" & vbNewLine & "Diese Dateien wurden nicht gelöscht und verbleiben im Folderwatch-Verzeichnis!" & vbNewLine & "Bitte verschieben Sie die Dateien ggfls.", MsgBoxStyle.Information, "Achtung - Hinweis:") MsgBox("Der Indexierungsprozess beinhaltete (auch) Dateien per Folderwatch!" & vbNewLine & "Diese Dateien wurden nicht gelöscht und verbleiben im Folderwatch-Verzeichnis!" & vbNewLine & "Bitte verschieben Sie die Dateien ggfls.", MsgBoxStyle.Information, "Achtung - Hinweis:")
@ -810,8 +811,9 @@ INNER JOIN IDB.dbo.VWIDB_DOCTYPE_LANGUAGE DL ON DT.IDB_DOCTYPE_ID = DL.Doctype_I
Logger.Info("Importing file with DocumentType [{0}]", oDokart.Name) Logger.Info("Importing file with DocumentType [{0}]", oDokart.Name)
Dim oResult = Await GlobixFlowNew(oDokart) Dim oResult = Await GlobixFlowNew(oDokart)
If oResult = True Then If oResult = True Then
Dim oArgs = GetMessageBoxArgs() oSuccess = True
Dim oMessageResult = XtraMessageBox.Show(oArgs) ' Dim oArgs = GetMessageBoxArgs()
' Dim oMessageResult = XtraMessageBox.Show(oArgs)
Dim oDEL As String = "DELETE FROM TBGI_FILES_USER WHERE GUID = " & My.Application.Globix.CurrentWorkfile.Id Dim oDEL As String = "DELETE FROM TBGI_FILES_USER WHERE GUID = " & My.Application.Globix.CurrentWorkfile.Id
My.DatabaseECM.ExecuteNonQuery(oDEL) My.DatabaseECM.ExecuteNonQuery(oDEL)

View File

@ -13,4 +13,13 @@
Public Function IDB_CATALOG() As String Public Function IDB_CATALOG() As String
Return String.Format("SELECT * FROM TBIDB_CATALOG") Return String.Format("SELECT * FROM TBIDB_CATALOG")
End Function End Function
Public Function DOCRESULT_TODAY() As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE CONVERT(DATE,[Added when]) = CONVERT(DATE,GetDate())"
End Function
Public Function DOCRESULT_DocID(DocID As Long) As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE DocID = {DocID}"
End Function
Public Function DOCRESULT_TODAY_ME() As String
Return $"SELECT * FROM VWIDB_DOCRESULT_{IIf(My.Application.User.Language = "de-DE", "DE", "EN")} WHERE CONVERT(DATE,[Added when]) = CONVERT(DATE,GetDate()) AND [Added who] = '{My.Application.User.UserName}'"
End Function
End Class End Class

View File

@ -252,6 +252,12 @@
<Compile Include="Administration\Users\frmAdmin_UserGroupRelations.vb"> <Compile Include="Administration\Users\frmAdmin_UserGroupRelations.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="Dialog1.Designer.vb">
<DependentUpon>Dialog1.vb</DependentUpon>
</Compile>
<Compile Include="Dialog1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmWaitForm.Designer.vb"> <Compile Include="frmWaitForm.Designer.vb">
<DependentUpon>frmWaitForm.vb</DependentUpon> <DependentUpon>frmWaitForm.vb</DependentUpon>
</Compile> </Compile>
@ -307,6 +313,12 @@
<Compile Include="Modules\Globix\frmGlobixNameconvention.vb"> <Compile Include="Modules\Globix\frmGlobixNameconvention.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="Modules\Globix\frmFileflow_Duplicate.Designer.vb">
<DependentUpon>frmFileflow_Duplicate.vb</DependentUpon>
</Compile>
<Compile Include="Modules\Globix\frmFileflow_Duplicate.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Modules\Globix\Models\DocumentType.vb" /> <Compile Include="Modules\Globix\Models\DocumentType.vb" />
<Compile Include="Modules\Globix\Models\ManualIndex.vb" /> <Compile Include="Modules\Globix\Models\ManualIndex.vb" />
<Compile Include="Modules\Globix\Models\WorkFile.vb" /> <Compile Include="Modules\Globix\Models\WorkFile.vb" />
@ -500,6 +512,9 @@
<EmbeddedResource Include="Administration\Users\frmAdmin_UserGroupRelations.resx"> <EmbeddedResource Include="Administration\Users\frmAdmin_UserGroupRelations.resx">
<DependentUpon>frmAdmin_UserGroupRelations.vb</DependentUpon> <DependentUpon>frmAdmin_UserGroupRelations.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="Dialog1.resx">
<DependentUpon>Dialog1.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmWaitForm.resx"> <EmbeddedResource Include="frmWaitForm.resx">
<DependentUpon>frmWaitForm.vb</DependentUpon> <DependentUpon>frmWaitForm.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
@ -521,6 +536,9 @@
<EmbeddedResource Include="Modules\Globix\frmGlobixNameconvention.resx"> <EmbeddedResource Include="Modules\Globix\frmGlobixNameconvention.resx">
<DependentUpon>frmGlobixNameconvention.vb</DependentUpon> <DependentUpon>frmGlobixNameconvention.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="Modules\Globix\frmFileflow_Duplicate.resx">
<DependentUpon>frmFileflow_Duplicate.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="Search\Old\frmFlowSearch.resx"> <EmbeddedResource Include="Search\Old\frmFlowSearch.resx">
<DependentUpon>frmFlowSearch.vb</DependentUpon> <DependentUpon>frmFlowSearch.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>

View File

@ -67,7 +67,7 @@ Partial Class frmFlowForm
Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel1 = New System.Windows.Forms.Panel()
Me.PictureEdit2 = New DevExpress.XtraEditors.PictureEdit() Me.PictureEdit2 = New DevExpress.XtraEditors.PictureEdit()
Me.Panel2 = New System.Windows.Forms.Panel() Me.Panel2 = New System.Windows.Forms.Panel()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.GridControlRecentFiles = New DevExpress.XtraGrid.GridControl()
Me.RecentFilesView = New DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView() Me.RecentFilesView = New DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView()
Me.GridBand1 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand() Me.GridBand1 = New DevExpress.XtraGrid.Views.BandedGrid.GridBand()
Me.colPrimary = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() Me.colPrimary = New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn()
@ -87,7 +87,7 @@ Partial Class frmFlowForm
Me.Panel1.SuspendLayout() Me.Panel1.SuspendLayout()
CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).BeginInit()
Me.Panel2.SuspendLayout() Me.Panel2.SuspendLayout()
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControlRecentFiles, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RecentFilesView, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RecentFilesView, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout() Me.SuspendLayout()
@ -413,7 +413,7 @@ Partial Class frmFlowForm
' '
'Panel2 'Panel2
' '
Me.Panel2.Controls.Add(Me.GridControl1) Me.Panel2.Controls.Add(Me.GridControlRecentFiles)
Me.Panel2.Controls.Add(Me.PictureBoxPM) Me.Panel2.Controls.Add(Me.PictureBoxPM)
Me.Panel2.Controls.Add(Me.LabelControl1) Me.Panel2.Controls.Add(Me.LabelControl1)
Me.Panel2.Controls.Add(Me.Panel3) Me.Panel2.Controls.Add(Me.Panel3)
@ -425,16 +425,16 @@ Partial Class frmFlowForm
Me.Panel2.Size = New System.Drawing.Size(202, 572) Me.Panel2.Size = New System.Drawing.Size(202, 572)
Me.Panel2.TabIndex = 17 Me.Panel2.TabIndex = 17
' '
'GridControl1 'GridControlRecentFiles
' '
Me.GridControl1.Anchor = System.Windows.Forms.AnchorStyles.Bottom Me.GridControlRecentFiles.Anchor = System.Windows.Forms.AnchorStyles.Bottom
Me.GridControl1.Location = New System.Drawing.Point(21, 246) Me.GridControlRecentFiles.Location = New System.Drawing.Point(21, 246)
Me.GridControl1.MainView = Me.RecentFilesView Me.GridControlRecentFiles.MainView = Me.RecentFilesView
Me.GridControl1.MenuManager = Me.BarManager1 Me.GridControlRecentFiles.MenuManager = Me.BarManager1
Me.GridControl1.Name = "GridControl1" Me.GridControlRecentFiles.Name = "GridControlRecentFiles"
Me.GridControl1.Size = New System.Drawing.Size(158, 182) Me.GridControlRecentFiles.Size = New System.Drawing.Size(158, 182)
Me.GridControl1.TabIndex = 18 Me.GridControlRecentFiles.TabIndex = 18
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.RecentFilesView}) Me.GridControlRecentFiles.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.RecentFilesView})
' '
'RecentFilesView 'RecentFilesView
' '
@ -442,7 +442,7 @@ Partial Class frmFlowForm
Me.RecentFilesView.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.Simple Me.RecentFilesView.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.Simple
Me.RecentFilesView.Columns.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() {Me.colPrimary, Me.colSecondary}) Me.RecentFilesView.Columns.AddRange(New DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn() {Me.colPrimary, Me.colSecondary})
Me.RecentFilesView.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.None Me.RecentFilesView.FocusRectStyle = DevExpress.XtraGrid.Views.Grid.DrawFocusRectStyle.None
Me.RecentFilesView.GridControl = Me.GridControl1 Me.RecentFilesView.GridControl = Me.GridControlRecentFiles
Me.RecentFilesView.Name = "RecentFilesView" Me.RecentFilesView.Name = "RecentFilesView"
Me.RecentFilesView.OptionsBehavior.Editable = False Me.RecentFilesView.OptionsBehavior.Editable = False
Me.RecentFilesView.OptionsBehavior.ReadOnly = True Me.RecentFilesView.OptionsBehavior.ReadOnly = True
@ -513,7 +513,7 @@ Partial Class frmFlowForm
'PMTaskBadgeIndividual 'PMTaskBadgeIndividual
' '
Me.PMTaskBadgeIndividual.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer)) Me.PMTaskBadgeIndividual.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(214, Byte), Integer), CType(CType(49, Byte), Integer))
Me.PMTaskBadgeIndividual.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.PMTaskBadgeIndividual.Appearance.Font = New System.Drawing.Font("Tahoma", 9.75!, System.Drawing.FontStyle.Bold)
Me.PMTaskBadgeIndividual.Appearance.ForeColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(49, Byte), Integer)) Me.PMTaskBadgeIndividual.Appearance.ForeColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(49, Byte), Integer))
Me.PMTaskBadgeIndividual.Appearance.Options.UseBackColor = True Me.PMTaskBadgeIndividual.Appearance.Options.UseBackColor = True
Me.PMTaskBadgeIndividual.Appearance.Options.UseFont = True Me.PMTaskBadgeIndividual.Appearance.Options.UseFont = True
@ -560,7 +560,7 @@ Partial Class frmFlowForm
Me.Panel1.ResumeLayout(False) Me.Panel1.ResumeLayout(False)
CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PictureEdit2.Properties, System.ComponentModel.ISupportInitialize).EndInit()
Me.Panel2.ResumeLayout(False) Me.Panel2.ResumeLayout(False)
CType(Me.GridControl1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControlRecentFiles, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.RecentFilesView, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.RecentFilesView, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.AdornerUIManager1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False) Me.ResumeLayout(False)
@ -607,7 +607,7 @@ Partial Class frmFlowForm
Friend WithEvents bbtnitmAusblenden As DevExpress.XtraBars.BarButtonItem Friend WithEvents bbtnitmAusblenden As DevExpress.XtraBars.BarButtonItem
Friend WithEvents EinblendenToolStripMenuItem As ToolStripMenuItem Friend WithEvents EinblendenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents SucheEntwurfToolStripMenuItem As ToolStripMenuItem Friend WithEvents SucheEntwurfToolStripMenuItem As ToolStripMenuItem
Friend WithEvents GridControl1 As DevExpress.XtraGrid.GridControl Friend WithEvents GridControlRecentFiles As DevExpress.XtraGrid.GridControl
Friend WithEvents RecentFilesView As DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView Friend WithEvents RecentFilesView As DevExpress.XtraGrid.Views.BandedGrid.AdvBandedGridView
Friend WithEvents colSecondary As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn Friend WithEvents colSecondary As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn
Friend WithEvents colPrimary As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn Friend WithEvents colPrimary As DevExpress.XtraGrid.Views.BandedGrid.BandedGridColumn

View File

@ -361,7 +361,7 @@ Public Class frmFlowForm
Dim oSql = $"SELECT TOP 10 * FROM VWIDB_DOCRESULT_DE WHERE [Changed who] = '{My.Application.User.UserName}' ORDER BY [Changed when] DESC" Dim oSql = $"SELECT TOP 10 * FROM VWIDB_DOCRESULT_DE WHERE [Changed who] = '{My.Application.User.UserName}' ORDER BY [Changed when] DESC"
Dim AccessedFilesTable = Await My.Database.GetDatatableIDBAsync(oSql) Dim AccessedFilesTable = Await My.Database.GetDatatableIDBAsync(oSql)
GridControl1.DataSource = AccessedFilesTable GridControlRecentFiles.DataSource = AccessedFilesTable
colPrimary.FieldName = "DisplayFileName" colPrimary.FieldName = "DisplayFileName"
colSecondary.FieldName = "Changed when" colSecondary.FieldName = "Changed when"
Catch ex As Exception Catch ex As Exception
@ -498,11 +498,18 @@ Public Class frmFlowForm
End Sub End Sub
Sub ExitZooflow() Sub ExitZooflow()
Dim oMsgBox As New MsgBoxEx("Are you sure you want to close ZooFlow?", "Exit Zooflow", MessageBoxIcon.Question) Dim omessage = "Wollen sie ZooFlow wirklich beenden?"
oMsgBox.SetButtons("Yes", "No") If My.Application.User.Language <> "de-DE" Then
omessage = "Are you sure you want to close ZooFlow?"
End If
Dim oTitle = "Zooflow beenden"
If My.Application.User.Language <> "de-DE" Then
oTitle = "Exit Zooflow"
End If
Dim oMsgBox As New Dialog1(omessage, oTitle)
oMsgBox.ShowDialog() oMsgBox.ShowDialog()
If oMsgBox.Result = MsgBoxEx.DialogBoxResult.Button1 Then If oMsgBox.DialogResult = DialogResult.OK Then
Close() Close()
Else Else
ESCHitCount = 0 ESCHitCount = 0
@ -723,6 +730,13 @@ Public Class frmFlowForm
NotifyIconReset() NotifyIconReset()
AddHandler IndexForm.FormClosed, AddressOf GlobixClosed AddHandler IndexForm.FormClosed, AddressOf GlobixClosed
IndexForm.ShowDialog() IndexForm.ShowDialog()
If IndexForm.oSuccess = True Then
Dim oMessage As String = "Datei erfolgreich importiert!"
If My.Application.User.Language <> "de-DE" Then
oMessage = "File successfully imported!"
End If
NotifyIcon.ShowBalloonTip(15000, "FileFlow", oMessage, ToolTipIcon.Info)
End If
Cursor = Cursors.Default Cursor = Cursors.Default
Catch ex As Exception Catch ex As Exception
ShowErrorMessage(ex) ShowErrorMessage(ex)
@ -1253,7 +1267,7 @@ Public Class frmFlowForm
Dim oRow As DataRow = oFile.Row Dim oRow As DataRow = oFile.Row
Dim oObjectId As Long = oRow.Item("DocId") Dim oObjectId As Long = oRow.Item("DocId")
Dim oDataSource As DataTable = GridControl1.DataSource Dim oDataSource As DataTable = GridControlRecentFiles.DataSource
Dim oResult = oDataSource.AsEnumerable(). Dim oResult = oDataSource.AsEnumerable().
Where(Function(row) row.Item("DocId") = oObjectId). Where(Function(row) row.Item("DocId") = oObjectId).
CopyToDataTable() CopyToDataTable()