86565656 发表于 2015-9-14 10:51:23

一个往Outlook邮件中嵌图片的例程

  开发环境:Visual Studio 2010 Ultimate, Office Professional Plus 2010

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using Microsoft.Office.Tools.Ribbon;
using Outlook = Microsoft.Office.Interop.Outlook;
using Word = Microsoft.Office.Interop.Word;
using System.Windows.Forms;
using System.Text.RegularExpressions;
namespace OutlookAddIn1
{
public partial class Ribbon1
{
private void Ribbon1_Load(object sender, RibbonUIEventArgs e)
{
}
private void button1_Click(object sender, RibbonControlEventArgs e)
{
try
{
Outlook.Application olApplication = Globals.ThisAddIn.Application;
//Outlook.Inspector olInspector = olApplication.ActiveInspector();
Outlook.MailItem mail = olApplication.CreateItem(Outlook.OlItemType.olMailItem);
Outlook.Attachment att = mail.Attachments.Add(@"[图片路径]\Penguins.jpg", Outlook.OlAttachmentType.olEmbeddeditem, null, "Test Picture");
string x = Penguins.jpg@258;
att.PropertyAccessor.SetProperty("http://schemas.microsoft.com/mapi/proptag/0x3712001E",x);
mail.Recipients.Add("[*******].com");
mail.Recipients.ResolveAll();
mail.Subject = "图片例程";
mail.HTMLBody = string.Format(&quot;<body><img src=\&quot;cid:{0}\&quot;/></body>&quot;,x);
mail.Display();
}
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
}
}
}
  
页: [1]
查看完整版本: 一个往Outlook邮件中嵌图片的例程