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.