Common
Anzeigenamen in Active Directory
15. August 2012
0

Da die AD Anzeigenamen evtl. auch für die Erstellung von Adressbuchdaten genutzt werden und durch verschiedene Administratoren oder Migrationen unterschiedlich sein können, wäre es sinnvoll, diese definiert setzen zu können und auch für zukünftige Nutzer einen sinnvollen Standardwert setzen zu können. Dies kann man relativ einfach bewerkstelligen:

 

Anzeigenamen anpassen

Das nachfolgende Skript ändert den Anzeigenamen in “Nachname, Vorname (Test-Organisation)”:

rem chgdisplay.vbs - Changes the display names of all users in a given OU to the
rem format of Lastname, Firstname.
rem Usage = cscript chgdisplay.vbs "OU=My Ou, DC=My Domain, DC=com"
rem OU must be enclosed in quotes if it contains spaces in the name

Dim strTargetOU

ParseCommandLine()

wscript.echo strTargetOU
wscript.echo
wscript.echo "Changing Display names of users in " & strTargetOU

Set oTargetOU = GetObject("LDAP://" & strTargetOU)

oTargetOU.Filter = Array("user")

For each usr in oTargetOU

	if instr(usr.SamAccountName, "$") = 0 then

		vLast = ""
		vFirst = ""
		on error resume next
			vLast = usr.get("sn")
			vFirst = usr.get("GivenName")

		if not vLast = "" and not vFirst = "" then
			vFullname = vLast + ", " + vFirst + " (FSVC)"
		else
			if vLast = "" and vFirst = "" then
				wscript.echo "Error, surname and name are empty"
				vFullname = "(FSVC)"
			else
				if not vLast = "" then
					vFullname = vLast + " (FSVC)"
				else
					vFullname = vFirst + " (FSVC)"
				end if
			end if
		end if
		usr.put "displayName", vFullName
		usr.setinfo
		wscript.echo usr.displayName
	end if
Next

Sub ParseCommandLine()
  	Dim vArgs

  	set vArgs = WScript.Arguments

  	if vArgs.Count <> 1 then
      		DisplayUsage()
  	Else
     		strTargetOU = vArgs(0)
  	End if
End Sub

Sub DisplayUsage()
	WScript.Echo
 	WScript.Echo "Usage:  cscript.exe " & WScript.ScriptName & " <Target OU to change users display names in>"
 	WScript.Echo "Example: cscript " & WScript.ScriptName & " " & chr(34) & "OU=MyOU,DC=MyDomain,DC=com" & chr(34)
	WScript.Quit(0)
End Sub

Quelle: http://support.microsoft.com/kb/300427

Standardwert für Anzeigenamen ändern

Um nun auch für zukünftig anzulegende Nutzer einen Standardwert zu setzen, muss dieser in der Konfigurations-Partition des AD definiert werden. Somit wird er auch für die gesamte Domäne gültig!!

1. ADSI Editor öffnen und die Konfigurations-Partition der Domäne verbinden


 

2. den entsprechenden Bereich auswählen

 

 

 

 

 

 

 

 

 

 

3. Eintrag für createDialog anpassen

Wichtig: die Variablen sind Case-sensitiv!

Verwendet werden kann jedes Attribut eines User-AD-Objekts. Der ADSI-Editor kann helfen, um diese herauszufinden.


Schreibe einen Kommentar

Diese Website verwendet Akismet, um Spam zu reduzieren. Erfahre mehr darüber, wie deine Kommentardaten verarbeitet werden.