NET利用Lotus Notes發送郵件

1.本地需要安裝客戶端。

2.程序中加入COM引用(Lotus Domino Objects)。

3.代碼中加入using Domino;

4.具體實現：

           ns.Initialize("***");//密碼
            NotesDatabase ndb = ns.GetDatabase("Server", "names.nsf", false);          

            NotesDocument doc = ndb.CreateDocument();
            doc.ReplaceItemValue("Form", "Memo");
            doc.ReplaceItemValue("SendTo", "群組/用戶");
            doc.ReplaceItemValue("Subject", "測試郵件");
            NotesRichTextItem rt = doc.CreateRichTextItem("Body");
            rt.AppendText("測試郵件");
            object obj = doc.GetItemValue("SendTo");
            doc.Send(false, ref obj);
            doc = null;

 

============================

ps:如果希望發送html文件中的內容。則如下：

   ns.Initialize("jayz");
            NotesDatabase ndb = ns.GetDatabase("Server", "names.nsf", false);          

            NotesDocument doc = ndb.CreateDocument();
            doc.ReplaceItemValue("Form", "Memo");
            doc.ReplaceItemValue("SendTo", "群組/用戶");
            doc.ReplaceItemValue("Subject", "測試郵件");
            

           //測試html
            NotesStream stream = ns.CreateStream();            
            NotesMIMEEntity htmlbody = doc.CreateMIMEEntity("body");
            stream.Open("*:/*.htm", "UTF-8");
            NotesMIMEEntity htmlchild = htmlbody.CreateChildEntity(null);
            htmlchild.SetContentFromText(stream, "text/html;charset=UTF-8", MIME_ENCODING.ENC_IDENTITY_8BIT);
            stream.Close();

            object obj = doc.GetItemValue("SendTo");
            doc.Send(false, ref obj);
            doc = null;
            Response.Write("<script language='javascript'>alert('發送成功')</script>");