Silverlight application using vb.net. Issue creating new email in lotus notes

Question

Im writing a silverlight application in vb.net and need to send an email via lotus notes. I wish to do this by opening the lotus notes client app, open a new email window and substitute all the necessary details (to, subject etc.) in the new email window. I am using the below code but it only OPENS the lotus notes application on the machine, it does not do anything past this. Its seems that everything after the initial CreateObject call is simply ignored, although it doesnt throw any errors. I have attempt to reference interops.domino.dll but being silverlight project visual studio states the dll is not compiled for the silverlight runtime. Any assistance with this would be greatly appreciated.

Dim outlook = AutomationFactory.CreateObject("Notes.NotesSession")
Dim notesdb = outlook.GetDatabase("", "")                                                                                                 

notesdb.OpenMail()                                                                                            
Dim doc = notesdb.CreateDocument()

Dim msg = "Hey whats up"

doc.ReplaceItemValue("SendTo", "person@temp.com")                                                                                           
doc.ReplaceItemValue("Subject", "Hello")                                                                                              
Dim rtitem = doc.CreateRichTextItem("Body")                                                                                           
rtitem.AppendText(msg)

score -1 · Accepted Answer · answered Sep 10 '13 at 09:07

All you do in the moment is to create a new document in the backend and fill it with values. It is like creating a word document without opening it...

You need some more code to actually SHOW the document you created. In addition you need to assign a Form, otherwise Notes will not know, how to display this document:

Dim session = AutomationFactory.CreateObject("Notes.NotesSession")
Dim notesdb = outlook.GetDatabase("", "")   
Dim ws = AutomationFactory.CreateObject("Notes.NotesUIWorkspace")
notesdb.OpenMail()
Dim doc = notesdb.CreateDocument()

Dim msg = "Hey whats up"

doc.ReplaceItemValue("Form", "Memo")
doc.ReplaceItemValue("SendTo", "person@temp.com")
doc.ReplaceItemValue("Subject", "Hello")
Dim rtitem = doc.CreateRichTextItem("Body") 
rtitem.AppendText(msg)

ws.EditDocument( True, doc )

As I do not use silverlight I unfortunately could not test the code, but It should point into the right direction.

NotesUIDocument and it's UI siblings are not supported in COM. — leyrer, Sep 10 '13 at 18:43
You're wrong... Check this: http://stackoverflow.com/questions/15903107/cannot-instanciate-a-notesuiworkspace-from-vba-word — Tode, Sep 10 '13 at 20:49
He is right Leyrer. I substituted in the above lines of code and sure enough it worked. — Leon Calcutt, Sep 10 '13 at 21:43

score -1 · Answer 2 · edited Feb 14 '14 at 21:00

-1

You can not do UI manipulations via COM in Notes, as the UI-Classes (NotesUIDocument, NotesUIWorkspace, ...) are not supported via COM.

You can only use the backend-classes likes NotesDocument, ...

This still leaves you a lot of possibilites, as you can eiter use NotesRichTextItem or MIMEEntity classes to compose e-mails.

edited Feb 14 '14 at 21:00

rene

41,474
78
114
152

answered Sep 10 '13 at 18:49

leyrer

1,444
7
9

Torsten, care the expand? Designer help states: "NotesUIDocument class: Represents the document that's currently open in the Notes workspace.Note: This class is not supported in COM." – leyrer Sep 11 '13 at 09:14
You are absolutely right. BUT: OLE != COM >>> http://publib.boulder.ibm.com/infocenter/domhelp/v8r0/index.jsp?topic=%2Fcom.ibm.designer.domino.main.doc%2FH_USING_NOTES_CLASSES_IN_VISUAL_BASIC.html – Tode Sep 11 '13 at 09:32

Silverlight application using vb.net. Issue creating new email in lotus notes

2 Answers2