Outlook VBA教程:DisplayName属性

对于Attachment对象:

返回或设置在图标下显示的名称(不一定为实际的文件名),图标代表嵌入的附件。String 类型。该属性相当于 MAPI 的 PR_DISPLAY_NAME属性,可读写。

对于FormDescription对象:

返回或设置窗体名,该名称将显示在“选择窗体”对话框中。如果 FormDescription.Name 和 FormDescription.DisplayName属性都为空,设置其中一个就会设置另一个。如果以前设置过其中一个属性,设置另一个不会改变前一个属性的值。String 类型,可读写。

expression.DisplayName

expression   必选。该表达式返回 Attachment 或 FormDescription对象。

VBA示例

本 Visual Basic for Applications 示例使用SaveAsFile方法将当前打开项目的第一个附件作为文件保存在“My Documents”文件夹中,用附件的显示名称作为文件名。


Set myOlApp = CreateObject("Outlook.Application")
Set myinspector = myOlApp.ActiveInspector
If Not TypeName(myinspector) = "Nothing" Then
   If TypeName(myinspector.CurrentItem) = "MailItem" Then
    Set myitem = myinspector.CurrentItem
    Set myAttachments = myitem.attachments
    myAttachments.Item(1).SaveAsFile "C:\" & _
    myAttachments.Item(1).DisplayName
   End If
   MsgBox "The item is of the wrong type."
End If

如果使用 VBScript,则不必创建Application对象。本示例说明如何使用 VBScript 执行相同任务。


Set myinspector = Application.ActiveInspector
If Not TypeName(myinspector) = "Nothing" Then
   If TypeName(myinspector.CurrentItem) = "MailItem" Then
    Set myitem = myinspector.CurrentItem
    Set myAttachments = myitem.attachments
    myAttachments.Item(1).SaveAsFile "C:\" & _
    myAttachments.Item(1).DisplayName
   End If
   MsgBox "The item is of the wrong type."
End If

上页:Outlook VBA教程:Dirty属性 下页:Outlook VBA教程:DisplayType属性

Outlook VBA教程:DisplayName属性:相关链接

Outlook VBA教程:DisplayType属性 Outlook VBA教程:DLName属性
Outlook VBA教程:DocPosted属性 Outlook VBA教程:DocPrinted属性
Outlook VBA教程:DocRouted属性 Outlook VBA教程:DocSaved属性
Outlook VBA教程:DownloadState属性 Outlook VBA教程:DueDate属性
Outlook VBA教程:Duration属性 Outlook VBA教程:EditorType属性
Outlook VBA教程:Email1Address属性 Outlook VBA教程:Email1AddressType属性
Outlook VBA教程:Email1DisplayName属性 Outlook VBA教程:Email1EntryID属性
Outlook VBA教程:Email2Address属性 Outlook VBA教程:Email2AddressType属性
Outlook VBA教程:Email2DisplayName属性 Outlook VBA教程:Email2EntryID属性
Outlook VBA教程:Email3Address属性 Outlook VBA教程:Email3AddressType属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号