如何用vba实现在发送邮件时选中“加密”和“签署”

ztccsj

在日常中，我有两个帐号，一个是单位的帐号，要求每次发送邮件都要加密和签署，使用另外一个帐号时，我不想使用加密签署，在vba中是哪个代码标识代表“加密”“签署”发送，以及如何取消加密及签署发送。
谢谢，节日快乐

ztccsj

不能实现这个功能吗？

andrefei

编写VBA代码并借助Outlook电脑端可以实现加密和签署。发邮件的代码没有变化，只需要在Outlook2013配置好加密电子邮件的选项即可，步骤无如下：Outlook-文件-选项-信任中心-信任中心设置-电子邮件安全性-加密电子邮件：选中（加密待发邮件的内容和附件，给待发邮件添加数字签名，以明文签名发送邮件），点击设置按钮，进入设置，选择账号，并选中下方的（该安全邮件的默认加密设置，所有安全邮件的默认加密设置），配置好证书和算法。希望对你有帮助。我自己这么配置后，批量发送时是加密的。

ztccsj

andrefei 发表于 2017-2-8 10:33
编写VBA代码并借助Outlook电脑端可以实现加密和签署。发邮件的代码没有变化，只需要在Outlook2013配置好加 ...

你没有理解我的意思。换句话说吧，我同样一个账号，我对不同账号邮件进行发送时，采取不同的策略，对A账号，每次都自己加密，对B账号，每次都不加密，让代码代替你上面说的手动设置