C# 调用Lotus Notes发送邮件

 1 using System;
 2 using System.Collections.Generic;
 3 using System.ComponentModel;
 4 using System.Data;
 5 using System.Drawing;
 6 using System.Linq;
 7 using System.Text;
 8 using System.Windows.Forms;
 9 using Domino;
10 
11 namespace NetUseNotes
12 {
13     public partial class Form1 : Form
14     {
15         NotesSession NSession;
16         NotesDatabase NDataBase;
17         
18         public Form1()
19         {
20             InitializeComponent();
21         }
22         private void btnsend_Click(object sender, EventArgs e)
23         {
24             try
25             {
26                 if (NSession != null)
27                 {
28                     NotesDocument NDocument = NDataBase.CreateDocument();
29                     NDocument.ReplaceItemValue("Form", "Memo");
30                     
31                     NDocument.ReplaceItemValue("SendTo", txtToUser.Text);                   
32                     NDocument.ReplaceItemValue("Subject", txtSubject.Text);                     
33                     NotesRichTextItem rt = NDocument.CreateRichTextItem("Body");
34                     rt.AppendText(txtBody.Text);                    
35                  
36                     object obj = NDocument.GetItemValue("SendTo");
37                     NDocument.Send(false, ref obj);
38                     NDocument = null;
39                     MessageBox.Show("Successfully!");
40                 }
41             }
42             catch (Exception ex)
43             {
44                 MessageBox.Show("Error:" + ex.Message);
45             }
46         } 
47 
48         private void Form1_Load(object sender, EventArgs e)
49         {            
50             NSession = new NotesSession();
51             NSession.Initialize("UserName");            
52             NDataBase = NSession.GetDatabase("Notes Server", "names.nsf", false); 
53         }         
54     }
55 }