How Lotus Notes send mail by command line ?

  • Thread starter Thread starter Tim
  • Start date Start date
Doug,

I tried "Sending an Email via Lotus Notes". I didn't get
any error because I didn't know how it worked. I need to
send email to ten or more different people with ten or
more different attachments. I believe I need a loop to do
that, but I don't know how. Could you spend some of your
time to explain to me?

Thanks in advance.

Tim.
 
Try using the "Lotus Notes from VB or VBA" example at
http://www.fabalou.com/VBandVBA/lotusnotesmail.asp

It talks about how to send to multiple recipients. (or you could try
separating their names with semi-colons, like
(e-mail address removed);[email protected];[email protected])

To be honest, I'm not sure how to send multiple attachments. I'm assuming
that Attachment is supposed to be the path to the file. You could try
creating an array of paths: Attachment(10) and see whether it works passing
the array (as it does for recipients), or you could try:

For intLoop = LBound(Attachment) To UBound(Attachment)
Set AttachME = MailDoc.CREATERICHTEXTITEM("Attachment")
Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment(intLoop),
"Attachment")
MailDoc.CREATERICHTEXTITEM ("Attachment")
Next intLoop

This really is more a Notes question than an Access question. You may have
to find a Notes forum if that doesn't work.
 
Doug,

Thanks.

Tim.
-----Original Message-----
Try using the "Lotus Notes from VB or VBA" example at
http://www.fabalou.com/VBandVBA/lotusnotesmail.asp

It talks about how to send to multiple recipients. (or you could try
separating their names with semi-colons, like
(e-mail address removed);[email protected];[email protected])

To be honest, I'm not sure how to send multiple attachments. I'm assuming
that Attachment is supposed to be the path to the file. You could try
creating an array of paths: Attachment(10) and see whether it works passing
the array (as it does for recipients), or you could try:

For intLoop = LBound(Attachment) To UBound(Attachment)
Set AttachME = MailDoc.CREATERICHTEXTITEM ("Attachment")
Set EmbedObj = AttachME.EMBEDOBJECT(1454, "", Attachment(intLoop),
"Attachment")
MailDoc.CREATERICHTEXTITEM ("Attachment")
Next intLoop

This really is more a Notes question than an Access question. You may have
to find a Notes forum if that doesn't work.

--
Doug Steele, Microsoft Access MVP






.
Click to expand...
 
Back
Top