代码之家  ›  专栏  ›  技术社区  ›  Wayne Werner

我可以从PictureBox图像添加Outlook附件吗?

  •  3
  • Wayne Werner  · 技术社区  · 14 年前

    我的VB.NET图片框中有一个图像。我想将其附加到通过Outlook发送的电子邮件中,而不必将其保存到驱动器的任何位置。有可能做这样的事吗?

    这是我到目前为止所做的 here ):

    Public Class email
        Dim app As Microsoft.Office.Interop.Outlook.Application
        Dim appNameSpace As Microsoft.Office.Interop.Outlook._NameSpace
        Dim memo As Microsoft.Office.Interop.Outlook.MailItem
        Dim outbox As Microsoft.Office.Interop.Outlook.MAPIFolder
    
        Public Sub New(ByVal attachment)
            Try
                app = New Microsoft.Office.Interop.Outlook.Application
                appNameSpace = app.GetNamespace("MAPI")
                appNameSpace.Logon(Nothing, Nothing, False, False)
    
                memo = app.CreateItem(Microsoft.Office.Interop.Outlook.OlItemType.olMailItem)
                memo.To = "notmy@realemailaddress.com"
                memo.Subject = "Testing"
                memo.Body = "Hello there"
                memo.Attachments.Add(attachment, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue)
                memo.Send()
            Catch ex As Exception
                Console.WriteLine(ex.Message)
            End Try
    
        End Sub
    
    
    End Class
    

    1 回复  |  直到 9 年前
        1
  •  2
  •   Jimmie Clark    14 年前

    以下是您的选择: Attachment Types

    这里的源信息也有助于: Attachment Add Function