如何在发送之前更新outlook邮件正文
本文关键字:outlook 更新 正文 | 更新日期: 2023-09-27 18:17:59
我正在开发一个Outlook插件来处理电子邮件附件,方法是将它们放在服务器上,并在电子邮件中放入URL。
一个问题是,在将URL添加到电子邮件正文的末尾后,用户的光标被重置到电子邮件的开头。
一个相关的问题是,我不知道光标在文本中的位置,所以我不能将我的URL插入到正确的位置。
这里有一些代码显示了我正在做的事情,为了简单起见,代码假设正文是纯文本。
private void MyAddIn_Startup(object sender, System.EventArgs e)
{
Application.ItemLoad += new Outlook.ApplicationEvents_11_ItemLoadEventHandler(Application_ItemLoad);
}
void Application_ItemLoad(object Item)
{
currentMailItem = Item as Outlook.MailItem;
((Outlook.ItemEvents_10_Event)currentMailItem).BeforeAttachmentAdd += new Outlook.ItemEvents_10_BeforeAttachmentAddEventHandler(ItemEvents_BeforeAttachmentAdd);
}
void ItemEvents_BeforeAttachmentAdd(Outlook.Attachment attachment, ref bool Cancel)
{
string url = "A URL";
if (currentMailItem.BodyFormat == Outlook.OlBodyFormat.olFormatHTML)
{
// code removed for clarity
}
else if (currentMailItem.BodyFormat == Outlook.OlBodyFormat.olFormatRichText)
{
// code removed for clarity
}
else
currentMailItem.Body += attachment.DisplayName + "<" + url + ">";
Cancel = true;
}
使用Application.ActiveInspector.WordEditor
检索Word Document对象。使用Word对象模型执行所有更改。
这似乎是我想要的:
using Microsoft.Office.Interop.Word;
void ItemEvents_BeforeAttachmentAdd(Outlook.Attachment attachment, ref bool Cancel)
{
if (attachment.Type == Outlook.OlAttachmentType.olByValue)
{
string url = "A URL";
Document doc = currentMailItem.GetInspector.WordEditor;
Selection objSel = doc.Windows[1].Selection;
object missObj = Type.Missing;
doc.Hyperlinks.Add(objSel.Range, url, missObj, missObj, attachment.DisplayName, missObj);
Cancel = true;
}
}