edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Ansicht API-Liste und Fehlerliste

Browse Source
This commit is contained in:
d.breimaier
2023-07-17 16:54:32 +02:00
parent 565e1f9942
commit 60bc349378
11 changed files with 1774 additions and 511 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
UID/Mitarbeiter/frmMitarbDetails.Designer.vb generated
View File

@@ -1166,7 +1166,7 @@ Partial Class frmMitarbDetails
'datEinstiegsdatum
'
Me.datEinstiegsdatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.datEinstiegsdatum.Location = New System.Drawing.Point(113, 234)
Me.datEinstiegsdatum.Location = New System.Drawing.Point(118, 236)
Me.datEinstiegsdatum.Name = "datEinstiegsdatum"
Me.datEinstiegsdatum.Size = New System.Drawing.Size(200, 20)
Me.datEinstiegsdatum.TabIndex = 2
@@ -1195,7 +1195,7 @@ Partial Class frmMitarbDetails
'
Me.datGekuendigtAm.Enabled = False
Me.datGekuendigtAm.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.datGekuendigtAm.Location = New System.Drawing.Point(113, 257)
Me.datGekuendigtAm.Location = New System.Drawing.Point(118, 259)
Me.datGekuendigtAm.Name = "datGekuendigtAm"
Me.datGekuendigtAm.Size = New System.Drawing.Size(200, 20)
Me.datGekuendigtAm.TabIndex = 9
@@ -1206,9 +1206,9 @@ Partial Class frmMitarbDetails
Me.cbxGekuendigt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cbxGekuendigt.Location = New System.Drawing.Point(16, 262)
Me.cbxGekuendigt.Name = "cbxGekuendigt"
Me.cbxGekuendigt.Size = New System.Drawing.Size(96, 17)
Me.cbxGekuendigt.Size = New System.Drawing.Size(69, 17)
Me.cbxGekuendigt.TabIndex = 8
Me.cbxGekuendigt.Text = "gekündigt, am:"
Me.cbxGekuendigt.Text = "Ende DV"
Me.cbxGekuendigt.UseVisualStyleBackColor = True
'
'txtEmail

2
UID/Mitarbeiter/frmMitarbDetails.vb
View File

@@ -1016,7 +1016,7 @@ Public Class frmMitarbDetails
If frmAD.ShowDialog = DialogResult.OK Then
MsgBox("The Lightweight Directory Access Protocol (LDAP) provider does not CURRENTLY support this method!")
'Sobald diese Funktion unterstützt wird, kann nachfolgende Funktion auskommentiert werden
'Sobald diese Funktion unterstützt wird, kann nachfolgende Funktion aktiviert werden
'https://learn.microsoft.com/en-us/dotnet/api/system.directoryservices.directoryentry.copyto
'Dim NewADAccount As DirectoryEntry = New DirectoryEntry(frmAD.activeDirectoryObj.ADEntry.Parent.Path, txtALIASUser.Text, txtPwd.Text)
'frmAD.activeDirectoryObj.ADEntry.CopyTo(NewADAccount)