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

jj: finish ad import

Browse Source
This commit is contained in:
Jonathan Jenne 2018-05-15 16:06:48 +02:00
parent c6be81dda4
commit 0d7ad76980
9 changed files with 146 additions and 130 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
DDUserManager/DDUserManager/App.config
View File

@ -1,13 +1,11 @@
<?xml version="1.0" encoding="utf-8" ?> <?xml version="1.0" encoding="utf-8"?>
<configuration> <configuration>
<configSections> <configSections>
</configSections> </configSections>
<connectionStrings> <connectionStrings>
<add name="DDUserManager.My.MySettings.DD_ECMConnectionString" <add name="DDUserManager.My.MySettings.DD_ECMConnectionString" connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd" providerName="System.Data.SqlClient"/>
connectionString="Data Source=172.24.12.41\tests;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
providerName="System.Data.SqlClient" />
</connectionStrings> </connectionStrings>
<startup> <startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" /> <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.5.2"/>
</startup> </startup>
</configuration> </configuration>

18
DDUserManager/DDUserManager/ApplicationEvents.vb
View File

@ -8,15 +8,15 @@ Namespace My
' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist. ' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist.
' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst. ' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst.
Partial Friend Class MyApplication Partial Friend Class MyApplication
Protected Overrides Function OnStartup(eventArgs As StartupEventArgs) As Boolean 'Protected Overrides Function OnStartup(eventArgs As StartupEventArgs) As Boolean
Dim requiredParam As String = "-internal" ' Dim requiredParam As String = "-internal"
If eventArgs.CommandLine.Count = 1 AndAlso eventArgs.CommandLine.Item(0) = requiredParam Then ' If eventArgs.CommandLine.Count = 1 AndAlso eventArgs.CommandLine.Item(0) = requiredParam Then
Return MyBase.OnStartup(eventArgs) ' Return MyBase.OnStartup(eventArgs)
Else ' Else
MsgBox("Diese Anwendung kann nicht manuell gestartet werden und wird nun beendet.", MsgBoxStyle.Exclamation, "User Manager") ' MsgBox("Diese Anwendung kann nicht manuell gestartet werden und wird nun beendet.", MsgBoxStyle.Exclamation, "User Manager")
Return Nothing ' Return Nothing
End If ' End If
End Function 'End Function
End Class End Class
End Namespace End Namespace

4
DDUserManager/DDUserManager/DDUserManager.vbproj
View File

@ -11,8 +11,9 @@
<AssemblyName>DDUserManager</AssemblyName> <AssemblyName>DDUserManager</AssemblyName>
<FileAlignment>512</FileAlignment> <FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType> <MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion> <TargetFrameworkVersion>v4.5.2</TargetFrameworkVersion>
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects> <AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
<TargetFrameworkProfile />
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget> <PlatformTarget>AnyCPU</PlatformTarget>
@ -62,7 +63,6 @@
<Reference Include="System.Deployment" /> <Reference Include="System.Deployment" />
<Reference Include="System.DirectoryServices" /> <Reference Include="System.DirectoryServices" />
<Reference Include="System.DirectoryServices.AccountManagement" /> <Reference Include="System.DirectoryServices.AccountManagement" />
<Reference Include="System.DirectoryServices.Protocols" />
<Reference Include="System.Drawing" /> <Reference Include="System.Drawing" />
<Reference Include="System.Web.Services" /> <Reference Include="System.Web.Services" />
<Reference Include="System.Windows.Forms" /> <Reference Include="System.Windows.Forms" />

26
DDUserManager/DDUserManager/My Project/Application.Designer.vb generated
View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
' <auto-generated> ' <auto-generated>
' This code was generated by a tool. ' Dieser Code wurde von einem Tool generiert.
' Runtime Version:4.0.30319.42000 ' Laufzeitversion:4.0.30319.42000
' '
' Changes to this file may cause incorrect behavior and will be lost if ' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' the code is regenerated. ' der Code erneut generiert wird.
' </auto-generated> ' </auto-generated>
'------------------------------------------------------------------------------ '------------------------------------------------------------------------------
@ -13,15 +13,15 @@ Option Explicit On
Namespace My Namespace My
'NOTE: This file is auto-generated; do not modify it directly. To make changes, 'HINWEIS: Diese Datei wird automatisch generiert und darf nicht direkt bearbeitet werden. Wenn Sie Änderungen vornehmen möchten
' or if you encounter build errors in this file, go to the Project Designer ' oder in dieser Datei Buildfehler auftreten, wechseln Sie zum Projekt-Designer.
' (go to Project Properties or double-click the My Project node in ' (Wechseln Sie dazu zu den Projekteigenschaften, oder doppelklicken Sie auf den Knoten "Mein Projekt" im
' Solution Explorer), and make changes on the Application tab. ' Projektmappen-Explorer). Nehmen Sie auf der Registerkarte "Anwendung" entsprechende Änderungen vor.
' '
Partial Friend Class MyApplication Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New() Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows) MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false Me.IsSingleInstance = false
@ -29,8 +29,8 @@ Namespace My
Me.SaveMySettingsOnExit = true Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
End Sub End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _ <Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm() Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DDUserManager.frmMain Me.MainForm = Global.DDUserManager.frmMain
End Sub End Sub

5
DDUserManager/DDUserManager/My Project/Application.myapp
View File

@ -1,11 +1,10 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"> <MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain> <MySubMain>true</MySubMain>
<MainForm>Form1</MainForm> <MainForm>frmMain</MainForm>
<SingleInstance>false</SingleInstance> <SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode> <ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles> <EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode> <AuthenticationMode>0</AuthenticationMode>
<ApplicationType>0</ApplicationType>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit> <SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData> </MyApplicationData>

14
DDUserManager/DDUserManager/UserDataSet.xsc
View File

@ -5,5 +5,17 @@
the code is regenerated. the code is regenerated.
</autogenerated>--> </autogenerated>-->
<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource"> <DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TableUISettings /> <TableUISettings>
<TableUISetting Name="TBDD_USER">
<ColumnUISettings>
<ColumnUISetting Name="DATE_FORMAT">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="ComboBox" Type="System.Windows.Forms.ComboBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
</TableUISettings>
</DataSetUISetting> </DataSetUISetting>

28
DDUserManager/DDUserManager/frmADImport.vb
View File

@ -1,5 +1,4 @@
Imports System.DirectoryServices Imports System.DirectoryServices
Imports System.DirectoryServices.ActiveDirectory
Imports System.DirectoryServices.AccountManagement Imports System.DirectoryServices.AccountManagement
Imports DDUserManager.UserDataSet Imports DDUserManager.UserDataSet
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
@ -47,9 +46,14 @@ Public Class frmADImport
Private Sub frmADImport_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub frmADImport_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim groups = GetActiveDirectoryGroups(Environment.UserName) Try
Dim groups = GetActiveDirectoryGroups(Environment.UserName)
gridAD_Groups.DataSource = groups
Catch ex As Exception
MsgBox($"Error while loading initial groups")
End Try
gridAD_Groups.DataSource = groups
End Sub End Sub
Private Function FindUser(rootEntry As DirectoryEntry, samAccountName As String) As DirectoryEntry Private Function FindUser(rootEntry As DirectoryEntry, samAccountName As String) As DirectoryEntry
@ -84,17 +88,17 @@ Public Class frmADImport
Dim users As New List(Of UserPrincipal) Dim users As New List(Of UserPrincipal)
Using context As New PrincipalContext(ContextType.Domain) Using context As New PrincipalContext(ContextType.Domain)
Using group As GroupPrincipal = GroupPrincipal.FindByIdentity(context, IdentityType.Name, groupName)
Using members = group.GetMembers(True)
Dim group As GroupPrincipal = GroupPrincipal.FindByIdentity(context, IdentityType.Name, groupName) For Each member As UserPrincipal In members
Dim members = group.GetMembers(True) If TypeOf member Is UserPrincipal Then
users.Add(member)
End If
Next
End Using
End Using
For Each member As Object In members
If TypeOf member Is UserPrincipal Then
users.Add(member)
End If
Next
End Using End Using
Return users Return users

147
DDUserManager/DDUserManager/frmMain.Designer.vb generated
View File

@ -62,11 +62,11 @@ Partial Class frmMain
Me.tabPageUsers = New DevExpress.XtraTab.XtraTabPage() Me.tabPageUsers = New DevExpress.XtraTab.XtraTabPage()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.SplitContainer2 = New System.Windows.Forms.SplitContainer() Me.SplitContainer2 = New System.Windows.Forms.SplitContainer()
Me.TextBox2 = New System.Windows.Forms.TextBox() Me.DATE_FORMATComboBox = New System.Windows.Forms.ComboBox()
Me.TBDD_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.UserDataSet = New DDUserManager.UserDataSet() Me.UserDataSet = New DDUserManager.UserDataSet()
Me.TextBox2 = New System.Windows.Forms.TextBox()
Me.TextBox1 = New System.Windows.Forms.TextBox() Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.DATE_FORMATTextBox = New System.Windows.Forms.TextBox()
Me.USERID_FK_INT_ECMTextBox = New System.Windows.Forms.TextBox() Me.USERID_FK_INT_ECMTextBox = New System.Windows.Forms.TextBox()
Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox() Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.PRENAMETextBox = New System.Windows.Forms.TextBox() Me.PRENAMETextBox = New System.Windows.Forms.TextBox()
@ -180,6 +180,7 @@ Partial Class frmMain
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator() Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.TBDD_USERBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton() Me.TBDD_USERBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.tabPageGroups = New DevExpress.XtraTab.XtraTabPage() Me.tabPageGroups = New DevExpress.XtraTab.XtraTabPage()
Me.GridControl1 = New DevExpress.XtraGrid.GridControl() Me.GridControl1 = New DevExpress.XtraGrid.GridControl()
Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView() Me.GridView2 = New DevExpress.XtraGrid.Views.Grid.GridView()
@ -269,7 +270,6 @@ Partial Class frmMain
Me.TBDD_USER_MODULESTableAdapter = New DDUserManager.UserDataSetTableAdapters.TBDD_USER_MODULESTableAdapter() Me.TBDD_USER_MODULESTableAdapter = New DDUserManager.UserDataSetTableAdapters.TBDD_USER_MODULESTableAdapter()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.tsLabelUser = New System.Windows.Forms.ToolStripStatusLabel() Me.tsLabelUser = New System.Windows.Forms.ToolStripStatusLabel()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
GUIDLabel = New System.Windows.Forms.Label() GUIDLabel = New System.Windows.Forms.Label()
PRENAMELabel = New System.Windows.Forms.Label() PRENAMELabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label() NAMELabel = New System.Windows.Forms.Label()
@ -712,7 +712,7 @@ Partial Class frmMain
Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0) Me.XtraTabControl1.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl1.Name = "XtraTabControl1" Me.XtraTabControl1.Name = "XtraTabControl1"
Me.XtraTabControl1.SelectedTabPage = Me.tabPageUsers Me.XtraTabControl1.SelectedTabPage = Me.tabPageUsers
Me.XtraTabControl1.Size = New System.Drawing.Size(1199, 815) Me.XtraTabControl1.Size = New System.Drawing.Size(1199, 837)
Me.XtraTabControl1.TabIndex = 0 Me.XtraTabControl1.TabIndex = 0
Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.tabPageUsers, Me.tabPageGroups, Me.tabPageClients, Me.tabPageModules}) Me.XtraTabControl1.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.tabPageUsers, Me.tabPageGroups, Me.tabPageClients, Me.tabPageModules})
' '
@ -723,7 +723,7 @@ Partial Class frmMain
Me.tabPageUsers.Controls.Add(Me.TBDD_USERBindingNavigator) Me.tabPageUsers.Controls.Add(Me.TBDD_USERBindingNavigator)
Me.tabPageUsers.Image = Global.DDUserManager.My.Resources.Resources.user Me.tabPageUsers.Image = Global.DDUserManager.My.Resources.Resources.user
Me.tabPageUsers.Name = "tabPageUsers" Me.tabPageUsers.Name = "tabPageUsers"
Me.tabPageUsers.Size = New System.Drawing.Size(1193, 784) Me.tabPageUsers.Size = New System.Drawing.Size(1193, 806)
Me.tabPageUsers.Text = "Benutzer" Me.tabPageUsers.Text = "Benutzer"
' '
'SplitContainer1 'SplitContainer1
@ -741,8 +741,8 @@ Partial Class frmMain
'SplitContainer1.Panel2 'SplitContainer1.Panel2
' '
Me.SplitContainer1.Panel2.Controls.Add(Me.XtraTabControl2) Me.SplitContainer1.Panel2.Controls.Add(Me.XtraTabControl2)
Me.SplitContainer1.Size = New System.Drawing.Size(1193, 759) Me.SplitContainer1.Size = New System.Drawing.Size(1193, 781)
Me.SplitContainer1.SplitterDistance = 377 Me.SplitContainer1.SplitterDistance = 387
Me.SplitContainer1.TabIndex = 63 Me.SplitContainer1.TabIndex = 63
' '
'SplitContainer2 'SplitContainer2
@ -754,12 +754,13 @@ Partial Class frmMain
' '
'SplitContainer2.Panel1 'SplitContainer2.Panel1
' '
Me.SplitContainer2.Panel1.AutoScroll = True
Me.SplitContainer2.Panel1.Controls.Add(Me.DATE_FORMATComboBox)
Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox2) Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox2)
Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox1) Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox1)
Me.SplitContainer2.Panel1.Controls.Add(ADDED_WHOLabel) Me.SplitContainer2.Panel1.Controls.Add(ADDED_WHOLabel)
Me.SplitContainer2.Panel1.Controls.Add(GUIDLabel) Me.SplitContainer2.Panel1.Controls.Add(GUIDLabel)
Me.SplitContainer2.Panel1.Controls.Add(CHANGED_WHENLabel) Me.SplitContainer2.Panel1.Controls.Add(CHANGED_WHENLabel)
Me.SplitContainer2.Panel1.Controls.Add(Me.DATE_FORMATTextBox)
Me.SplitContainer2.Panel1.Controls.Add(USERID_FK_INT_ECMLabel) Me.SplitContainer2.Panel1.Controls.Add(USERID_FK_INT_ECMLabel)
Me.SplitContainer2.Panel1.Controls.Add(Me.USERID_FK_INT_ECMTextBox) Me.SplitContainer2.Panel1.Controls.Add(Me.USERID_FK_INT_ECMTextBox)
Me.SplitContainer2.Panel1.Controls.Add(DATE_FORMATLabel) Me.SplitContainer2.Panel1.Controls.Add(DATE_FORMATLabel)
@ -793,18 +794,19 @@ Partial Class frmMain
Me.SplitContainer2.Panel2.Controls.Add(Me.listGroups) Me.SplitContainer2.Panel2.Controls.Add(Me.listGroups)
Me.SplitContainer2.Panel2.Controls.Add(Me.Label2) Me.SplitContainer2.Panel2.Controls.Add(Me.Label2)
Me.SplitContainer2.Panel2.Controls.Add(Me.listClients) Me.SplitContainer2.Panel2.Controls.Add(Me.listClients)
Me.SplitContainer2.Size = New System.Drawing.Size(765, 377) Me.SplitContainer2.Size = New System.Drawing.Size(765, 387)
Me.SplitContainer2.SplitterDistance = 197 Me.SplitContainer2.SplitterDistance = 202
Me.SplitContainer2.TabIndex = 63 Me.SplitContainer2.TabIndex = 63
' '
'TextBox2 'DATE_FORMATComboBox
' '
Me.TextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "CHANGED_WHEN", True)) Me.DATE_FORMATComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "DATE_FORMAT", True))
Me.TextBox2.Location = New System.Drawing.Point(576, 102) Me.DATE_FORMATComboBox.FormattingEnabled = True
Me.TextBox2.Name = "TextBox2" Me.DATE_FORMATComboBox.Items.AddRange(New Object() {"dd.MM.yyyy", "MM.dd.yyyy", "yyyy-MM-dd"})
Me.TextBox2.ReadOnly = True Me.DATE_FORMATComboBox.Location = New System.Drawing.Point(106, 129)
Me.TextBox2.Size = New System.Drawing.Size(163, 21) Me.DATE_FORMATComboBox.Name = "DATE_FORMATComboBox"
Me.TextBox2.TabIndex = 53 Me.DATE_FORMATComboBox.Size = New System.Drawing.Size(109, 21)
Me.DATE_FORMATComboBox.TabIndex = 54
' '
'TBDD_USERBindingSource 'TBDD_USERBindingSource
' '
@ -816,6 +818,15 @@ Partial Class frmMain
Me.UserDataSet.DataSetName = "UserDataSet" Me.UserDataSet.DataSetName = "UserDataSet"
Me.UserDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema Me.UserDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
' '
'TextBox2
'
Me.TextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "CHANGED_WHEN", True))
Me.TextBox2.Location = New System.Drawing.Point(576, 102)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.ReadOnly = True
Me.TextBox2.Size = New System.Drawing.Size(163, 21)
Me.TextBox2.TabIndex = 53
'
'TextBox1 'TextBox1
' '
Me.TextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "ADDED_WHEN", True)) Me.TextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "ADDED_WHEN", True))
@ -825,14 +836,6 @@ Partial Class frmMain
Me.TextBox1.Size = New System.Drawing.Size(163, 21) Me.TextBox1.Size = New System.Drawing.Size(163, 21)
Me.TextBox1.TabIndex = 52 Me.TextBox1.TabIndex = 52
' '
'DATE_FORMATTextBox
'
Me.DATE_FORMATTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "DATE_FORMAT", True))
Me.DATE_FORMATTextBox.Location = New System.Drawing.Point(106, 129)
Me.DATE_FORMATTextBox.Name = "DATE_FORMATTextBox"
Me.DATE_FORMATTextBox.Size = New System.Drawing.Size(109, 21)
Me.DATE_FORMATTextBox.TabIndex = 43
'
'USERID_FK_INT_ECMTextBox 'USERID_FK_INT_ECMTextBox
' '
Me.USERID_FK_INT_ECMTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "USERID_FK_INT_ECM", True)) Me.USERID_FK_INT_ECMTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBDD_USERBindingSource, "USERID_FK_INT_ECM", True))
@ -1019,7 +1022,7 @@ Partial Class frmMain
Me.GridUsers.Location = New System.Drawing.Point(765, 0) Me.GridUsers.Location = New System.Drawing.Point(765, 0)
Me.GridUsers.MainView = Me.gvUsers Me.GridUsers.MainView = Me.gvUsers
Me.GridUsers.Name = "GridUsers" Me.GridUsers.Name = "GridUsers"
Me.GridUsers.Size = New System.Drawing.Size(428, 377) Me.GridUsers.Size = New System.Drawing.Size(428, 387)
Me.GridUsers.TabIndex = 58 Me.GridUsers.TabIndex = 58
Me.GridUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.gvUsers}) Me.GridUsers.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.gvUsers})
' '
@ -1072,7 +1075,7 @@ Partial Class frmMain
Me.XtraTabControl2.Location = New System.Drawing.Point(0, 0) Me.XtraTabControl2.Location = New System.Drawing.Point(0, 0)
Me.XtraTabControl2.Name = "XtraTabControl2" Me.XtraTabControl2.Name = "XtraTabControl2"
Me.XtraTabControl2.SelectedTabPage = Me.tabGroupAssign Me.XtraTabControl2.SelectedTabPage = Me.tabGroupAssign
Me.XtraTabControl2.Size = New System.Drawing.Size(1193, 378) Me.XtraTabControl2.Size = New System.Drawing.Size(1193, 390)
Me.XtraTabControl2.TabIndex = 0 Me.XtraTabControl2.TabIndex = 0
Me.XtraTabControl2.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.tabGroupAssign, Me.tabClientAssign, Me.tabModuleAssign}) Me.XtraTabControl2.TabPages.AddRange(New DevExpress.XtraTab.XtraTabPage() {Me.tabGroupAssign, Me.tabClientAssign, Me.tabModuleAssign})
' '
@ -1081,7 +1084,7 @@ Partial Class frmMain
Me.tabGroupAssign.Controls.Add(Me.SplitContainerUserGroups1) Me.tabGroupAssign.Controls.Add(Me.SplitContainerUserGroups1)
Me.tabGroupAssign.Image = Global.DDUserManager.My.Resources.Resources.group Me.tabGroupAssign.Image = Global.DDUserManager.My.Resources.Resources.group
Me.tabGroupAssign.Name = "tabGroupAssign" Me.tabGroupAssign.Name = "tabGroupAssign"
Me.tabGroupAssign.Size = New System.Drawing.Size(1187, 347) Me.tabGroupAssign.Size = New System.Drawing.Size(1187, 359)
Me.tabGroupAssign.Text = "Gruppen Zuordnung" Me.tabGroupAssign.Text = "Gruppen Zuordnung"
' '
'SplitContainerUserGroups1 'SplitContainerUserGroups1
@ -1098,7 +1101,7 @@ Partial Class frmMain
' '
Me.SplitContainerUserGroups1.Panel2.Controls.Add(Me.Label5) Me.SplitContainerUserGroups1.Panel2.Controls.Add(Me.Label5)
Me.SplitContainerUserGroups1.Panel2.Controls.Add(Me.gridGroups_AssignedUsers) Me.SplitContainerUserGroups1.Panel2.Controls.Add(Me.gridGroups_AssignedUsers)
Me.SplitContainerUserGroups1.Size = New System.Drawing.Size(1187, 347) Me.SplitContainerUserGroups1.Size = New System.Drawing.Size(1187, 359)
Me.SplitContainerUserGroups1.SplitterDistance = 738 Me.SplitContainerUserGroups1.SplitterDistance = 738
Me.SplitContainerUserGroups1.TabIndex = 8 Me.SplitContainerUserGroups1.TabIndex = 8
' '
@ -1118,7 +1121,7 @@ Partial Class frmMain
Me.SplitContainerUserGroups2.Panel2.Controls.Add(Me.Label4) Me.SplitContainerUserGroups2.Panel2.Controls.Add(Me.Label4)
Me.SplitContainerUserGroups2.Panel2.Controls.Add(Me.gridGroups_AvailableUsers) Me.SplitContainerUserGroups2.Panel2.Controls.Add(Me.gridGroups_AvailableUsers)
Me.SplitContainerUserGroups2.Panel2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!) Me.SplitContainerUserGroups2.Panel2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
Me.SplitContainerUserGroups2.Size = New System.Drawing.Size(738, 347) Me.SplitContainerUserGroups2.Size = New System.Drawing.Size(738, 359)
Me.SplitContainerUserGroups2.SplitterDistance = 368 Me.SplitContainerUserGroups2.SplitterDistance = 368
Me.SplitContainerUserGroups2.TabIndex = 0 Me.SplitContainerUserGroups2.TabIndex = 0
' '
@ -1128,7 +1131,7 @@ Partial Class frmMain
Me.Label3.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label3.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(0, 0) Me.Label3.Location = New System.Drawing.Point(0, 0)
Me.Label3.Name = "Label3" Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(368, 31) Me.Label3.Size = New System.Drawing.Size(368, 43)
Me.Label3.TabIndex = 7 Me.Label3.TabIndex = 7
Me.Label3.Text = "Verfügbare Gruppen:" Me.Label3.Text = "Verfügbare Gruppen:"
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1137,7 +1140,7 @@ Partial Class frmMain
' '
Me.gridGroups_AllGroups.DataSource = Me.TBDD_USER_GROUPSBindingSource Me.gridGroups_AllGroups.DataSource = Me.TBDD_USER_GROUPSBindingSource
Me.gridGroups_AllGroups.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridGroups_AllGroups.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridGroups_AllGroups.Location = New System.Drawing.Point(0, 31) Me.gridGroups_AllGroups.Location = New System.Drawing.Point(0, 43)
Me.gridGroups_AllGroups.MainView = Me.gvGroups_AllGroups Me.gridGroups_AllGroups.MainView = Me.gvGroups_AllGroups
Me.gridGroups_AllGroups.Name = "gridGroups_AllGroups" Me.gridGroups_AllGroups.Name = "gridGroups_AllGroups"
Me.gridGroups_AllGroups.Size = New System.Drawing.Size(368, 316) Me.gridGroups_AllGroups.Size = New System.Drawing.Size(368, 316)
@ -1177,7 +1180,7 @@ Partial Class frmMain
Me.Label4.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label4.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(0, 0) Me.Label4.Location = New System.Drawing.Point(0, 0)
Me.Label4.Name = "Label4" Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(366, 31) Me.Label4.Size = New System.Drawing.Size(366, 43)
Me.Label4.TabIndex = 7 Me.Label4.TabIndex = 7
Me.Label4.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):" Me.Label4.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):"
Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1186,7 +1189,7 @@ Partial Class frmMain
' '
Me.gridGroups_AvailableUsers.AllowDrop = True Me.gridGroups_AvailableUsers.AllowDrop = True
Me.gridGroups_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridGroups_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridGroups_AvailableUsers.Location = New System.Drawing.Point(0, 31) Me.gridGroups_AvailableUsers.Location = New System.Drawing.Point(0, 43)
Me.gridGroups_AvailableUsers.MainView = Me.gvGroups_AvailableUsers Me.gridGroups_AvailableUsers.MainView = Me.gvGroups_AvailableUsers
Me.gridGroups_AvailableUsers.Name = "gridGroups_AvailableUsers" Me.gridGroups_AvailableUsers.Name = "gridGroups_AvailableUsers"
Me.gridGroups_AvailableUsers.Size = New System.Drawing.Size(366, 316) Me.gridGroups_AvailableUsers.Size = New System.Drawing.Size(366, 316)
@ -1249,7 +1252,7 @@ Partial Class frmMain
Me.Label5.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label5.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label5.Location = New System.Drawing.Point(0, 0) Me.Label5.Location = New System.Drawing.Point(0, 0)
Me.Label5.Name = "Label5" Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(445, 31) Me.Label5.Size = New System.Drawing.Size(445, 43)
Me.Label5.TabIndex = 7 Me.Label5.TabIndex = 7
Me.Label5.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):" Me.Label5.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):"
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1258,7 +1261,7 @@ Partial Class frmMain
' '
Me.gridGroups_AssignedUsers.AllowDrop = True Me.gridGroups_AssignedUsers.AllowDrop = True
Me.gridGroups_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridGroups_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridGroups_AssignedUsers.Location = New System.Drawing.Point(0, 31) Me.gridGroups_AssignedUsers.Location = New System.Drawing.Point(0, 43)
Me.gridGroups_AssignedUsers.MainView = Me.gvGroups_AssignedUsers Me.gridGroups_AssignedUsers.MainView = Me.gvGroups_AssignedUsers
Me.gridGroups_AssignedUsers.Name = "gridGroups_AssignedUsers" Me.gridGroups_AssignedUsers.Name = "gridGroups_AssignedUsers"
Me.gridGroups_AssignedUsers.Size = New System.Drawing.Size(445, 316) Me.gridGroups_AssignedUsers.Size = New System.Drawing.Size(445, 316)
@ -1320,7 +1323,7 @@ Partial Class frmMain
Me.tabClientAssign.Controls.Add(Me.SplitContainer4) Me.tabClientAssign.Controls.Add(Me.SplitContainer4)
Me.tabClientAssign.Image = Global.DDUserManager.My.Resources.Resources.book Me.tabClientAssign.Image = Global.DDUserManager.My.Resources.Resources.book
Me.tabClientAssign.Name = "tabClientAssign" Me.tabClientAssign.Name = "tabClientAssign"
Me.tabClientAssign.Size = New System.Drawing.Size(1187, 347) Me.tabClientAssign.Size = New System.Drawing.Size(1187, 359)
Me.tabClientAssign.Text = "Mandanten Zuordnung" Me.tabClientAssign.Text = "Mandanten Zuordnung"
' '
'SplitContainer4 'SplitContainer4
@ -1337,7 +1340,7 @@ Partial Class frmMain
'SplitContainer4.Panel2 'SplitContainer4.Panel2
' '
Me.SplitContainer4.Panel2.Controls.Add(Me.SplitContainer5) Me.SplitContainer4.Panel2.Controls.Add(Me.SplitContainer5)
Me.SplitContainer4.Size = New System.Drawing.Size(1187, 347) Me.SplitContainer4.Size = New System.Drawing.Size(1187, 359)
Me.SplitContainer4.SplitterDistance = 369 Me.SplitContainer4.SplitterDistance = 369
Me.SplitContainer4.TabIndex = 0 Me.SplitContainer4.TabIndex = 0
' '
@ -1347,7 +1350,7 @@ Partial Class frmMain
Me.Label6.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label6.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label6.Location = New System.Drawing.Point(0, 0) Me.Label6.Location = New System.Drawing.Point(0, 0)
Me.Label6.Name = "Label6" Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(369, 33) Me.Label6.Size = New System.Drawing.Size(369, 45)
Me.Label6.TabIndex = 1 Me.Label6.TabIndex = 1
Me.Label6.Text = "Verfügbare Mandanten:" Me.Label6.Text = "Verfügbare Mandanten:"
Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1356,7 +1359,7 @@ Partial Class frmMain
' '
Me.gridClients_AllClients.DataSource = Me.TBDD_CLIENTBindingSource Me.gridClients_AllClients.DataSource = Me.TBDD_CLIENTBindingSource
Me.gridClients_AllClients.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridClients_AllClients.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridClients_AllClients.Location = New System.Drawing.Point(0, 33) Me.gridClients_AllClients.Location = New System.Drawing.Point(0, 45)
Me.gridClients_AllClients.MainView = Me.gvClients_AllClients Me.gridClients_AllClients.MainView = Me.gvClients_AllClients
Me.gridClients_AllClients.Name = "gridClients_AllClients" Me.gridClients_AllClients.Name = "gridClients_AllClients"
Me.gridClients_AllClients.Size = New System.Drawing.Size(369, 314) Me.gridClients_AllClients.Size = New System.Drawing.Size(369, 314)
@ -1413,7 +1416,7 @@ Partial Class frmMain
' '
Me.SplitContainer5.Panel2.Controls.Add(Me.Label8) Me.SplitContainer5.Panel2.Controls.Add(Me.Label8)
Me.SplitContainer5.Panel2.Controls.Add(Me.gridClients_AssignedUsers) Me.SplitContainer5.Panel2.Controls.Add(Me.gridClients_AssignedUsers)
Me.SplitContainer5.Size = New System.Drawing.Size(814, 347) Me.SplitContainer5.Size = New System.Drawing.Size(814, 359)
Me.SplitContainer5.SplitterDistance = 382 Me.SplitContainer5.SplitterDistance = 382
Me.SplitContainer5.TabIndex = 0 Me.SplitContainer5.TabIndex = 0
' '
@ -1423,7 +1426,7 @@ Partial Class frmMain
Me.Label7.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label7.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(0, 0) Me.Label7.Location = New System.Drawing.Point(0, 0)
Me.Label7.Name = "Label7" Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(382, 33) Me.Label7.Size = New System.Drawing.Size(382, 45)
Me.Label7.TabIndex = 2 Me.Label7.TabIndex = 2
Me.Label7.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):" Me.Label7.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):"
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1432,7 +1435,7 @@ Partial Class frmMain
' '
Me.gridClients_AvailableUsers.AllowDrop = True Me.gridClients_AvailableUsers.AllowDrop = True
Me.gridClients_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridClients_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridClients_AvailableUsers.Location = New System.Drawing.Point(0, 33) Me.gridClients_AvailableUsers.Location = New System.Drawing.Point(0, 45)
Me.gridClients_AvailableUsers.MainView = Me.gvClients_AvailableUsers Me.gridClients_AvailableUsers.MainView = Me.gvClients_AvailableUsers
Me.gridClients_AvailableUsers.Name = "gridClients_AvailableUsers" Me.gridClients_AvailableUsers.Name = "gridClients_AvailableUsers"
Me.gridClients_AvailableUsers.Size = New System.Drawing.Size(382, 314) Me.gridClients_AvailableUsers.Size = New System.Drawing.Size(382, 314)
@ -1490,7 +1493,7 @@ Partial Class frmMain
Me.Label8.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label8.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label8.Location = New System.Drawing.Point(0, 0) Me.Label8.Location = New System.Drawing.Point(0, 0)
Me.Label8.Name = "Label8" Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(428, 33) Me.Label8.Size = New System.Drawing.Size(428, 45)
Me.Label8.TabIndex = 2 Me.Label8.TabIndex = 2
Me.Label8.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):" Me.Label8.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):"
Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1499,7 +1502,7 @@ Partial Class frmMain
' '
Me.gridClients_AssignedUsers.AllowDrop = True Me.gridClients_AssignedUsers.AllowDrop = True
Me.gridClients_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridClients_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridClients_AssignedUsers.Location = New System.Drawing.Point(0, 33) Me.gridClients_AssignedUsers.Location = New System.Drawing.Point(0, 45)
Me.gridClients_AssignedUsers.MainView = Me.gvClients_AssignedUsers Me.gridClients_AssignedUsers.MainView = Me.gvClients_AssignedUsers
Me.gridClients_AssignedUsers.Name = "gridClients_AssignedUsers" Me.gridClients_AssignedUsers.Name = "gridClients_AssignedUsers"
Me.gridClients_AssignedUsers.Size = New System.Drawing.Size(428, 314) Me.gridClients_AssignedUsers.Size = New System.Drawing.Size(428, 314)
@ -1556,7 +1559,7 @@ Partial Class frmMain
Me.tabModuleAssign.Controls.Add(Me.SplitContainer6) Me.tabModuleAssign.Controls.Add(Me.SplitContainer6)
Me.tabModuleAssign.Image = Global.DDUserManager.My.Resources.Resources.plugin Me.tabModuleAssign.Image = Global.DDUserManager.My.Resources.Resources.plugin
Me.tabModuleAssign.Name = "tabModuleAssign" Me.tabModuleAssign.Name = "tabModuleAssign"
Me.tabModuleAssign.Size = New System.Drawing.Size(1187, 347) Me.tabModuleAssign.Size = New System.Drawing.Size(1187, 359)
Me.tabModuleAssign.Text = "Modul Zuordnung" Me.tabModuleAssign.Text = "Modul Zuordnung"
' '
'SplitContainer6 'SplitContainer6
@ -1573,7 +1576,7 @@ Partial Class frmMain
'SplitContainer6.Panel2 'SplitContainer6.Panel2
' '
Me.SplitContainer6.Panel2.Controls.Add(Me.SplitContainer7) Me.SplitContainer6.Panel2.Controls.Add(Me.SplitContainer7)
Me.SplitContainer6.Size = New System.Drawing.Size(1187, 347) Me.SplitContainer6.Size = New System.Drawing.Size(1187, 359)
Me.SplitContainer6.SplitterDistance = 394 Me.SplitContainer6.SplitterDistance = 394
Me.SplitContainer6.TabIndex = 0 Me.SplitContainer6.TabIndex = 0
' '
@ -1583,7 +1586,7 @@ Partial Class frmMain
Me.Label9.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label9.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label9.Location = New System.Drawing.Point(0, 0) Me.Label9.Location = New System.Drawing.Point(0, 0)
Me.Label9.Name = "Label9" Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(394, 31) Me.Label9.Size = New System.Drawing.Size(394, 43)
Me.Label9.TabIndex = 8 Me.Label9.TabIndex = 8
Me.Label9.Text = "Verfügbare Module:" Me.Label9.Text = "Verfügbare Module:"
Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label9.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1592,7 +1595,7 @@ Partial Class frmMain
' '
Me.gridModules_AllModules.DataSource = Me.TBDD_MODULESBindingSource Me.gridModules_AllModules.DataSource = Me.TBDD_MODULESBindingSource
Me.gridModules_AllModules.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridModules_AllModules.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridModules_AllModules.Location = New System.Drawing.Point(0, 31) Me.gridModules_AllModules.Location = New System.Drawing.Point(0, 43)
Me.gridModules_AllModules.MainView = Me.gvModules_AllModules Me.gridModules_AllModules.MainView = Me.gvModules_AllModules
Me.gridModules_AllModules.Name = "gridModules_AllModules" Me.gridModules_AllModules.Name = "gridModules_AllModules"
Me.gridModules_AllModules.Size = New System.Drawing.Size(394, 316) Me.gridModules_AllModules.Size = New System.Drawing.Size(394, 316)
@ -1641,7 +1644,7 @@ Partial Class frmMain
' '
Me.SplitContainer7.Panel2.Controls.Add(Me.Label11) Me.SplitContainer7.Panel2.Controls.Add(Me.Label11)
Me.SplitContainer7.Panel2.Controls.Add(Me.gridModules_AssignedUsers) Me.SplitContainer7.Panel2.Controls.Add(Me.gridModules_AssignedUsers)
Me.SplitContainer7.Size = New System.Drawing.Size(789, 347) Me.SplitContainer7.Size = New System.Drawing.Size(789, 359)
Me.SplitContainer7.SplitterDistance = 365 Me.SplitContainer7.SplitterDistance = 365
Me.SplitContainer7.TabIndex = 0 Me.SplitContainer7.TabIndex = 0
' '
@ -1652,7 +1655,7 @@ Partial Class frmMain
Me.Label10.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label10.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label10.Location = New System.Drawing.Point(0, 0) Me.Label10.Location = New System.Drawing.Point(0, 0)
Me.Label10.Name = "Label10" Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(365, 31) Me.Label10.Size = New System.Drawing.Size(365, 43)
Me.Label10.TabIndex = 8 Me.Label10.TabIndex = 8
Me.Label10.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):" Me.Label10.Text = "Verfügbare Benutzer (nach Rechts ziehen, um zuzuordnen):"
Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label10.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1661,7 +1664,7 @@ Partial Class frmMain
' '
Me.gridModules_AvailableUsers.AllowDrop = True Me.gridModules_AvailableUsers.AllowDrop = True
Me.gridModules_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridModules_AvailableUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridModules_AvailableUsers.Location = New System.Drawing.Point(0, 31) Me.gridModules_AvailableUsers.Location = New System.Drawing.Point(0, 43)
Me.gridModules_AvailableUsers.MainView = Me.gvModules_AvailableUsers Me.gridModules_AvailableUsers.MainView = Me.gvModules_AvailableUsers
Me.gridModules_AvailableUsers.Name = "gridModules_AvailableUsers" Me.gridModules_AvailableUsers.Name = "gridModules_AvailableUsers"
Me.gridModules_AvailableUsers.Size = New System.Drawing.Size(365, 316) Me.gridModules_AvailableUsers.Size = New System.Drawing.Size(365, 316)
@ -1724,7 +1727,7 @@ Partial Class frmMain
Me.Label11.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label11.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label11.Location = New System.Drawing.Point(0, 0) Me.Label11.Location = New System.Drawing.Point(0, 0)
Me.Label11.Name = "Label11" Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(420, 31) Me.Label11.Size = New System.Drawing.Size(420, 43)
Me.Label11.TabIndex = 8 Me.Label11.TabIndex = 8
Me.Label11.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):" Me.Label11.Text = "Zugeordnete Benutzer (nach Links ziehen, um Zuordnung zu entfernen):"
Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleLeft Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@ -1733,7 +1736,7 @@ Partial Class frmMain
' '
Me.gridModules_AssignedUsers.AllowDrop = True Me.gridModules_AssignedUsers.AllowDrop = True
Me.gridModules_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom Me.gridModules_AssignedUsers.Dock = System.Windows.Forms.DockStyle.Bottom
Me.gridModules_AssignedUsers.Location = New System.Drawing.Point(0, 31) Me.gridModules_AssignedUsers.Location = New System.Drawing.Point(0, 43)
Me.gridModules_AssignedUsers.MainView = Me.gvModules_AssignedUsers Me.gridModules_AssignedUsers.MainView = Me.gvModules_AssignedUsers
Me.gridModules_AssignedUsers.Name = "gridModules_AssignedUsers" Me.gridModules_AssignedUsers.Name = "gridModules_AssignedUsers"
Me.gridModules_AssignedUsers.Size = New System.Drawing.Size(420, 316) Me.gridModules_AssignedUsers.Size = New System.Drawing.Size(420, 316)
@ -1911,6 +1914,15 @@ Partial Class frmMain
Me.ToolStripButton1.Size = New System.Drawing.Size(150, 22) Me.ToolStripButton1.Size = New System.Drawing.Size(150, 22)
Me.ToolStripButton1.Text = "Active Directory Import" Me.ToolStripButton1.Text = "Active Directory Import"
' '
'ToolStripButton2
'
Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2"
Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton2.Text = "Daten neu laden"
'
'tabPageGroups 'tabPageGroups
' '
Me.tabPageGroups.Controls.Add(Me.GridControl1) Me.tabPageGroups.Controls.Add(Me.GridControl1)
@ -1919,7 +1931,7 @@ Partial Class frmMain
Me.tabPageGroups.Controls.Add(Me.TBDD_USER_GROUPSBindingNavigator) Me.tabPageGroups.Controls.Add(Me.TBDD_USER_GROUPSBindingNavigator)
Me.tabPageGroups.Image = Global.DDUserManager.My.Resources.Resources.group Me.tabPageGroups.Image = Global.DDUserManager.My.Resources.Resources.group
Me.tabPageGroups.Name = "tabPageGroups" Me.tabPageGroups.Name = "tabPageGroups"
Me.tabPageGroups.Size = New System.Drawing.Size(1193, 784) Me.tabPageGroups.Size = New System.Drawing.Size(1193, 806)
Me.tabPageGroups.Text = "Gruppen" Me.tabPageGroups.Text = "Gruppen"
' '
'GridControl1 'GridControl1
@ -1929,7 +1941,7 @@ Partial Class frmMain
Me.GridControl1.Location = New System.Drawing.Point(793, 25) Me.GridControl1.Location = New System.Drawing.Point(793, 25)
Me.GridControl1.MainView = Me.GridView2 Me.GridControl1.MainView = Me.GridView2
Me.GridControl1.Name = "GridControl1" Me.GridControl1.Name = "GridControl1"
Me.GridControl1.Size = New System.Drawing.Size(400, 759) Me.GridControl1.Size = New System.Drawing.Size(400, 781)
Me.GridControl1.TabIndex = 17 Me.GridControl1.TabIndex = 17
Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2}) Me.GridControl1.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
' '
@ -2169,7 +2181,7 @@ Partial Class frmMain
Me.tabPageClients.Controls.Add(Me.GroupBox5) Me.tabPageClients.Controls.Add(Me.GroupBox5)
Me.tabPageClients.Image = Global.DDUserManager.My.Resources.Resources.book Me.tabPageClients.Image = Global.DDUserManager.My.Resources.Resources.book
Me.tabPageClients.Name = "tabPageClients" Me.tabPageClients.Name = "tabPageClients"
Me.tabPageClients.Size = New System.Drawing.Size(1193, 784) Me.tabPageClients.Size = New System.Drawing.Size(1193, 806)
Me.tabPageClients.Text = "Mandanten" Me.tabPageClients.Text = "Mandanten"
' '
'GridControl2 'GridControl2
@ -2179,7 +2191,7 @@ Partial Class frmMain
Me.GridControl2.Location = New System.Drawing.Point(793, 25) Me.GridControl2.Location = New System.Drawing.Point(793, 25)
Me.GridControl2.MainView = Me.GridView4 Me.GridControl2.MainView = Me.GridView4
Me.GridControl2.Name = "GridControl2" Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(400, 759) Me.GridControl2.Size = New System.Drawing.Size(400, 781)
Me.GridControl2.TabIndex = 19 Me.GridControl2.TabIndex = 19
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4}) Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView4})
' '
@ -2447,7 +2459,7 @@ Partial Class frmMain
Me.tabPageModules.Controls.Add(Me.PRODUCT_VERSIONTextBox) Me.tabPageModules.Controls.Add(Me.PRODUCT_VERSIONTextBox)
Me.tabPageModules.Image = Global.DDUserManager.My.Resources.Resources.plugin Me.tabPageModules.Image = Global.DDUserManager.My.Resources.Resources.plugin
Me.tabPageModules.Name = "tabPageModules" Me.tabPageModules.Name = "tabPageModules"
Me.tabPageModules.Size = New System.Drawing.Size(1193, 784) Me.tabPageModules.Size = New System.Drawing.Size(1193, 806)
Me.tabPageModules.Text = "Module" Me.tabPageModules.Text = "Module"
' '
'gridModules 'gridModules
@ -2457,7 +2469,7 @@ Partial Class frmMain
Me.gridModules.Location = New System.Drawing.Point(793, 25) Me.gridModules.Location = New System.Drawing.Point(793, 25)
Me.gridModules.MainView = Me.GridView5 Me.gridModules.MainView = Me.GridView5
Me.gridModules.Name = "gridModules" Me.gridModules.Name = "gridModules"
Me.gridModules.Size = New System.Drawing.Size(400, 759) Me.gridModules.Size = New System.Drawing.Size(400, 781)
Me.gridModules.TabIndex = 39 Me.gridModules.TabIndex = 39
Me.gridModules.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView5}) Me.gridModules.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView5})
' '
@ -2676,7 +2688,7 @@ Partial Class frmMain
'StatusStrip1 'StatusStrip1
' '
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsLabelUser}) Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsLabelUser})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 793) Me.StatusStrip1.Location = New System.Drawing.Point(0, 815)
Me.StatusStrip1.Name = "StatusStrip1" Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(1199, 22) Me.StatusStrip1.Size = New System.Drawing.Size(1199, 22)
Me.StatusStrip1.TabIndex = 1 Me.StatusStrip1.TabIndex = 1
@ -2689,20 +2701,11 @@ Partial Class frmMain
Me.tsLabelUser.Size = New System.Drawing.Size(83, 17) Me.tsLabelUser.Size = New System.Drawing.Size(83, 17)
Me.tsLabelUser.Text = "tsLabelUser" Me.tsLabelUser.Text = "tsLabelUser"
' '
'ToolStripButton2
'
Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton2.Image = CType(resources.GetObject("ToolStripButton2.Image"), System.Drawing.Image)
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2"
Me.ToolStripButton2.Size = New System.Drawing.Size(23, 22)
Me.ToolStripButton2.Text = "Daten neu laden"
'
'frmMain 'frmMain
' '
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1199, 815) Me.ClientSize = New System.Drawing.Size(1199, 837)
Me.Controls.Add(Me.StatusStrip1) Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.XtraTabControl1) Me.Controls.Add(Me.XtraTabControl1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
@ -2851,7 +2854,6 @@ Partial Class frmMain
Friend WithEvents COMMENTTextBox As TextBox Friend WithEvents COMMENTTextBox As TextBox
Friend WithEvents WAN_ENVIRONMENTCheckBox As CheckBox Friend WithEvents WAN_ENVIRONMENTCheckBox As CheckBox
Friend WithEvents USERID_FK_INT_ECMTextBox As TextBox Friend WithEvents USERID_FK_INT_ECMTextBox As TextBox
Friend WithEvents DATE_FORMATTextBox As TextBox
Friend WithEvents ADDED_WHOTextBox As TextBox Friend WithEvents ADDED_WHOTextBox As TextBox
Friend WithEvents CHANGED_WHOTextBox As TextBox Friend WithEvents CHANGED_WHOTextBox As TextBox
Friend WithEvents tabPageClients As DevExpress.XtraTab.XtraTabPage Friend WithEvents tabPageClients As DevExpress.XtraTab.XtraTabPage
@ -3033,4 +3035,5 @@ Partial Class frmMain
Friend WithEvents TextBox6 As TextBox Friend WithEvents TextBox6 As TextBox
Friend WithEvents TextBox5 As TextBox Friend WithEvents TextBox5 As TextBox
Friend WithEvents ToolStripButton2 As ToolStripButton Friend WithEvents ToolStripButton2 As ToolStripButton
Friend WithEvents DATE_FORMATComboBox As ComboBox
End Class End Class

24
DDUserManager/DDUserManager/frmMain.resx
View File

@ -312,18 +312,18 @@
<data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="ToolStripButton2.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8 iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJqSURBVDhPlZPtT1JhGMbZ/DvIGUYtrS1lOQgzli+pgDqB YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAJsSURBVDhPldPdT1JhHAdwNv8OcoZZM9YWsgxfMjbUoeDL
NpnIAWE4fGG5TCVROYLKCXlREJMkzWXT3Njcoqwslem0F5O19dlvzs2vzW9XeHimo1rL37dr93PtPnt+ ENo0kEfE0fCF5TKVRPQIKicUFVDTJM1l09xYbGFvlsp02gvJ2rr2zrl527z7hodnOqq1/Nz99jvfPWfP
z+H8D3efyTuV88oMEs+OPFSaKPdJwiT+nXurWq55ucHSuFQX0yyqDuqeV6N2qhKyYAlML7TQzagh6sn3 9xze/7j1tKxdvahOoePZKfxFMfmIdJqOf3d3Tc83v6m11L+sDt9e1hxUP6uAaqYUSn8hTM/1qJurQU5X
kuPpmN/qhKY3mii93gX/9jDC38YwtRvAxI4XY58ewbM1iMF4HxQBOXKb+QOklqLptZZrfKWOjmw5MPt9 loc+nsz8tk5ieq0LMhsdGN0ZxPQ3L2Z2fZiMeuD99BDD2/3oj9hR5SuDsDGjj8YS7qzo+cZXNcGhbQfm
EqGvHjze8SPw2Q3v9hCYDRqOuA29q12QusuQbchykWqKxiW1xfbhPqYTIYR3xuDedMIwp8EtpxAimwD5 v09h4uswHkVH4fvshmdnAOwmA0fEhu61DijcxRAY01w0mlAfqrHYPtzDbGwC01Ev3FtOGBd0uOmUIMcm
HVdR5S1HBVOCbF3mKKmdUr9QGxte72M3uuI0bjOFe4X2624yZuEbeAme9lyExHQUT6X7VROlR3d8kp+S RlbbFZR75ChhC5FOUsdo7JR2SRUe3LBzJ7oiDKRs/l5+7zU3XXPSDYKYQH8uQMdkqicl++WTsqOiEenP
wRuH4j4BTUYnZDVwrRwlJ0Mzr6BUM3KqZrKcko5KqGJGTHGkgWKq1F1EFTmFlNAmoK515FLHztvW9FbS AmfuYZ5dzNDVibRavpWn5qXoFquIZq6MVE7JiWJMSmRsHuEpfDJS5C4gBU4JkdjE5GqbkBx33rJusNL8
P0E5LaPlobLD1DLRkbhXsE9G6bR+1EealjUJEllqn1S4ZYGSvZENZ9LKEDqW2pL3cyVGxqe0rFCjjk0r CfWsklH6iw+5wxzXj/K6Rft0laz5oyFgWtHG6MhRPS5xK72Fe0ObzngrA2gLtcTvRxim61NNq2TMsWVF
+tceQLOgQPIVIvnJML/Ug1mnWaXDG3aoxquR08K3kFoK8zuti453Ye7HFKs0khhPU2pf62aV6mfrcdl8 z/p96JaqEP8KEX9lmF8YwG4wXKWDm73QjFfgclOGhcYSzO/0LibSgYUfM1ylgdh4UqW9651cpYZ5LTLN
IcrT8rikmiL5Cgcevm9HZDfIKg1+8cC37QKz6UD/SjeaFw2o8Vfikik7ytNlCkktHdWMzNsaNcI0T6GY F4ICvYBPown1oeq+B+9bEdj1c5X6vwxjZMcFdsuBntVONC4bUTlaikum9KCgLlVCY8k0swpPc7ABpkUC
KcRNugAF1jzktecc5DZfjPGN5y1/bP6d4x8nqTTtEs/EsUZhT34nif+Aw/kFSy8zXbcRzP8AAAAASUVO GZuPG0w2sq0iiFozD4SNF8MZDectf5z8u+MfR+rITbrEMzmuUdKV1U7Hf+DxfgHgUTMrC91zfgAAAABJ
RK5CYII= RU5ErkJggg==
</value> </value>
</data> </data>
<metadata name="TBDD_USER_GROUPSBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBDD_USER_GROUPSBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">