Directory Services

The Get Method

The IADs::Get method is used to retrieve individual named attributes from a directory object.

The following code example uses the IADs::Get method to retrieve a named attribute from an object.

Dim MyUser as IADs
Dim MyDistinguishedName as String

On Error GoTo Cleanup
 
' Bind to a specific user object.
set MyUser = GetObject("LDAP://CN=Jeff Smith,CN=Users,DC=fabrikam,DC=com")
 
' Get property.
MyDistinguishedName = MyUser.Get("distinguishedName")

Cleanup:
	If (Err.Number<>0) Then
		MsgBox("An error has occurred. " & Err.Number)
	End If
	Set MyUser = Nothing

In Automation languages, named attributes can also be accessed directly using the dot notation. For example, object.Get("distinguishedName") is identicial to object.distinguishedName.

The following code example is identical to the previous example except that the distinguishedName attribute is accessed using the dot notation.

Dim MyUser as IADs
Dim MyDistinguishedName as String

On Error GoTo Cleanup
 
' Bind to a specific user object.
set MyUser = GetObject("LDAP://CN=Jeff Smith,CN=Users,DC=fabrikam,DC=com")
 
' Get property.
MyDistinguishedName = MyUser.distinguishedName

Cleanup:
	If (Err.Number<>0) Then
		MsgBox("An error has occurred. " & Err.Number)
	End If
	Set MyUser = Nothing

If a value is not set on the object, the IADs::Get method will return the error "Property not found in cache".