当前位置: 代码迷 >> Lotus >> 怎么发送邮件
  详细解决方案

怎么发送邮件

热度:83   发布时间:2016-05-05 06:58:11.0
如何发送邮件
我想通过调用代理来实现,但是什么时候该调用代理

------解决方案--------------------
根据你的需要。比方说提交申请,或者审批的时候。
------解决方案--------------------
这儿有一段代码:
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set doc = New NotesDocument( db )
doc.Form = "Memo"
doc.SendTo = "admin"
doc.Subject = "保存文档"
doc.body = |hello world!|
Call doc.Send( False ) 
  相关解决方案