代理发送html格式的邮件???
灰大师 2005-05-12 04:49:24 我在b/s下的代理里给notes用户发送邮件,希望用户从notes client查看邮件内容时能 点击 网易 2个字跳出新窗口打开 www.163.com的功能
Dim docP As NotesDocument
Set docP = New NotesDocument(db)
Dim rtitem As NotesRichTextItem
Set rtitem = New NotesRichTextItem(docP, "Body")
docP.Form = "Memo"
docP.SendTo = "领导/china"
docP.Subject = "xxx!"
Call rtitem.AppendText({"[<a href="http://www.163.com" target="_blank">网易</a>]"})
Call docP.Send(False)
从note client显示的还是[<a href="http://www.163.com" target="_blank">网易</a>],不行!!!!!!