Example Code for Using Put

[Visual Basic]

Dim Namespace As IADsOpenDSObject
Dim User As IADsUser
Dim NewName As Variant
 
Set Namespace = GetObject("LDAP:")
 
Set User = Namespace.OpenDSObject("LDAP://MyMachine/CN=Administrator,CN=Users,DC=MyDomain,DC=Fabrikam,DC=COM", "Administrator", "", ADS_SECURE_AUTHENTICATION)
 
NewName = "Jeff Smith"
 
' Set using the IADs::Put method
User.Put "FullName", NewName
User.SetInfo