Attachments.Add 方法 (Outlook)

在 Attachments 集合中建立新的附件。

語法

運算式。新增 (來源、 類型、 位置、 DisplayName)

表達 代表 Attachments 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
Source	必要	Variant	附件的來源。 可以是檔案 (以完整的檔案系統路徑及檔案名稱表示) 或 Outlook 項目產生的附件。
類型	選用	Long	附件的類型。 可以為其中一個 OlAttachmentType 常數。
位置	選用	Long	此參數僅適用于使用 RTF 格式的電子郵件訊息：它是附件應該放置在郵件本文中的位置。 Position 參數的值為 1 會指定在郵件本文的開頭放置附件。 值 'n' 大於電子郵件專案本文中的字元數目，指定附件應該放在結尾。 0 值會隱藏附件。
DisplayName	選用	字串	只有當訊息項目是 RTF 格式且 Type 設定為 olByValue 時，才會套用此參數：該名稱會顯示在附件的 Inspector 物件中，或是檢視附件的屬性時。 如果郵件項目為純文字或 HTML 格式，附件則會以 Source 參數中的檔案名稱顯示。

傳回值

代表新附 件的 Attachment 物件。

註解

將 Attachments 新增到項目的 Attachment 集合時，在儲存該項目之前，Attachment 的 Type 屬性一定都會傳回 olOLE (6)。 若要確保一致的結果，一定要在新增或移除 Attachments 集合中的物件之前儲存項目。

範例

下列 Microsoft Visual Basic/Visual Basic for Applications (VBA) 範例會建立郵件項目、藉由將附件內嵌在訊息本文的開頭來新增附件，並顯示該附件。 若要執行這個範例，請確認此附件是 C:\ 資料夾中檔名為 Test.Doc 的檔案。

Sub AddAttachment() 
 Dim myItem As Outlook.MailItem 
 Dim myAttachments As Outlook.Attachments 
 
 Set myItem = Application.CreateItem(olMailItem) 
 Set myAttachments = myItem.Attachments 
 myAttachments.Add "C:\Test.doc", _ 
 olByValue, 1, "Test" 
 myItem.Display 
End Sub

另請參閱

Attachments 物件

將檔案附加至訊息項目將 Outlook 連絡人項目附加至Email郵件限制 Outlook 的附件大小Email郵件修改 Outlook 的附件Email郵件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。