这种跨设备接收不一致的情况确实挺让人困惑的，结合Lotus Notes/Domino的生态特性，我梳理了几个最可能的原因，你可以按顺序排查：

• 邮件格式兼容性问题：如果你的宏生成的是Lotus Notes特有的富文本格式，很多手机端邮件客户端（比如Outlook移动端、系统自带邮件APP）对这种格式的支持很差，甚至会直接无法解析邮件内容，导致邮件看似“没收到”。建议临时修改宏，改成发送纯文本格式的邮件测试，比如把mailDoc.Body设为纯文本字符串，不要用富文本对象，看看手机端能不能正常接收。

• Domino服务器移动推送配置缺失：如果你的企业用的是Lotus Traveler服务来同步移动设备邮件，那得确认两个点：一是服务器端有没有启用Traveler服务，二是收件人的手机有没有在Traveler上完成注册。如果Traveler没配置，Domino服务器不会主动把邮件推送到移动设备，只能等手机客户端主动同步，甚至同步失败。

• 邮件大小/附件拦截：如果宏发送的邮件带有大附件，可能触发了服务器或手机端的大小限制。Domino服务器可以针对移动设备单独设置邮件大小阈值，手机客户端本身也有附件大小限制。建议先发送一封不带附件的纯文本测试邮件，排除这个因素。

• 垃圾邮件过滤机制：宏发送的邮件通常有固定的模板内容、统一的发件人（比如系统账号），很容易被企业邮件网关或者手机端的垃圾邮件过滤器判定为垃圾邮件。先检查手机端的垃圾邮件文件夹，看看邮件是不是被归类到那里了；也可以联系管理员查看邮件网关的过滤日志，确认有没有被拦截。

• 宏代码的发送参数异常：检查你的宏代码里有没有设置一些限制接收范围的参数，比如误设置了仅允许Notes客户端接收的属性。举个例子，确保发送邮件的代码没有额外的限制：

Dim session As New NotesSession
Dim db As NotesDatabase
Dim mailDoc As NotesDocument

Set db = session.CurrentDatabase
Set mailDoc = New NotesDocument(db)
mailDoc.Form = "Memo"
mailDoc.SendTo = "指定收件人"
mailDoc.Subject = "测试邮件"
mailDoc.Body = "纯文本测试内容"
' 确保Send方法的参数正确，False表示不保存发件箱副本，不影响接收
Call mailDoc.Send(False)

如果代码里有使用mailDoc.PostedDate或者其他特殊属性，也可能导致同步异常。

• 手机端邮件同步设置问题：有些手机邮件客户端默认只同步最近7天或30天的邮件，或者设置了特定的过滤规则（比如只接收特定发件人的邮件）。可以手动触发一次邮件同步，或者检查客户端的同步设置，确认没有过滤掉宏发送的邮件。

内容的提问来源于stack exchange，提问作者Aderon