我们有多个用户在使用Outlook上的现有邮箱。每个从邮箱发送邮件的人都会在自己的个人邮箱中收到“已发送邮件”。我在规则中查找,但找不到任何可以让已发送邮件出现在群邮箱的已发送邮件中的内容。
我有下面的代码,但是我不知道为什么它不能运行。
Private Sub Application_ItemSend(ByVal Item As Object, _
Cancel As Boolean)
Dim objRecip As Recipient
Dim strMsg As String
Dim res As Integer
Dim strBc
我正在写剧本来发送电子邮件。电子邮件应该从outlook中的共享邮箱发送。这个共享邮箱没有密码,这里的诀窍是:一方面我需要身份验证并提供密码,另一方面我没有密码可以提供。我用我的专业outlook邮箱(电子邮件地址+密码)运行脚本,它可以工作。
这是我的配置:
MY_ADDRESS = "---emailaddressofthesender---"
PASSWORD = ""
MESSAGE = "some message"
# set up the SMTP server
s = smtplib.SMTP(host='smtp-mai