我正在使用CDO发送电子邮件。来自我的 Gmail 帐户的 vba 消息。 但是,在我的
With Mail
.From
我正在插入要从中发送的电子邮件地址。当它到达时,它会与电子邮件地址本身一起到达,而不是与gmail帐户关联的名称: .from = johndoe@gmail.com => 电子邮件将从"johndoe@gmail.com"接收,而不是从 Gmail 帐户中定义的 John Doe 接收。
有没有办法获取名称而不是电子邮件地址?
谢谢
除了这个细节之外,一切都很好。
With Mail
.Subject = subj
.From = Range("acct").Value
.To = dest
'.To = Range("mailing").Offset(i, 0).Value
.textbody = body
If att = "" Then GoTo noatt
attnb = 1
While Not IsEmpty(Range("attachement").Offset(attnb, 0))
.AddAttachment (Range("attachement").Offset(attnb, 0)) 'To attach Documents in mail
attnb = attnb + 1
Wend
noatt:
End With
'to send the mail
Mail.Send
尝试使用以下语法:
Name Surname <mymail@gmail.com>
所以在你的代码中,它会像:
.From = "John Doe <johndoe@gmail.com>"
它应该做这些伎俩。
希望对您有所帮助。