Send email: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 44: | Line 44: | ||
COM_Release(pmsg) |
COM_Release(pmsg) |
||
COM_Term() |
COM_Term() |
||
#Include COM.ahk</lang> |
#Include COM.ahk</lang> |
||
=={{header|Lotusscript}}== |
|||
<lang Lotusscript>Dim session As New NotesSession |
|||
Dim db As NotesDatabase |
|||
Dim doc As NotesDocument |
|||
Set db = session.CurrentDatabase |
|||
Set doc = New NotesDocument( db ) |
|||
doc.Form = "Memo" |
|||
doc.SendTo = "Email Recipient" |
|||
doc.Subject = "Subject of this mail" |
|||
Call doc.Send( False ) |
|||
</lang> |
|||
=={{header|Mathematica}}== |
=={{header|Mathematica}}== |