Directory Services

IADsO Property Methods

The property methods of the IADsO interface get or set the properties described in the following table. For more information, see Interface Property Methods.


Property Description

[Visual Basic]
Access: Read/Write
DataType: BSTR

HRESULT get_Description
([out] BSTR* pbstrDescription);
HRESULT put_Description
([in] BSTR bstrDescription);

The description of the organization.

[Visual Basic]
Access: Read/Write
DataType: BSTR

HRESULT get_FaxNumber
([out] BSTR* pbstrFaxNumber);
HRESULT put_FaxNumber
([in] BSTR bstrFaxNumber);

The fascimilie (fax) number of the organization.

[Visual Basic]
Access: Read/Write
DataType: BSTR

HRESULT get_LocalityName
([out] BSTR* pbstrLocalityName);
HRESULT put_LocalityName
([in] BSTR bstrLocalityName);

The name of the region in which the organization is located.

[Visual Basic]
Access: Read/Write
DataType: BSTR

HRESULT get_PostalAddress
([out] BSTR* pbstrPostalAddress);
HRESULT put_PostalAddress
([in] BSTR bstrPostalAddress);

The postal address of the organization.

[Visual Basic]
Access: Read/Write
DataType: BSTR

HRESULT get_TelephoneNumber
([out] BSTR* pbstrTelephoneNumber);
HRESULT put_TelephoneNumber
([in] BSTR bstrTelephoneNumber);

The telephone number of the organization.

[Visual Basic]
Access: Read/Write
DataType: Variant

HRESULT get_SeeAlso
([out] VARIANT* pvSeeAlso);
HRESULT put_SeeAlso
([in] VARIANT vSeeAlso);

An array of ADsPath names of other ADSI objects which may be relevant to this object.

Example Code [Visual Basic]

The following code example displays the description of a given organization. It assumes the underlying directory service supports grouping directory objects by organization.

Dim dom As IADsContainer
Dim dso As IADsOpenDSObject
Dim szUsername As String
Dim szPassword As String
On Error GoTo Cleanup

' Insert code to securely retrieve the username and password
Set dso = GetObject("LDAP:")
Set dom = dso.OpenDSObject("LDAP://adsrv1/dc=Fabrikam, dc=Com", szUsername, szPassword,1)
dom.Filter = Array("organization")
For Each o In dom
	MsgBox "Fax number of " & o.Name & " : " & o.Description

	If (Err.Number<>0) Then
		MsgBox("An error has occurred. " & Err.Number)
	End If

	Set dom = Nothing
	Set dso = Nothing


Client: Included in Windows XP and Windows 2000 Professional.
Server: Included in Windows Server 2003 and Windows 2000 Server.
Redistributable: Requires Active Directory Client Extension on Windows NT 4.0 SP6a and Windows 95/98/Me.
Header: Declared in Iads.h.

See Also

IADsO, Interface Property Methods