ACCESS LOTUS NOTES through MS ACCESS FIELD

[kinselas]

How do I access Lotus Notes by clicking the ACCESS Email field

 

[SiJP]

What part of lotus notes do you want? Lotus notes is a programme that holds many databases.. each database consists of documents that can be customised to hold whatever data you like.. you can then view / sort / access this info through views.

Are you saying you have a specific database that you want to access through MS Access?

 

[kinselas]

I would like to send an email directly from Access.

 

[Tech63]

Simply paste this in your procedure.

Dim Whoto As String
Dim WhotoCC As String
Dim session As Object
Dim db As Object
Dim doc As Object
Dim rtitem As Object
Dim EmbedObj As Object
Dim Message As String
Dim subj As String
Dim address As String
Dim FILENAME As String

Whoto = "Email Address"
WhotoCC = "CC email address"
Set session = CreateObject("Notes.NotesSession&quot
Set db = session.GETDATABASE("", "&quot
Call db.OPENMAIL
Set doc = db.CREATEDOCUMENT()
Set rtitem = doc.CREATERICHTEXTITEM("Body&quot
doc.Form = "Memo"
doc.SendTo = Whoto
doc.CopyTo = WhotoCC
doc.Subject = ""
doc.body = ""
FILENAME = ""
Set EmbedObj = rtitem.EMBEDOBJECT(1454, "", FILENAME)
Call doc.SEND(False)