Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Lotus Notes - attach a file
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Lotus Notes - attach a file
Miscellaneous
Thread ID:
00868702
Message ID:
00868702
Views:
67
I'm using the following code to send a Lotus Notes email. I need to add an attachment - what is the syntax for that??
*Create the Notes object
		SESSION=CREATEOBJECT("NOTES.NOTESSESSION")

		m.mailfile=SESSION.GetEnvironmentString("MailFile",.T.)
		m.MailServer=SESSION.GetEnvironmentString("MailServer",.T.)

		DB=SESSION.GetDatabase(M.MailServer,m.mailfile)
		DOC=DB.CreateDocument()
		DOC.FORM="Memo"
		DOC.Subject="Certificate No. "+.txtCertnum.VALUE +;
                "("+.Qdmsbasepgf1.Page1.txtMatl.VALUE+")"
		DOC.Body="Attached is Certificate No. ";
                +.txtCertnum.VALUE +" for "+.txtMatl.VALUE+" as you requested.";
                +CHR(13)+" "+CHR(13)+;
		"If you have any further questions, please contact me at the number listed below."
		DOC.FROM=SESSION.UserName
		DOC.SEND(.F.,recipients)
		DOC.SAVE(.T.,.T.)
Thanks!
Phil Thomas
http://phillipdthomas.com

Never let your energy or enthusiasm be dampened by the discouragements that must inevitably come.....
Next
Reply
Map
View

Click here to load this message in the networking platform