Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1476to1480
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

RDN im AD ändern.

RDN im AD ändern.
03.03.2016 12:00:07
Dennis
Hallo,
Ich würde gerne wissen ob es möglich ist den RDN (Relative Distinguished Name) eines Users im AD zu ändern.
Hierzu habe ich ein kleines Script geschrieben, dass jedoch nicht funktioniert.
Könnt ihr mir vielleicht Helfen bzw. sagen wie ich den diesen Namen ändern kann.
Sub Namen_ändern()
Dim objOU, objUser, objRootDSE, objLogon
Dim strContainer, strLastUser, strDNSDomain, strDN
Dim Outputrow As Integer
Outputrow = 2
For Zähler = 1 To 4
If Zähler = 1 Then
strOU = "OU=Users,OU=DUS1,OU=EMEA"
End If
If Zähler = 2 Then
strOU = "OU=Users,OU=KAS1,OU=EMEA"
End If
If Zähler = 3 Then
strOU = "OU=Users,OU=HEI1,OU=EMEA"
End If
If Zähler = 4 Then
strOU = "OU=Users,OU=HEI2,OU=EMEA"
End If
strDNSDomain = "DC=das-ist-geheim,DC=local"
strContainer = strOU & "," & strDNSDomain
Set objOU = GetObject("LDAP://" & strContainer)
Name = "cn=" & Cells(Outputrow, 5).Value
'For Each objUser In objOU
Set objUser = GetObject("LDAP://cn=Dennis Nachname,ou=Users,ou=DUS1,ou=EMEA,dc=das-ist- _
geheim,dc=local")
If objUser.class = "user" Then
objUser.Put "name", "cn=Nachname Dennis" //Hier entsteht das Problem.
objUser.SetInfo
Outputrow = Outputrow + 1
End If
Next
'Next
End Sub
Mit freundlichen Grüßen
Dennis

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: RDN im AD ändern.
03.03.2016 12:52:30
Luschi
Hallo Dennis,
als Win-Admin würde ich für solche Sachen das richtige Software-Werkzeug (PowerShell) benutzen:
# Den relative distinguished name (RDN) eines Benutzers ändern
Rename-ADObject „CN=Yusuf Dikmenoglu,OU=IT,DC=Domäne,DC=de“ –NewName „Yusuf Cool“
Gruß von Luschi
aus klein-Paris
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige