Question

我一整天都在一个小小的过程中工作，通过邮件自动从一些excel发送一些数据，事实是，这些电子邮件必须在开头和邮件末尾有2个横幅，这里你有一个没有自动化的单个实例的粗略例子：

 Dim msg As New MailMessage
    Try
        msg.From = New MailAddress("MYMAIL")
        msg.To.Add("TARGETEMAIL@HOTMAIL.com")
        msg.Subject = "SUBJECT"
        msg.Body = " BODY TEXT "
        Dim path As String = "IMAGEPATH"
        Dim altView As AlternateView = AlternateView.CreateAlternateViewFromString("<img src=cid:myImage width=200><br> TEXT.", Nothing, "text/html")
        Dim imagelink As LinkedResource = New LinkedResource(path, MediaTypeNames.Image.Jpeg)
        imagelink.TransferEncoding = TransferEncoding.Base64
        imagelink.ContentId = ("myImage")
        altView.LinkedResources.Add(imagelink)
        msg.AlternateViews.Add(altView)
        msg.IsBodyHtml = True
        Dim SMTP As New SmtpClient("smtp.gmail.com")
        SMTP.Port = 587
        SMTP.EnableSsl = True
        SMTP.Credentials = New System.Net.NetworkCredential("MAIL", "PASSWORD")
        SMTP.EnableSsl = True
        SMTP.Send(msg)
        MsgBox("Message Was Sent correctly.")
    Catch ex As System.Exception
    End Try

可以工作。

问题在于，虽然它适用于雅虎和Gmail，但接收邮件的人之一是使用Hotmail帐户，而不是像其他人一样使电子邮件正常（嵌入了两个图像），在图像的位置还有空格，邮件显示为＆＃34;附有一些文件＆＃34;但他们甚至没有附上图片。

我一直在尝试使用Outlook.Interops库，并感谢一些帖子让它发挥作用，显然要归功于此：

     Const PR_ATTACH_CONTENT_ID = "http://schemas.microsoft.com/mapi/proptag/0x3712001F"
     olkPA.SetProperty(PR_ATTACH_CONTENT_ID, "myImage")

但Outlook库只允许我通过我的Outlook帐户发送电子邮件，我需要通过其他类型的帐户发送电子邮件。有没有办法用我在第一个例子中给你看的方式发送嵌入到hotmail / outlook帐户的图像的电子邮件？

谢谢。

嵌入式图像仅在Outlook / Hotmail中显示？

0 个答案: