Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Lotus Notes - attach a file
Message
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Lotus Notes - attach a file
Divers
Thread ID:
00868702
Message ID:
00868702
Vues:
66
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.....
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform