Get 方法

IADs：：Get 方法可用來從目錄物件擷取個別的具名屬性。

下列程式代碼範例會使用 IADs：：Get 方法從 物件擷取具名屬性。

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

在自動化語言中，您也可以使用點表示法直接存取具名屬性。 例如， 物件。Get（“distinguishedName”） 與 object.distinguishedName 相同。

下列程式代碼範例與上一個範例相同，不同之處在於 會使用點表示法來存取 distinguishedName 屬性。

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

如果未在 對象上設定值， IADs：：Get 方法會傳回錯誤「快取中找不到屬性」。