| Subject |
Simple MAPI Test |
| From |
Pablo Botella |
| Date |
Mon, 4 May 2009 22:29:38 +0200 |
| Newsgroups |
ot4xb.examples |
| Attachment(s) |
TestMAPI.zip |
WITH OBJECT TMapiSendMsg():New()
.:Sender(,"Sender Name") // or .:Sender("sender@address,"Sender Name")
.:Recipient("anybody@anydomain.com")
.:Recipient("anybody2@anydomain.com","Recipient Name Optional")
// more recipients ...
.:Subject("TMapiSendMsg")
.:Body("Testing MAPI")
.:File(cPathCombine(cAppPath(),"TestMapi.prg"),"TestMapi.prg" )
.:File(cPathCombine(cAppPath(),"TMapiSendMsg.prg"),"TMapiSendMsg.prg" )
// more attachments ...
? iif( .:Send() , "OK" , "Fail" )
END WITH
|
|