Changing display name to userlogon name

[Theblacksheep]

Hi,

 

before all our mail accounts are created I want to change our old students in an OU 'display name' to their 'logon name' (numbers), currently their display name is their first and second names. Is there an easy way to do automate this change?

[taff]

A VBscript targetted at all user accounts in the OU would accomplish this quite easily:

 

'Bind to the relevant OU

Set objOU = GetObject("LDAP://ou=OUNAME,dc=DOMAINNAME")

 

'Filter the OU contents into an array of users

objOU.Filter = Array("user")

 

'Read the logon name

For Each objUser In objOU

strDisplayName = objUser.Get("sAMAccountName")

'Set the display name to be the same as the logon name

objUser.Put "displayName", strDisplayName

objUser.SetInfo

Next

 

This was written in haste - please excuse any errors. I suggest testing it on an OU with a single account first.

No warranty is implied or given, etc, etc, etc...

[Theblacksheep]

Thanks for that taff, I don't know much VBscript so its a very handy, thankyou.