Hi
I send mail with Lotus Note using VFP the only thing missing is to close Notes. I didn't find the right way to do that. Here is my code
# DEFINE EMBEDED_ATTACHEMENT 1454
* oSession = CreateObject("Notes.NotesSession")
osession = createobject("notes.NotesUIWorkspace")
oDB = oSession.GetDatabase("","d:\lotus\notes\mail\a_poirem.nsf")
oDoc = oDB.CreateDocument()
oDoc.from = "Memo"
oDoc.SendTo = "
poirem@istar.ca"
oDoc.Subject = "Test"
oRItem = oDoc.CreateRichTextItem("Body")
oRItem.EmbedObject(EMBEDED_ATTACHEMENT, "", "d:\meal.doc")
oDoc.body = "Envoie automatisée"
oDoc.Send(0)
Here I need to close Notes. I try:
oSession.Close()
oSession.Quit()
oSession.FileQuit()
oSession.FileExit()
and more ..... nothing work.
Mike