代理未在标头中设置“发件人”

Question

我们有一个邮件代理生成基本邮件并将其发送到mailaddress。

Dim s As New NotesSession
Dim maildoc As NotesDocument
Dim db As NotesDatabase

Set db = s.Currentdatabase
Set maildoc = New NotesDocument(db)

maildoc.Form = "Memo"
maildoc.SendTo = "[email protected]"
maildoc.Subject = "Test"
Call maildoc.replaceitemvalue("Principal","[email protected]")
Call maildoc.replaceitemvalue("AltFrom","[email protected]")
Call maildoc.replaceitemvalue("InetPrincipal","[email protected]")
Call maildoc.replaceitemvalue("SMTPOriginator","[email protected]")
Call maildoc.replaceitemvalue("From","[email protected]")
Call maildoc.replaceitemvalue("sentFrom","[email protected]")
Call maildoc.replaceitemvalue("InetFrom","[email protected]")

Call maildoc.send(False,False)

当我执行此代理并查看我的web.de帐户时，我发现没有发件人信息。在邮件的标题中没有“from”字段集。只有“发件人”字段。

有谁知道服务器配置或解决此问题的东西？我不认为这是代理人的错，对吧？

Answer 1

将Principal设置为“testFrom @ anydomain.de @DOMINODOMAIN”。

因此，如果您的Domino域名为Domain，则将其设置为“testFrom @ anydomain.de @ Domain”