Our users are being moved to using outlook as their email client so setting the Principal field in the WQS agent no longer works as outlook ignores it.
I found a post on here which suggested creating a document and copying it to mail.box and it works up to a point. The sender is amended but they can’t reply to the email because it doesn’t recognise the email address.
This is some of the code. The rest of the email document has already been created
memo.PostedDate = Now
memo.From = “Joe.Bloggs@abc.def.ghi.uk”
Dim ndbMailBox As New NotesDatabase( session.currentdatabase.server, “mail.box” )
Dim stST As String
Dim stCT As String
Dim stBCC As String
stST = Implode( memo.SendTo , “,”)
stCT = Implode( memo.CopyTo , “,”)
stBCC = Implode( memo.BlindCopyTo , “,”)
memo.Recipients = Split(stST + “,” + stCT + “,” + stBCC , “,”)
Call memo.save(True,False,True)
Call memo.CopyToDatabase( ndbMailBox )
Call memo.remove(True)
outlook shows
Display Name - Joe.Bloggs
EMail Address - “/c=GB/admd=GOLD 400/prmd=DSS/o=Department of Social Security/ou=ASD/dd.NOTES=Joe.Bloggs(a)abc.def.ghi.uk(a)ASD/”@x500hub01-gw.dss.gsi.gov.uk
If I send an email directly from a notes client then the reply will work. Outlook shows
Display Name - Joe Bloggs
EMail Address - Joe.Bloggs@abc.def.ghi.uk
and if I change the agent to use a notes email address instead of SMTP then the reply also works
memo.From = “Joe Bloggs/Testing/London/Asd”
Outlook shows
Display Name - Joe Bloggs/Testing/London/Asd
EMail Address - “/c=GB/admd=GOLD 400/prmd=DSS/o=Department of Social Security/ou=ASD/dd.NOTES=Joe Bloggs$/Testing$/London$/Asd(a)ASD/”@x500hub01-gw.dss.gsi.gov.uk
Any suggestions welcome as I’m out of ideas.