The code below represents a simple MAPI call to Exchange from Notes; workflow processes are initiated from Notes and Exchange public folders are used as a 'shared' repository to track document processes.
Dim objSession As Variant
Dim olNameSpace As Variant
Dim objMessage As Variant
Set objSession = CreateObject("Outlook.Application")
Set olNameSpace = objSession.GetNameSpace("MAPI")
Set objMessage = objSession.CreateItem(0)
objMessage.To = sendto$
objMessage.CC = "Exchange Public Folder Name"
objMessage.Subject = "Subject here..."
objMessage.Body = "Some text and URL's here..."
Set objSession = Nothing
This was first published in November 2000