Как открыть новое письмо с помощью Lotus Notes в C # .Net - PullRequest
0 голосов
/ 11 февраля 2019

Я разрабатываю небольшое приложение на C # .Net.

В этом приложении я хотел бы иметь возможность открыть приложение IBM Lotus Notes, которое мне удалось сделать с помощью "BLOC1", ноВот из "BLOC2" аварийного завершения Lotus Notes: /

В "BLOC2" вы должны оставить "MailServer" и "MailFile" в InvokeMember?

Я действительно неПосмотрите, что нужно сделать, и в Интернете мало документации.Так что я в ваших руках.

Напомним, я бы хотел, чтобы приложение Lotus Notes открывало и открывало новое электронное письмо, заполнив, например, объект, текст письма ... СпасибоВы заранее;)

Вот мой код:

    public void ComposeMemo(String sendto, String subject, String body)
    {
        //BLOC1 instantiate a Notes session and workspace
        Type NotesSession = Type.GetTypeFromProgID("Notes.NotesSession");
         Type NotesUIWorkspace = Type.GetTypeFromProgID("Notes.NotesUIWorkspace");
         Object sess = Activator.CreateInstance(NotesSession);
         Object ws = Activator.CreateInstance(NotesUIWorkspace);

        //BLOC2 open current user's mail file
        String mailServer = (String)NotesSession.InvokeMember("GetEnvironmentString", BindingFlags.InvokeMethod, null, sess, new Object[] { "MailServer", true });
        String mailFile = (String)NotesSession.InvokeMember("GetEnvironmentString", BindingFlags.InvokeMethod, null, sess, new Object[] { "MailFile", true });
        NotesUIWorkspace.InvokeMember("OpenDatabase", BindingFlags.InvokeMethod, null, ws, new Object[] { mailServer, mailFile });
        Object uidb = NotesUIWorkspace.InvokeMember("GetCurrentDatabase", BindingFlags.InvokeMethod, null, ws, null);
        Object db = NotesUIWorkspace.InvokeMember("Database", BindingFlags.GetProperty, null, uidb, null);
        Type NotesDatabase = db.GetType();

        //BLOC3 compose a new memo
        Object uidoc = NotesUIWorkspace.InvokeMember("ComposeDocument", BindingFlags.InvokeMethod, null, ws, new Object[] { "", "", "Memo", 0, 0, true });
        Type NotesUIDocument = uidoc.GetType();
        NotesUIDocument.InvokeMember("FieldSetText", BindingFlags.InvokeMethod, null, uidoc, new Object[] { "EnterSendTo", sendto });
        NotesUIDocument.InvokeMember("FieldSetText", BindingFlags.InvokeMethod, null, uidoc, new Object[] { "Subject", subject });
        NotesUIDocument.InvokeMember("FieldSetText", BindingFlags.InvokeMethod, null, uidoc, new Object[] { "Body", body });

        //BLOC4 bring the Notes window to the front
        String windowTitle = (String)NotesUIDocument.InvokeMember("WindowTitle", BindingFlags.GetProperty, null, uidoc, null);
        Interaction.AppActivate(windowTitle);
    }

И у меня тоже есть еще одна небольшая проблема, слово "Взаимодействие" не распознается: /

...