IAddressee Interface
Topic Last Modified: 2006-06-13
Provides address resolution for names and free/busy information for appointment attendees.
CLSID
CD000139-8B95-11D1-82DB-00C04FB1625D
Extends
IDispatch
Type Library
Microsoft CDO for Exchange 2000 Library
DLL Implemented In
CDOEX.DLL
Member Summary
The following table lists the properties of the IAddressee interface.
| Name | Description |
|---|---|
A reference to an Addressees collection containing all addressees that match the ambiguous criteria used to resolve a particular addressee. This property is read-only. |
|
A reference to a Configuration object used to define configuration information for the object. |
|
Returns the content class of a resolved addressee. This property is read-only. |
|
Reserved for future use. This property is read-only. |
|
Contains the directory URL to the resolved user object in Active Directory. This property is read-only. |
|
Contains the display name of the addressee. |
|
Contains the e-mail address of an addressee. |
|
Reserved for future use. This property is read-only. |
|
Indicates the resolution status of this addressee. |
The following table lists the methods of the IAddressee interface.
| Name | Description |
|---|---|
Attempts to resolve an addressee directory object using the information specified in the object. |
|
Gets the free/busy information for a resolved addressee. |
|
Returns the specified dual interface on this object. |
Example
[VBScript]
<Job id="resolveaddressee">
<reference object="cdo.message"/>
<reference object="adodb.connection"/>
<script language="VBScript">
Dim iPer
Set iPer = getCurrentPersonObject_ro
Wscript.Echo "User E-Mail Address:"
wscript.echo iPer.Email
WScript.Echo "User Mailbox folder URL: "
Wscript.Echo iPer.GetInterface("IMailbox").BaseFolder
Function getCurrentPersonObject_ro()
Dim Info
Set Info = CreateObject("ADSystemInfo")
Dim InfoNT
Set InfoNT = CreateObject("WinNTSystemInfo")
Dim iPer
Set iPer = CreateObject("CDO.Person")
Dim iAddr
Dim iAddr2
Set iAddr = CreateObject("CDO.Addressee")
iAddr.EmailAddress = LCase(InfoNT.UserName) & "@" & Info.DomainDNSName
' Search by binding to an LDAP server in current domain.
If Not iAddr.CheckName("LDAP://" & Info.DomainDNSName) Then
' Handle Ambiguous names here
For Each iAddr2 in iAddr.AmbiguousNames
wscript.echo iAddr2.DisplayName
wscript.echo iAddr2.EmailAddress
Else
' Note that this is for illustration purposes only as
' We already have the server-less LDAP URL to the current user:
' "LDAP://" & Info.UserName
' Or,
' "LDAP://" & Info.DomainDNSName & "/" & Info.UserName
Wscript.Echo "LDAP://" & Info.DomainDNSName & "/" & Info.UserName
Wscript.Echo iAddr.DirURL
iPer.DataSource.Open iAddr.DirURL
End If
Set getCurrentPersonObject_ro = iPer
End Function
</script>
</Job>