Metodo Get

Il metodo IADs::Get viene usato per recuperare singoli attributi denominati da un oggetto directory.

Nell'esempio di codice seguente viene utilizzato il metodo IADs::Get per recuperare un attributo denominato da un oggetto .

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

Nei linguaggi di automazione è anche possibile accedere agli attributi denominati direttamente usando la notazione del punto. Ad esempio, oggetto . Get("distinguishedName") è identico a object.distinguishedName.

L'esempio di codice seguente è identico all'esempio precedente, ad eccezione del fatto che l'attributo distinguishedName è accessibile usando la notazione del punto.

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

Se un valore non è impostato sull'oggetto, il metodo IADs::Get restituirà l'errore "Property not found in cache".