Ошибка при обращении к ndbafp dll lotus

Мой клиент использует Lotus Notes 8.0.2. Я пытаюсь использовать следующий VBScript для вызова API Notes для отправки электронного письма:

dim objNotesSession, objNotesDatabase, objNotesItem, objNotesRichTextItem

set objNotesSession = CreateObject("Lotus.NotesSession")
Call objNotesSession.Initialize("[password here]")
set objNotesDatabase = objNotesSession.GETDATABASE("[server here]", "[path to NSF here]")
set objNotesDocument = objNotesDatabase.CreateDocument
set objNotesItem = objNotesDocument.ReplaceItemValue("Form", "Memo")
set objNotesItem = objNotesDocument.ReplaceItemValue("Subject", "My Test Subject")
set objNotesRichTextItem = objNotesDocument.CreateRichTextItem("Body")
objNotesRichTextItem.AppendText "This is the body"
objNotesRichTextItem.EmbedObject 1454, "", "[path to attachment here]"
objNotesDocument.Send False, "[to address here]"

[cleanup code here]

в строке Call objNotesSession.Initialize я получаю следующую ошибку: «Ошибка загрузки DLL: инициализировать»

Если я закомментирую эту строку, выполнив строку «set objNotesDatabase = objNotesSession.GETDATABASE», я получу ошибку «Ошибка загрузки DLL: GETDATABASE»

Пожалуйста, может кто-нибудь сказать мне, почему это происходит, и что я могу сделать, чтобы решить эту проблему?

Спасибо, Шон.

Как отметил в комментариях @maksimov, 64-разрядная JVM не может загружать 32-разрядные DLL файлы Notes. Существует, правда, 64-разрядная версия DLL, но вам придется установить и настроить Lotus Domino Server (64-битная версия Windows) на вашем компьютере — и на любом компьютере (-ах), где будет работать веб-приложение. Вам нужно будет только запустить сервер Domino один раз на машину, чтобы полностью настроить его. Он не должен работать постоянно, чтобы ваш код мог получить доступ к DLL, но вам придется оставить его установленным. Тем не менее, вам нужно будет выяснить, с кем вы управляете своими отношениями с IBM и, возможно, с IBM, чтобы определить, есть ли какие-либо лицензии и финансовые последствия, прежде чем устанавливать код сервера Domino таким образом. (Еще одно замечание: чтобы 64-битный код сервера Domino Server был установлен на компьютере, и убедитесь, что эта конкретная версия nlsxbe.dll является той, которую загружает ваш код, вам будет лучше, если вы удалите и полностью очистите существующей 32-разрядной клиентской установки Notes Notes. И при очистке я избавился бы от файла lotus.ini и любых файлов notes.ini и записей реестра, связанных с Notes, которые могут быть оставлены после удаления.)

Есть и другой вариант. Ваш код использует «локальную» версию Java API Notes в notes.jar. Существует также версия API CORBA/IIOP, которая не использует DLL Notes или Dominbo. На самом деле, он не требует какой-либо установки какого-либо кода Lotus, и он не имеет никаких последствий для лицензирования. Все, что вам нужно для этого, — это копия NCSO.jar, добавленная в ваш проект. Вам нужно знать, что возможности версии API NCSO.jar немного отличаются от локальной версии, код для настройки сеанса несколько отличается, аутентификация не зависит от файлов Notes ID и серверов Domino, которые к которому вы подключаетесь, должен выполняться задача IIOP, что по умолчанию не будет, поэтому вам, возможно, придется обсудить это с людьми, которые управляют этими серверами.

Примечание. Удалено обновление, предлагающее OpenNTF API в качестве альтернативы. Это было немного временное замешательство. Это не помогло.

My client is using Lotus Notes 8.0.2.
I am trying to use the following VBScript to call the Notes API to send an email:

dim objNotesSession, objNotesDatabase, objNotesItem, objNotesRichTextItem

set objNotesSession = CreateObject("Lotus.NotesSession")
Call objNotesSession.Initialize("[password here]")
set objNotesDatabase = objNotesSession.GETDATABASE("[server here]", "[path to NSF here]")
set objNotesDocument = objNotesDatabase.CreateDocument
set objNotesItem = objNotesDocument.ReplaceItemValue("Form", "Memo")
set objNotesItem = objNotesDocument.ReplaceItemValue("Subject", "My Test Subject")
set objNotesRichTextItem = objNotesDocument.CreateRichTextItem("Body")
objNotesRichTextItem.AppendText "This is the body"
objNotesRichTextItem.EmbedObject 1454, "", "[path to attachment here]"
objNotesDocument.Send False, "[to address here]"

[cleanup code here]

on the line Call objNotesSession.Initialize I get the following error: «Error in loading DLL: Initialize»

If I comment out that line, executing line «set objNotesDatabase = objNotesSession.GETDATABASE», then I get the error «Error in loading DLL: GETDATABASE»

Please can someone tell me why this is happening, and what I can do to resolve it?

Thanks,
Shawn.

там все сложно с разрабом. ответ один — «из Excel же работает»…

есть еще Содержимое файла iFOBSDocIntegrator.idl и указан формат BSTR, может это както поможет

Мне кажется проблема в формате передаваемого мной стринга: надо как-то передать BSTR или «delphi wildString»
Есть идеи?