Monday, December 1, 2008

Modifying the General Properties of an OU

Modifies the attribute values found on the General Properties page in Active Directory Users and Computers for an OU named Sales.

Const ADS_PROPERTY_UPDATE = 2
Set objContainer = GetObject _
  ("LDAP://ou=Sales,dc=NA,dc=fabrikam,dc=com")
 
objContainer.Put "street", "Building 43" & vbCrLf & "One Microsoft Way"
objContainer.Put "l", "Redmond"
objContainer.Put "st", "Washington"
objContainer.Put "postalCode", "98053"
objContainer.Put "c", "US"
 
objContainer.PutEx ADS_PROPERTY_UPDATE, _
    "description", Array("Sales staff")
    
objContainer.SetInfo

This is a VB Script, this can be used by saving the file in .vbs file