VBS Script for modifying multi-value Active Directory display specifier

Posted by sh-beta on Stack Overflow See other posts from Stack Overflow or by sh-beta
Published on 2009-06-22T20:41:48Z Indexed on 2010/05/14 0:44 UTC
Read the original article Hit count: 320

Filed under:
|

Following the howto Extending the Active Directory Schema To Track Custom Info I'm able to setup a single-value schema attribute that is easily changeable via a context menu in ADUC. Multi-value schema attributes get considerably more complicated. Say (for the sake of argument) my value is "Projects" and each user may be a list as many projects as necessary.

Following is a sad little script that will set Project to a single value:

Dim oproject
Dim oUser1
Dim temp1
Set oproject = Wscript.Arguments
Set oUser1 = GetObject(oproject(0))
temp1 = InputBox("Project: " & oUser1.project & vbCRLF & vbCRLF & "Project")
if temp1 <> "" then oUser1.Put "project",temp1
oUser1.SetInfo
Set oUser1 = Nothing
Set oproject = Nothing
Set temp1 = Nothing
WScript.Quit

How can I modify this to allow, assign, and modify multiple values?

© Stack Overflow or respective owner

Related posts about active-directory

Related posts about vbscript