读书人

怎么发送邮件

发布时间: 2012-06-09 17:16:42 作者: rapoo

如何发送邮件
我想通过调用代理来实现,但是什么时候该调用代理

[解决办法]
根据你的需要。比方说提交申请,或者审批的时候。
[解决办法]
这儿有一段代码:
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 )

读书人网 >行业软件

热点推荐