-
Re: composing an email from form data
DeZZar wrote:
> no worries Salad! All your help deserves a mention. Your right -
> this is a good group and has been a life saver a few times over
> already!!
>
> Heres another one. I've been looking at the code supplied for Lotus
> notes mailing. This code sends the email directly as setup without
> making it appear in your default mail client. It works well...but for
> some reason I can't get the attachement part of it work.
>
> If the file I want to attach to the email was:
> X:\Leaselocks\VIC\Document.rtf
>
> what would I make this code look like to make it work?
> (This is just the attachement portion of the code)
>
> If Attachment <> "" Then
> Set AttachME = MailDoc.CREATERICHTEXTITEM("Attachment")
> Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment,
> "Attachement")
> MailDoc.CREATERICHTEXTITEM ("Attachment")
> End If
>
I've never worked with Lotus Notes. But I went to Tony Toews site.
http://www.granite.ab.ca/_vti_bin/shtml.dll/search.htm
and I searched on the words
Lotus Notes
Check out what he has to say over there. Hopefully there'll be a
solution in one of the links.
This is a great day, America!
-
Re: composing an email from form data
solved the problem in the meantime (trial and error!!)
all you need from the code i posted above is this bit:
Set AttachME = MailDoc.CREATERICHTEXTITEM("Attachemt")
Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", "X:\Leaselocks\" &
Forms!frm_Leaselocks!GetDirectory)
MailDoc.CREATERICHTEXTITEM ("Attachement")
Done!!
-
Re: composing an email from form data
FWIW, I've updated/modified a function from Roger's Access Library
(http://www.rogersaccesslibrary.com/f...sts.asp?TID=52) to
work with Access/Word/Outlook 2007. Interested?
Public Function SendReportInMailBody(ByVal ReportName As String, ByVal
MailAddresses As String, Optional ByVal MailSubject As String, Optional
ByVal MailBody As String)
*** Sent via Developersdex http://www.developersdex.com ***