MAPI Call to Exchange from Notes1

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")

olNameSpace.Logon

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..."

objMessage.Send

Set objSession = Nothing

This was first published in November 2000

Dig deeper on Domino Resources - Part 2

0 comments

Oldest 

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

-ADS BY GOOGLE

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close