The Attribute at the given index.
Set pLDAP = CreateObject("LDAPClient.3")
Call pLDAP.Connect("ldapserver")
' Find Barb's telephone number
Set pAttributeNames = CreateObject("LDAPClient.StringCollection")
Call pAttributeNames.Add("mail")
Set pEntries = pLDAP.Search("o=airius.com", "uid=bjensen")
' Get the "telephoneNumber" attribute
Set pAttribute = pEntries(0).Attributes.Item("telephoneNumber")
MsgBox pAttribute.Values(0).Value