时间戳

首页 > 解决方案 > 如何为 VB.Net 中的 Azure 信息保护自动分类 Outlook 电子邮件敏感度？

vb.net - 如何为 VB.Net 中的 Azure 信息保护自动分类 Outlook 电子邮件敏感度？

问题描述

我正在使用 vb.net 开发一个 Windows，尝试通过 Outlook 发送电子邮件。我的代码运行良好，但是一旦到达 send() 行，就会弹出 Azure 信息保护以选择电子邮件敏感度（公共、机密等），因此在用户发送之前不会发送电子邮件选择。

我试过（OutlookMes​​sage.Sensitivity = Outlook.OlSensitivity.olNormal），但仍然需要有人从 Azure 弹出窗口中选择分类，完整代码如下所示......

Dim OutlookMessage As outlook.MailItem 
Dim AppOutlook As New outlook.Application 
Try
 OutlookMessage = AppOutlook.CreateItem(outlook.OlItemType.olMailItem)
 Dim Recipents As outlook.Recipients = OutlookMessage.Recipients Recipents.Add("myemail@hotmail.com") 
 OutlookMessage.Subject = "Sending through Outlook" 
 OutlookMessage.Body = "Testing outlook Mail" 
 OutlookMessage.BodyFormat = outlook.OlBodyFormat.olFormatHTML
 OutlookMessage.Sensitivity = outlook.OlSensitivity.olNormal 
 OutlookMessage.Send() 
Catch ex As Exception 
 MessageBox.Show("Mail could not be sent") 'if you dont want this message, simply delete this line 
Finally 
 OutlookMessage = Nothing 
 AppOutlook = Nothing 
End Try

标签： vb.netwinformsazureoutlook

解决方案

希望代码使用服务帐户运行，请执行以下操作

  1. 在作用域 AIP 策略中添加上述服务帐户
  2. 在作用域策略中设置默认标签

这样做不会触发弹出窗口，因为已经应用了默认标签（我希望如此）。

注意：您可以使用 AIp Policy 的高级设置为 Outlook 和其他 MS 应用程序设置不同的默认标签

推荐阅读