IMAddress 属性

       

返回或设置联系人的 Microsoft 即时消息地址。String 类型,可读写。

expression.IMAddress

expression  必选。该表达式返回 ContactItem 对象。

说明

RecipientsTo 属性不同,无法验证 IMAddress 属性是否包含有效的地址。

示例

以下示例新建联系人,并提示用户输入联系人的“即时消息”地址。

Sub SetImAddress()
'Sets a new IM Address

    Dim olApp As Outlook.Application
    Dim objNewContact As ContactItem

    Set olApp = Outlook.Application
    Set objNewContact = olApp.CreateItem(olContactItem)
    objNewContact.IMAddress = _
        InputBox("Enter the new contact's Microsoft Instant Messenger address")
    objNewContact.Save
End Sub