Modify ADUC display specifier (VBScript)

This code can be found in Chapter 2 of Active Directory Cookbook, 2nd edition

Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.

Find out how to download all of the VBScript code from this site.

' The following script will append a new value to the
' US English display specifiers

' ---------------------------------------------------------------
' From the book "Active Directory Cookbook" by Robbie Allen
' Publisher: O'Reilly and Associates
' ISBN: 0-596-00466-4
' Book web site: http://rallenhome.com/books/adcookbook/code.html
' ---------------------------------------------------------------

'---------- SCRIPT CONFIGURATION ------------------
  Const ADS_PROPERTY_APPEND = 3
  strForestRoot = "<ForestRootDN>" ' i.e., "dc=rallencorp,dc=com"
' --------- END CONFIGURATION ---------------------

strObjectDN = "cn=computer-display,cn=409,cn=displayspecifiers," & _ 
              "cn=configuration," & strForestRoot
set objObject = GetObject("LDAP://" & strObjectDN)
objObject.PutEx ADS_PROPERTY_APPEND, _
  "attributeDisplayNames", Array("operatingSystemServicePackLevel, " & _
  "Operating System Service Pack Level")
objObject.setInfo

WScript.Echo "Script completed successfully!"

This code has been viewed 2145 times.

New from the creators of TechTasks.com: StatSheet.com