我有一点Lotus脚本或Notes / Domino的知识,但我有一个程序,从很久以前的地方复制,允许我通过从VBA的Notes发送电子邮件。 我通常只使用此格式的内部通知没有真正重要。 我现在想用这个发送外部电子邮件给客户,企业types宁愿电子邮件符合我们的风格指南(基本上是一个无衬线字体)。 我正要告诉他们,代码只能用纯文本工作,但是我注意到例程确实引用了某种CREATERICHTEXTITEM对象。 这是否意味着我可以应用某种forms的正文文本string之后,它已被传递给邮件例程? 除了维护我们珍贵的品牌价值之外,这对于突出电子邮件中的某些段落也非常方便。 我已经深入了解了这个networking,看看这个代码是否可以适应,但是不熟悉Notes的对象模型,以及在线Notes资源似乎反映了应用程序本身的迷茫,这意味着我没有得到很好的远。 代码: Sub sendEmail(EmailSubject As String,EMailSendTo As String,EMailBody As String,MailServer as String) Dim objNotesSession As Object Dim objNotesMailFile As Object Dim objNotesDocument As Object Dim objNotesField As Object 昏暗的sendmail作为布尔值 “添加到报告工具集成 Dim dbString As String dbString =“mail \”&Application.UserName&“.nsf” 在错误转到SendMailError “build立与Notes的连接 设置objNotesSession = CreateObject(“Notes.NotesSession”) 在错误恢复下一步 build立连接到邮件文件 设置objNotesMailFile = objNotesSession.GETDATABASE(MailServer,dbString) […]