| Register | FAQ | Calendar | Search | Today's Posts | Mark Forums Read |
|
#1
|
| Hello, i've tryed to write a small testapplication, that send a Email via Lotus Notes by automation. I write this little app in Visual Foxpro (the syntax is nearly VB). ----snip loSession = CREATEOBJECT( "Lotus.NotesSession" ) loSession.Initialize( ) lcServer = loSession.GetEnvironmentString( "MailServer",.T.) lcMaildbName = loSession.GetEnvironmentString( "MailFile",.T.) loMaildb = loSession.getdatabase(lcServer, lcMaildbName ) loMaildoc = loMaildb.CreateDocument() loMaildoc.ReplaceItemValue( "Logo", "Plain Text") loMaildoc.ReplaceItemValue( "Form", "Memo" ) loMaildoc.ReplaceItemValue( "SendTo", "abc-at-abc.com" ) loMaildoc.ReplaceItemValue( "Subject", "Subject") loMaildoc.SaveMessageOnSend = .T. loStream = loSession.CreateStream() loStream.WriteText( "Testtext" ) loBodyMime = loMaildoc.CreateMIMEEntity() loBodyMime.SetContentFromText( loStream, "text/html;charset=iso-8859-1", ..F. ) loMaildoc.SEND(0) ---snip On Notes 6.5 there is no problem everything is fine. My problem is a Notes 6.0 intallation. There is no "Lotus.Notessession" object. I've scanned the whole registry. The only thing i have found is a "Notes.Notessession" entry. But with this entry the app is without any function. No Mail will send. I dont have any ideas. Is there a was to use the Notes.Notessession-Object or is there a way out to use mapi to send a mail? Any ideas welcom. pls excuse me for my bad english. |
![]() |
| Thread Tools | |
| Display Modes | |