diff --git a/DDUserManager/DDUserManager/frmADImport_Groups.Designer.vb b/DDUserManager/DDUserManager/frmADImport_Groups.Designer.vb
index d2cb21f..ea4f1dc 100644
--- a/DDUserManager/DDUserManager/frmADImport_Groups.Designer.vb
+++ b/DDUserManager/DDUserManager/frmADImport_Groups.Designer.vb
@@ -32,11 +32,14 @@ Partial Class frmADImport_Groups
Me.btnImport = New System.Windows.Forms.Button()
Me.DS_ChangeS = New DDUserManager.DS_ChangeS()
Me.lbGroupsCount = New System.Windows.Forms.Label()
+ Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+ Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
CType(Me.gridAD_Groups, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBLOCAL_ADGROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.UserDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.viewAD_Groups, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DS_ChangeS, System.ComponentModel.ISupportInitialize).BeginInit()
+ Me.StatusStrip1.SuspendLayout()
Me.SuspendLayout()
'
'gridAD_Groups
@@ -84,7 +87,7 @@ Partial Class frmADImport_Groups
Me.btnImport.Enabled = False
Me.btnImport.Image = Global.DDUserManager.My.Resources.Resources.group_go
Me.btnImport.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.btnImport.Location = New System.Drawing.Point(963, 649)
+ Me.btnImport.Location = New System.Drawing.Point(963, 636)
Me.btnImport.Name = "btnImport"
Me.btnImport.Size = New System.Drawing.Size(179, 27)
Me.btnImport.TabIndex = 1
@@ -105,11 +108,27 @@ Partial Class frmADImport_Groups
Me.lbGroupsCount.TabIndex = 2
Me.lbGroupsCount.Text = "Anzahl Gruppen: {0}"
'
+ 'StatusStrip1
+ '
+ Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1})
+ Me.StatusStrip1.Location = New System.Drawing.Point(0, 666)
+ Me.StatusStrip1.Name = "StatusStrip1"
+ Me.StatusStrip1.Size = New System.Drawing.Size(1154, 22)
+ Me.StatusStrip1.TabIndex = 3
+ Me.StatusStrip1.Text = "StatusStrip1"
+ '
+ 'ToolStripStatusLabel1
+ '
+ Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
+ Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(119, 17)
+ Me.ToolStripStatusLabel1.Text = "ToolStripStatusLabel1"
+ '
'frmADImport_Groups
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1154, 688)
+ Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.lbGroupsCount)
Me.Controls.Add(Me.btnImport)
Me.Controls.Add(Me.gridAD_Groups)
@@ -121,6 +140,8 @@ Partial Class frmADImport_Groups
CType(Me.UserDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.viewAD_Groups, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DS_ChangeS, System.ComponentModel.ISupportInitialize).EndInit()
+ Me.StatusStrip1.ResumeLayout(False)
+ Me.StatusStrip1.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
@@ -134,4 +155,6 @@ Partial Class frmADImport_Groups
Friend WithEvents btnImport As Button
Friend WithEvents DS_ChangeS As DS_ChangeS
Friend WithEvents lbGroupsCount As Label
+ Friend WithEvents StatusStrip1 As StatusStrip
+ Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel
End Class
diff --git a/DDUserManager/DDUserManager/frmADImport_Groups.resx b/DDUserManager/DDUserManager/frmADImport_Groups.resx
index 936b2f1..0fb39e2 100644
--- a/DDUserManager/DDUserManager/frmADImport_Groups.resx
+++ b/DDUserManager/DDUserManager/frmADImport_Groups.resx
@@ -126,6 +126,9 @@
626, 17
+
+ 746, 17
+
diff --git a/DDUserManager/DDUserManager/frmADImport_Groups.vb b/DDUserManager/DDUserManager/frmADImport_Groups.vb
index b0d2924..022826b 100644
--- a/DDUserManager/DDUserManager/frmADImport_Groups.vb
+++ b/DDUserManager/DDUserManager/frmADImport_Groups.vb
@@ -11,6 +11,7 @@ Public Class frmADImport_Groups
Try
logger = MyLogConfig.GetLogger()
data = New ClassData(MyLogConfig, MyDatabase)
+ ToolStripStatusLabel1.Text = $"ConfigADGroupFilter: {MyConfig.Config.AdGroupFilter}"
activeDirectory = New ActiveDirectoryInterface(MyLogConfig, MyConfig.Config.AdRootPath)
Dim oGroups = activeDirectory.ListGroups(MyConfig.Config.AdGroupFilter)