Visual Foxpro and Lotus Notes
Fiona Cassidy
I have a Visual Foxpro 6 system which uses CCMail to automatically send
emails to various users without any user interference.
I need to change this system to use Lotus Notes instead of CCMAIL.
In certain circumstances I also need to be able to automatically display the
email and allow the user to add people to the CC list
Can anyone give me any indication of what is invloved here?
How this will differ from CCMail?
Or have you any sample code you can give me for sending mail through Lotus
Notes
I appreciate any help anyone can give me
Thanks in advance
Fiona
Dan Freeman
Lotus won't tell you this (in fact they go out of their way to hide the
fact) but Notes on the Windows platform is an automation server.
The following code will send e-mail from VFP using Notes:
*-- sending mail with Notes
*-- Assumes that it is sitting on a record to be processed
*-- for sending mail.
*-- message.cDomain is a Notes server/domain i.e. CAT01/CAT
*-- message.cUser is the location of a mail database i.e. "mail\user.nsf"
*-- message.cRecip is the recipient's e-mail address
*-- message.cSubject is the subject of the message
*-- message.mContents is the body of the message
oSpace = CreateObject("Notes.NotesUIWorkspace")
oSpace.OpenDatabase( TRIM(message.cDomain), TRIM(message.cUser) )
oDocument = oSpace.ComposeDocument(,,"Memo")
lcRecipient = message.cRecip
lcSubject = message.cSubject
lcContents = message.mContents
oDocument.FieldSetText("SendTo",lcRecipient)
oDocument.FieldSetText("Subject",lcSubject)
oDocument.FieldSetText("Body",lcContents)
oDocument.Send()
oDocument.Close()
Fiona Cassidy <fi...@tinet.ie> wrote in message
news:8q7tmg$2ruq$1...@brimstone.medianet.ie...
